在VB6.0中的LISTBOX怎么在里面加入内容?

向list1中添加内容：

List1.AddItem "123"

删除list1中的内容,0表示第一条内容:

List1.RemoveItem 0

判断内容有没有被选中：

if List1.Selected (0) then print list1.list(0)

这个你可以加个循环，把所有的都判断一遍，将所有被选中的内容输出。

直接使用textbox 的additem方法就可以了。先在textbox中输入文字，然后点击命令按钮，就可以将文本框的内容作为一条新记录添加到listbox中。

private sub confirm_click()

if len(text1.text)>0 then

listbox1.additem text1.text

end if

end sub

1、首先需要打开Excel的表格，如图所示，点击下面的文件1，鼠标右键单击选择查看代码。

2、然后就是进入代码页面，可以看到页面上现在的代码。

3、然后接下来就是需要用listbox用法，如图所示，输入Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)，回车。

4、最后，再返回到页面上，如图所示，双击一下表格就可以看到数字了，listbox用法成功。

---