摘要: 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 阅读全文
posted @ 2013-11-21 16:45 笑笑小白 阅读(4206) 评论(0) 推荐(0)