随机输入3个加数（0～4），再随机输入3个被加数（0～4），最后把结果显示出来。

运行的时候，屏幕上要显示相关语句，如：please input three number":1,2,3" …… the result“：***”
最好是注明详细解释的。
答案满意的话再追加30分！

VB课上作的
供参考

Dim a, b, c, i As Integer
Dim j%
Private Sub Command1_Click()
c = Val(Text1.Text)
If c = a + b Then
i = i + 1
MsgBox ("正确")
a = Int(Rnd * 100)
b = Int(Rnd * 100)
Label1.Caption = a & "+" & b
Text1.Text = ""
Text1.SetFocus
Else
j = j + 1
MsgBox ("错误")
a = Int(Rnd * 100)
b = Int(Rnd * 100)
Label1.Caption = a & "+" & b
Text1.Text = ""
Text1.SetFocus
End If
End Sub
Private Sub Command2_Click()
MsgBox ("您一共做了" & i + j & "道题，做对了" & i & "道，得分" & i * 100 / (i + j))
End Sub
Private Sub Form_Load()
Command1.Caption = "检测"
Command2.Caption = "完成"
a = Int(Rnd * 100)
b = Int(Rnd * 100)
Label1.Caption = a & "+" & b
j = 0
i = 0
Text1.Text = ""