1、首先,打开VB软件,在窗体上面添加一个列表框,如下图所示。
2、单击列表框,在属性窗口中,设置列表框的属性和内容,如下图所示。
3、在窗体上面,添加两个命令按钮,如下图所示。
4、分别设置,两个命令按钮的属性,名称分别为“复制”,“清除”,如下图所示。
5、双击“清除”命令按钮,编辑其代码,如下图所示。
6、运行程序,验证结果。选中列表框中的“语文”,点击“复制”命令按钮,则在列表框中,复制了“语文”项目;再选择“政治”,点击“清除”命令按钮,则列表框中“政治”项目消失。如下图所示。
从 List1 添加一个到 List2:List2.AddItem List1.Text
List1.RemoveItem List1.ListIndex
从 List1 添加全部到 List2:
For i = 0 To List1.ListCount - 1
List2.AddItem List1.List(i)
Next
List1.Clear
反向添加原理一样,这里就不赘述了
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)