关于LISTVIEW操作？？？

[applezh]

我在FORM2中的TEXT1,TEXT2,TEXT3,TEXT4输入数据？？？
如何在FORM1的LISTVIEW1的一行中显示此四个数据？？？

已经将LISTVIEW分为四列
Dim colX As ColumnHeader '声明变量。
Dim intX as Integer '计数器变量。
For intX = 1 to 4
Set colX = ListView1.ColumnHeaders.Add()
colX.Text = "Field " & intX
colX.Width = ListView1.Width / 4
Next intX

[rainstormmaster]

代码已发给你，昨晚不能回复，奇怪

[CloneCenter]

Dim itmX as ListItem
Set itmX = ListView1.ListItems.Add(, , Text1.Text)
itmX.SubItems(1) = Text2.Text
itmX.SubItems(2) = Text3.Text
itmX.SubItems(3) = Text4.Text