vb6 - 如何在vb6的多选ListBox中获取所有选择的值？

Question

我的 vb6 项目中有一个 ListBox，我已将其属性设置为多选。
现在，我想在我的多选 ListBox 上获取所有选定的项目并将其放入一个变量中，例如，或者可能放在一个多行文本框中。我只是想获得多选值。

Answer 1

不幸的是，您必须遍历所有元素。下面是一些示例代码:

Dim k As Long
Dim s As String

For k = 0 To List1.ListCount - 1
    If List1.Selected(k) Then
        s = List1.List(k)
        ' ... do something
    End If
Next