Schnelle Frage zu VB 2008/2010

[RoleS]

Hey,

ich habe eine kleine Frage zu VB, da ich hier einen kleinen Hänger habe.
Ich hab eine TextBox ( TextBox1 ) in der beliebig viele Werte stehen können die mit Split durch ; getrennt werden. Nun will ich durch eine For Each Schleife jeden Wert der in der TextBox steht in eine RichTextBox schreiben. Doch entweder schreibt er bei mir nur den Anfangsbuchstaben oder immer nur das erste Wort.

Der Code von mir wo immer nur das erste Wort angezeigt wird aber die Anzahl der geschriebenen Wörter stimmt:

PHP Code:

Dim liste() As String = TextBox1.Text.Split(";"c)

For Each i As String In liste
     Dim x As Integer = 0
     RichTextBox1.Text += liste(x)
     x = x + 1
Next 


Der Code wo immer nur der Anfangsbuchstabe angezeigt wird und die Anzahl der geschriebenen Wörter stimmt:

PHP Code:


For Each liste As String In TextBox1.Text.Split(";"c)
          Dim x As Integer = 0
          RichTextBox1.Test = liste(x)
           x = x + 1
Next 


Ich hoffe auf schnelle Hilfe.

Grüße
RoleS

[nkkk]

du detzt ja auch die varaible x immer bei "Dim x As Integer = 0 " immer wieder auf 0.
auuserdem warum benutzt du die variable x eig?
for each schleifen sind doch dazu da etwas "für jedes element der liste zu machen". wie du das machst mit dem index ist das schwachsinn

Der richtige code:

PHP Code:


For Each i As String In TextBox1.Text.Split(";"c)
     RichTextBox1.Text += i
Next 


du machst für jedes element der liste liste: hänge das element an den text von RichTextBox1 an.

[-AmA-]

lol


Dim liste() As String = TextBox1.Text.Split(";"c)

For Each i As String In liste
RichTextBox1.Text += i + "\n"
Next

bin nicht der vb profi... daher könnte der code oben nicht funktionieren
der fehler liegt aber da:

Dim x As Integer = 0
RichTextBox1.Test = liste(x)
x = x + 1

Durch die Deklaration von 0 die du immer wieder machst, bringt das nichts

Anhand dieser line:
For Each i As String In liste
denke ich das in i immer der aktuelle wert des Array liegt

[RoleS]

Danke für die Antworten.
Es funktioniert.

Ich hab länger in VB nix gemacht, deswegen muss ich mich erst wieder reinarbeiten.

€: Doch noch ne kleine Frage:

PHP Code:

 Dim Files() As String = Directory.GetFiles(TextBox1.Text)
        Dim Filename As String


        For Each Filename In Files
            sw.Write(Filename & ";")
        Next 


Ich möchte gerne den reinen Dateinamen haben, nicht den kompletten Pfad.
Ich hab schon gegooglet und mir die IO Path Klasse angeguckt, aber habe nichts hilfreiches gefunden.

Grüße
RoleS

[MoepMeep]

Originally Posted by RoleS

Danke für die Antworten.
Es funktioniert.

Ich hab länger in VB nix gemacht, deswegen muss ich mich erst wieder reinarbeiten.

€: Doch noch ne kleine Frage:

PHP Code:

 Dim Files() As String = Directory.GetFiles(TextBox1.Text)
        Dim Filename As String


        For Each Filename In Files
            sw.Write(Filename & ";")
        Next 


Ich möchte gerne den reinen Dateinamen haben, nicht den kompletten Pfad.
Ich hab schon gegooglet und mir die IO Path Klasse angeguckt, aber habe nichts hilfreiches gefunden.

Grüße
RoleS

Split das ding halt einfach :>

[RoleS]

Originally Posted by MoepMeep

Split das ding halt einfach :>

Und wie soll ich das genau anstellen?
Der Pfad + Dateiname wird ja direkt komplett ausgegeben.

Das wird in eine Textdatei geschrieben, die später ausgelesen werden soll ( Da werden die einzelnen Pfade gesplittet ).

Grüße
RoleS

[nkkk]

"System.IO.Path.GetFileName" könnte dir da helfen.

[RoleS]

Danke, habs hinbekommen :-).
Dann kann der Thread geschlossen werden.

Grüße
RoleS