Question

VB中怎么将两个文本框通过按钮写入列表框,写入后两个文本框的数据在一行显示，并用空格隔开。在线等

Answer 1

首先要设置你的listView控件（可以写在form_load中）：
With lsview1
.ColumnHeaders.clear

.ColumnHeaders.Add , , "列1", 3000
.ColumnHeaders.Add , , "列2", 3000
end with

然后在按钮事件中（两个文本框分别叫text1,text2)：
private sub command1_click()
Dim lvwItem As ListItem
Set lvwItem = lsview1.ListItems.Add(, "k1",text1.text)
lvwItem.SubItems(1) = text2.text
end sub

追问

我 List1里是这么写的
Dim i As Integer, a As Integer
If Text1.Text = "" Then Exit Sub
a = 0
For i = 0 To List1.ListIndex - 1
If List1.List(i) = Text1.Text Then a = 1
If List1.List(i) = Text2.Text Then a = 2
Next
If a = 0 Then List1.AddItem Text1.Text
If a = 0 Then List1.AddItem Text2.Text

追答

你写的这段啥意思呀？跟你的问题无关呀～ 而且你这段写在什么事件里了？

Answer 2

？？？