Question

VB 设计程序，在指定范围内（1~n）产生3个随机整数，范围n在文本框中输入，3个随机整数显示在3个标签中

设计程序，在指定范围内（1~n）产生3个随机整数，范围n在文本框中输入，3个随机整数显示在3个标签中。请问代码怎么写啊？
谢谢你的答案，但是能用form_load完成吗？

Answer 1

Private Sub Command1_Click()
Dim N As Integer
Randomize
N = Val(Text1.Text)
label1 = Int(Rnd * N + 1)
label2 = Int(Rnd * N + 1)
label3 = Int(Rnd * N + 1)

End Sub

Answer 2

Private Sub Command1_Click()
Dim N As Integer
Randomize
N = Val(Text1.Text)
label1 = Int(Rnd * N + 1)
label2 = Int(Rnd * N + 1)
label3 = Int(Rnd * N + 1)
End Sub

Answer 3

很容易，可是你怎么没有悬赏分呀