從ListBox中獲取信息並將其放入標籤

Question

基本上，我在寫這個Visual Basic（VB6）應用程序中有一個ListBox。 ListBox包含「觀看的電影」。

我希望能夠抓住這個ListBox中的所有項目，並將這些項目放入標籤中。但我無法弄清楚如何從我的ListBox中獲取信息到我的標籤。

任何幫助將不勝感激，謝謝！

Answer 1

我不熟悉VB，所以我不能給你任何代碼。

只是運行所有的項目，並做myLabel.Content = myLabel.Content + myListBox.Items[i].Text。

Answer 2

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 3

這將採取從列表框中的一切，並將其添加到標籤，如你問你的問題。如果您只想將選定項目放入您的標籤中，請使用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