压面机做饺子皮视频:谁知道下面一段vb程序在干吗?

来源:百度文库 编辑:高考问答 时间:2024/04/24 09:39:06
r-inte load
Randomize call Genran
vbcrlf r=int(100*rnd+1)
label1.caption=”随机数已生成”
m=int(val(inputbox(j)))
end if j=j+1
i=inputbox(Gl,” “,i,100j)
MsgBox 恭喜!你通过&j&次猜测,终于猜中了&vbcrlf&你的猜测成功率是&100/j×%
End if call Genran
怎么样才能把这段程序搞得很好呢?

计算机内部生成一个数,你输入猜数,如果猜中了,就会出现"恭喜!你通过&j&次猜测,终于猜中了&vbcrlf&你的猜测成功率是&100/j×%"
你每一次猜,都会自动记数猜的次数,计算机在最后的时候会给出你猜了多少次,才猜出来.如果没有猜出来,电脑还是记录猜过多少,没猜过多少,有统计.