Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zwischenablage
Autor: mst547
Datum: 31.03.03 15:20
Meiner Ansicht nach ist der angegebene Code auch nicht ganz korrekt. Ich versuche mal eine Korrektur:   t(Text1.Text, vbCrLf) 'Gesamten Text in Einzelteile zerlegen (Hilfe zur Split-Funktion: Cursor auf Split setzen und F1 drücken) Text2.Text = buffer(1) 'Zweite Zeile (Index beginnt mit 0) in das zweite Textfeld verschieben Text1.Text = "" 'Inhalt des Textfeldes löschen For i = 2 To Ubound(buffer) 'Alle restlichen Zeilen behandeln: Text1.Text = Text1.Text & buffer(i) & vbCrLf 'Jeweils eine Zeile zum Textfeld wieder hinzufügen und immer ein vbCrLf anfügen, also ein Zeilenumbruch-Zeichen Next i Text1.Text = Left(Text1.Text, Len(Text1.Text) - 2) 'Letztes Zeilenumbruch-Zeichen wieder entfernen (da dieses ursprünglich wahrscheinlich auch nicht da war)[\code] --- Für die Funktion dieses Codes wird keine Garantie übernommen ---

Zwischenablage	102	Moritz K.	29.03.03 18:23
Re: Zwischenablage	376	Nightlight	29.03.03 22:30
Re: Zwischenablage	46	Moritz K.	31.03.03 15:02
Re: Zwischenablage	359	Nightlight	31.03.03 15:13
Re: Zwischenablage	362	mst547	31.03.03 15:20
Re: Zwischenablage	360	mst547	31.03.03 15:23
Re: Zwischenablage	34	Moritz K.	01.04.03 19:13

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen