您所在位置：主题：帮忙解释下这段话 =（简单 可我不会！！）
vb506221315
[专家分：0] 发布于 2009-07-27 15:36:00
这个vb程序 ，有5个复选框，和1个按钮。
Private Sub Command1_Click()
Dim note
If Check1.Value = 1 Then note = Check1.Caption
If Check2.Value = 1 Then note = note & " " & Check2.Caption
If Check3.Value = 1 Then note = note & " " & Check3.Caption
If Check4.Value = 1 Then note = note & " " & Check4.Caption
If Check5.Value = 1 Then note = note & " " & Check5.Caption
MsgBox "您选择的是： " & note
End Sub
要求解释这几句中 第2个等于号 后面的note & " " & Check2.Caption 含义
If Check1.Value = 1 Then note = Check1.Caption
If Check2.Value = 1 Then note = note & " " & Check2.Caption
If Check3.Value = 1 Then note = note & " " & Check3.Caption
If Check4.Value = 1 Then note = note & " " & Check4.Caption
If Check5.Value = 1 Then note = note & " " & Check5.Caption
Private Sub Command1_Click()
Dim note
If Check1.Value = 1 Then note = Check1.Caption
If Check2.Value = 1 Then note = note & " " & Check2.Caption
If Check3.Value = 1 Then note = note & " " & Check3.Caption
If Check4.Value = 1 Then note = note & " " & Check4.Caption
If Check5.Value = 1 Then note = note & " " & Check5.Caption
MsgBox "您选择的是： " & note
End Sub
要求解释这几句中 第2个等于号 后面的note & " " & Check2.Caption 含义
If Check1.Value = 1 Then note = Check1.Caption
If Check2.Value = 1 Then note = note & " " & Check2.Caption
If Check3.Value = 1 Then note = note & " " & Check3.Caption
If Check4.Value = 1 Then note = note & " " & Check4.Caption
If Check5.Value = 1 Then note = note & " " & Check5.Caption
