vb中列表框修改为组合框

2024-11-22 13:40:22
推荐回答(1个)
回答(1):

Private Sub Form_Load()
Combo1.AddItem "AAA"
Combo1.AddItem "BBB"
Combo1.AddItem "CCC"
Combo1.AddItem "DDD"
End Sub

Private Sub Combo1_Click()
List1.AddItem Combo1.Text
End Sub