摘要:
additem 添加属性listcount总记录数listindex索引值Private Sub Form_Load()List1.AddItem "广东省广州市"List1.AddItem "广东省河源市"List1.AddItem "广东省惠州市"List1.ListIndex = 0End SubPrivate Sub LeftAll_Click()Dim i As Integer For i = 0 To List2.ListCount - 1 List1.AddItem List2.List(i) Next List2.Cl 阅读全文