Question

ppt中的vb编程

谁能帮我编段程序 ppt里的程序 有两个文本框 一个叫TextBox1 一个叫TextBox2
如果在TextBox1里边输入3，在TextBox2里输入2 ，按确认按钮（command1），就能出来“你答对了！”的信息 。

谁呢把这段帮我编写下 Microsoft vb 代码

如果编的对！给加分
Private Sub CommandButton1_Click()

End Sub

Private Sub Command1_Click()

If TextBox5.var = 2 And TextBox2.var = 3 Then Label1.Caption = "答对了！" Else Label1.Caption = "答错了！"

End Sub

Private Sub Label1_Click()
Print Label1.Text

End Sub

Private Sub TextBox1_Change()

End Sub

Private Sub TextBox2_Change()
Input #TextBox2.var, var

End Sub

Private Sub TextBox5_Change()
Input #TextBox5.var, var
End Sub

这是有错误的代码 谁给我改一下

Answer 1

Private Sub Command1_Click()
If (TextBox1.Text = "3") And (TextBox2.Text = "2") Then MsgBox ("你答对了！")
End Sub

不过在ppt里，command1默认叫commandbutton1