Question

VB中RND函数在此程序中什么作用？

我在此程序中,不知道RND函数在这里起什么作用？这是一个简单的加法程序.此中RND函数是否可以不要？
Private Sub command1_click()
text3.Text = ""
Randomize
text1.Text = Val(Int(Rnd * 101))
text2.Text = Val(Int(Rnd * 101))
command2.SetFocus
text3.Text = Val(InputBox("请输入计算的结果："))
End Sub

Private Sub command2_click()
If Val(text3.Text) = Val(text1.Text) + Val(text2.Text) Then
label4.Caption = "很好,答对了！"
Else
label4.Caption = "做错了,再来一次吧！"
End If
End Sub

Private Sub command3_click()
End
End Sub

Answer 1

这个应该是小学生用的100以内的加法运算，RND的作用是产生一个随机数，以便每一次text1和text2的值都不相同，在这个程序是必须要，并且上程序的核心，如果不要的话，每次点击按钮，text1和text2都会是101，程序就没意义了。

Answer 2

Rnd 得到0到1之间的随机数