230问答网 > 一．在名称为FORM1的窗体上画1个名称为Label1,标题为“列表框的使用”的标签。再画一个名称为List1的列表

一．在名称为FORM1的窗体上画1个名称为Label1,标题为“列表框的使用”的标签。再画一个名称为List1的列表

2025-01-03 08:36:15

推荐回答（1个）

回答1：

Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "山西"
List1.AddItem "辽宁"
List1.AddItem "浙江"
List1.AddItem "广东"
Label1 = "列表框的使用"

'属性栏里设置MultiSelect为2
End Sub

Private Sub List1_Click()
Dim tmp As String
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
tmp = tmp + List1.List(i) & vbCrLf
End If
Next
MsgBox tmp

End Sub