vb随机数之和代码单击开始按钮以后每隔0.01秒产生2个10~99之间的随机数,如果这两个数之和为100,则停止产生新的

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 10
End Sub
Private Sub Timer1_Timer()
a = Int(Rnd * 90 + 10)
b = Int(Rnd * 90 + 10)
If a + b = 100 Then Timer1.Enabled = False: Print a, b
End Su