如何在 VB 6.0 中将值从列表框传输到组合框

Question

所以我的表单中有 2 个列表视图，其中如果我从 listview1 中选择一个列表项并单击命令按钮，它会将所选项目传输到 listview2，现在我希望 listview2 上的项目在我时填充我的组合框单击另一个命令 button.can 请给我一个关于如何执行此操作的建议？谢谢。

这是我当前的代码，用于填充 listview2 上第一项的组合框。

Private Sub Command3_Click()
Dim i As Integer
For i = 1 To ListView2.ListItems.Count
Next i
Combo1.AddItem (ListView2.SelectedItem)

End Sub

知道如何循环显示 listview2 上的所有项目吗？

Answer 1

这会将列表 2 中的所有项目添加到组合中。此时与所选项目无关。

Private Sub Command3_Click()
  Dim i As Integer

  Combo1.Clear
  For i = 1 To ListView2.ListItems.Count
    Combo1.AddItem (ListView2.ListItems(i).Text))
  Next i
End Sub

如何在 VB 6.0 中将值从列表框传输到组合框

How to transfer values from a list box to a combo box in VB 6.0

vb6

listview

combobox