Question

简单VB 程序 请高手帮下忙看看是那错了，而且 Command1的哪一步看着不是很明白请帮忙解释下

Private Sub Command1_Click()
Label1.Caption = "姓名" & Text1.Text & vbCrLf
Label2.Caption = Label2.Caption & "性别" & Combol.Text & vbCrLf
Label3.Caption = Label3.Caption & "职称" & Combo2.Text & vbCrLf
Label4.Caption = Label4.Caption & "学历" & Combo3.Text & vbCrLf
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Combo1.AddItem "男"
Combo1.AddItem "女"
Combo2.AddItem "教授"
Combo2.AddItem "副教授"
Combo2.AddItem "讲师"
Combo2.AddItem "助教"
Combo3.AddItem "博士研究生"
Combo3.AddItem "硕士研究生"
Combo3.AddItem "大学"
Combo3.AddItem "大专"
Combo3.AddItem "高中"
End Sub

Answer 1

代码错了，要不是测试还真是看不出来，有个1写成l了
Private Sub Command1_Click()
Label1.Caption = "姓名" & Text1.Text & vbCrLf
Label2.Caption = Label2.Caption & "性别" & Combo1.Text & vbCrLf
Label3.Caption = Label3.Caption & "职称" & Combo2.Text & vbCrLf
Label4.Caption = Label4.Caption & "学历" & Combo3.Text & vbCrLf
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Combo1.AddItem "男"
Combo1.AddItem "女"
Combo2.AddItem "教授"
Combo2.AddItem "副教授"
Combo2.AddItem "讲师"
Combo2.AddItem "助教"
Combo3.AddItem "博士研究生"
Combo3.AddItem "硕士研究生"
Combo3.AddItem "大学"
Combo3.AddItem "大专"
Combo3.AddItem "高中"
End Sub

Answer 2

Label2.Caption = Label2.Caption & "性别" & Combol.Text & vbCrLf
你输错了，应该是：
Label2.Caption = Label2.Caption & "性别" & Combo1.Text & vbCrLf

Answer 3

代码没错！

追问

能帮我解释下 Command1 的Click（）的意义么

追答

就是按下command1按钮将会发生的事件。