阿Q吧 > 我想用VB制作一个小程序，200以内的数字随机生成。求程序，求制作方法。。。

我想用VB制作一个小程序，200以内的数字随机生成。求程序，求制作方法。。。

2024-12-04 08:43:22

推荐回答（3个）

回答1：

回答2：

Private Sub Command1_Click()

Randomize

Text1.Text = Int(Rnd * 201)

End Sub

你需要text1，command1各一个，然后复制代码就可以了。

回答3：

Option Explicit

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
Timer1.Enabled = False
End Sub

Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 100
End Sub

Private Sub Timer1_Timer()
Randomize
Label1.Caption = Int((200 - 1 + 1) * Rnd + 1)
End Sub