从ListBox获取信息并将其放入标签中

Question

基本上我在我正在编写的Visual Basic（VB6）应用程序中有一个ListBox。 ListBox包含“观看的电影”。

我希望能够抓取此ListBox中的所有项目，并将这些项目放入标签中。但我无法弄清楚如何从我的ListBox获取信息到我的标签。

非常感谢任何帮助，谢谢!!

Answer 1

Dim ListText As String
Dim Counter As Integer

ListText = ""

For Counter = 0 To List1.ListCount - 1
    If List1.Selected(Counter) = True Then
        ListText = ListText & List1.List(Counter) & vbCrLf
    End If
Next

MsgBox ListText

Answer 2

这将从ListBox中获取所有内容，并将其添加到您在问题中提到的Label中。如果您只想将所选项目放入标签，请使用SpectralGhost的答案。

Dim x As Integer
List1.AddItem ("Hello")
List1.AddItem ("World")

For x = 0 To List1.ListCount - 1
    Label1.Caption = Label1.Caption + List1.List(x) + vbCrLf
Next

Answer 3

我不熟悉VB，所以我不能给你任何代码。

只需运行所有项目并执行myLabel.Content = myLabel.Content + myListBox.Items[i].Text。