bevöl Etikett mit einer Reihe von Strings

Question

Ich habe eine Liste von String und ich möchte mein Label füllen mit ihnen

Dies ist, was ich habe bisher aber scheint nicht

Dim _items() As String = {"Apple", "Orange", "Banana", "Mango"} 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 

    label1 = _item 

End Sub 

zu arbeiten

Dies ist, wie ich meine Ausgabe

Answer 1

Zunächst einmal sein wollen t Hat das wirklich ein Label? Es sieht wie eine TextBox aus.

Ich nehme an, es ist ein Label. Stellen Sie sicher, dass das Etikett einige Eigenschaften im Designer eingestellt mehrzeiligen Text zu ermöglichen, und eine große Größe wie folgt aus:

label1.AutoSize = false 

Ihre Frage läuft darauf hinaus, diese beiden Fragen:

1. Wie kann ich Text auf einem Etikett?
2. Wie kann ich eine Liste von Zeichenfolgen in eine einzelne [carriage return line feed] -Zeichenfolge ändern?

Dies wird sowohl

Dim _items() As String = {"Apple", "Orange", "Banana", "Mango"} 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    ' change the array of strings into a single string delimited with crlf 
    Dim delimitedString = String.Join(Environment.NewLine, _items) 
    ' set the label's text property to your string 
    label1.Text = delimitedString 
End Sub 

Adresse

Answer 2

label1.Text = String.Join(vbCrLf, items)