JAVA怎么转成VB，我转出来的结果不一样

Question

JAVA代码：
<SCRIPT language=JavaScript type=text/javascript>
<!--function clearresult() { document.getElementById("result").value = "";}
function getresult(n)
 { var aa; aa = Math.random() * 100 + 1;
aa = Math.round(aa);
if (aa > n)
 { document.getElementById("result").value += "卷轴发出一道亮光，但是具没有任何变化。\r\n"; } 
else
 { document.getElementById("result").value += "卷轴发出一道亮光，在道具上添加了某种神秘的能力。\r\n"; }}//--></SCRIPT>我写的VB代码
function getresult(n as long )
aa =rnd * 100 +1
aa=round(aa)
if aa > n then 
text1.text ="卷轴发出一道亮光，在道具上添加了某种神秘的能力。"
else
text1.text="卷轴发出一道亮光，但是具没有任何变化。"
end if 
end function 
但是结果明显不同。。求帮助，先谢谢了。

Answer 1

vb中要添加randomize,才能实现纯随机,要不每次随机都是一样的值

Answer 2

能否帮忙用VB实现JAVA的代码效果。

Answer 3

具体的不同的现象是什么？你修改后的代码又是什么？论坛签名======================================================================

当您的问题得到解答后请及时结贴.
http://topic.csdn.net/u/20090501/15/7548d251-aec2-4975-a9bf-ca09a5551ba5.html
http://topic.csdn.net/u/20100428/09/BC9E0908-F250-42A6-8765-B50A82FE186A.html
http://topic.csdn.net/u/20100626/09/f35a4763-4b59-49c3-8061-d48fdbc29561.html如何给分和结贴？
http://community.csdn.net/Help/HelpCenter.htm#结帖如何给自己的回帖中也加上签名？
http://blog.csdn.net/q107770540/archive/2011/03/15/6250007.aspx

Answer 4

测试
论坛签名======================================================================

当您的问题得到解答后请及时结贴.
http://topic.csdn.net/u/20090501/15/7548d251-aec2-4975-a9bf-ca09a5551ba5.html
http://topic.csdn.net/u/20100428/09/BC9E0908-F250-42A6-8765-B50A82FE186A.html
http://topic.csdn.net/u/20100626/09/f35a4763-4b59-49c3-8061-d48fdbc29561.html如何给分和结贴？
http://community.csdn.net/Help/HelpCenter.htm#结帖如何给自己的回帖中也加上签名？
http://blog.csdn.net/q107770540/archive/2011/03/15/6250007.aspx

Answer 5

test
论坛签名======================================================================

当您的问题得到解答后请及时结贴.
http://topic.csdn.net/u/20090501/15/7548d251-aec2-4975-a9bf-ca09a5551ba5.html
http://topic.csdn.net/u/20100428/09/BC9E0908-F250-42A6-8765-B50A82FE186A.html
http://topic.csdn.net/u/20100626/09/f35a4763-4b59-49c3-8061-d48fdbc29561.html如何给分和结贴？
http://community.csdn.net/Help/HelpCenter.htm#结帖如何给自己的回帖中也加上签名？
http://blog.csdn.net/q107770540/archive/2011/03/15/6250007.aspx