因为要考计算机二级 所以在自学VB
但是在FOR循环这里遇到一点疑问
是一个求产生10个1-100的随机整数的最大值的程序 语句如下：
Private Sub Form Click()
Dim i%,x%,max%
Randomize
Print"10个随机整数"
x=int(Rnd*100)+1
Print x;
max=x
For i=2 to 10
x=int(Rnd*100)+1
if x>max Then max=x
Print x;
Next i
Print
Print"最大值为";max
End Sub
天盟APP下载
