vb中listbox1向listbox2中添加数据可以吗?

2024-11-03 01:26:45
推荐回答(1个)
回答(1):

我弄不懂你的意思,这样解答吧
如果你想在listbox1中提前加入一些项目,可以在formload时运行
list1.AddItem 你要加入的数据
如果你想把list1中所有项目都加入到list2中,可以用循环语句
for i = 0 to list1.ListCount - 1
list2.additem list1.list(i)
next i
如果你想双击你在list1中已经选择好的项目添加到list2中的话
可以这样做
List2.AddItem List1.Text

不知道我这样写,你能明白不?

补充一下
你可以加入一个timer控件,随时检查list1.listcount是否变大,如果变大了,就把list1中最后一条项目加入到list2中。
程序这样写
dim g as long
这个用来存储list1的初始项目数字
在formload中加入如下代码
g=list1.listcount
然后加入一个timer控件,时间设定取决于你添加新数据的频率,加入如下代码
Private Sub Timer1_Timer()
If List1.ListCount > g Then
g = List1.ListCount
List2.AddItem List1.List(g - 1)
End If
End Sub
这样在list1中有新的项目加入后,list2中就会被加入新的项目

你的意思是直接输入或编辑list中的内容
list控件不能像你补充中的那样操作,如果需要,换其他类似控件。