vb6 listview 绑定textbox

在VB6中，可以通过以下步骤将ListView绑定到TextBox：

1. 首先，确保已经在工具箱中添加了ListView和TextBox控件，如果没有，请在工具箱中右键单击，选择“组件”，然后勾选“Microsoft Windows Common Controls 6.0”，点击“应用”和“确定”按钮。

2. 在窗体上添加一个ListView控件和一个TextBox控件。

3. 在窗体的Load事件中，编写代码以向ListView中添加数据。例如，可以使用ListView的ListItems属性和SubItems属性来添加列表项和子项：

   Private Sub Form_Load()
       ListView1.View = lvwReport '设置ListView的显示模式为报表模式
       ListView1.ColumnHeaders.Add , , "名称" '添加列表头
       ListView1.ColumnHeaders.Add , , "数值"
       
       Dim item As ListItem '定义一个用于添加到ListView中的项
       Set item = ListView1.ListItems.Add(, , "项目1") '添加一个列表项
       item.SubItems(1) = "数值1" '设置该项的第二个子项的值
       Set item = ListView1.ListItems.Add(, , "项目2")
       item.SubItems(1) = "数值2"
   End Sub

4. 编写代码，以便在ListView中选择某项时，将该项的值显示在TextBox中。可以使用ListView的SelectedItems属性获取所选择的项，然后将其值赋给TextBox的Text属性：

   Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
       Text1.Text = Item.SubItems(1)
   End Sub

5. 最后，为了确保能够调用ItemClick事件，需要在ListView的属性中设置`OnClick = ListView1_ItemClick`。

以上是在VB6中将ListView绑定到TextBox的方法。在窗体加载时，向ListView添加数据，在ItemClick事件中，将所选择的项的值显示在TextBox中。