小弟请教各位大大,怎样在VB中,单击listbox控件某一行,然后在listbox中出来相对应的内容

2024-12-30 22:33:50
推荐回答(1个)
回答1:

Private Sub List1_Click()
Select Case List1.List(List1.ListIndex)
Case "一年级"
List1.Clear
List1.AddItem "一班"
List1.AddItem "二班"
List1.AddItem "三班"
Case "二年级"
End Select
End Sub