Zeilenumbruch in TextBox
(Beim 2. mal Button drücken)
Schön guten Abend,
also ich habe jetzt schon viel zu lange gesucht und nichts gefunden, denke aber das dürfte nicht schwer sein:
Ich habe eine "Quell-Textbox" und eine "Ziel-Textbox". Der Inhalt der Quelltextbox soll beim drücken eines Buttons in die Zieltextbox übertragen werden. Soweit ist's ja recht leicht.
Jetzt will ich aber erreichen, dass wenn man den Button ein zweites mal drückt, der neue Inhalt eine Zeile tiefer dargestellt wird und der alte natürlich bleibt.
Ich hoffe das war verständlich.
P.S.: Das ganze mache ich mit Visual Basic 6
Und hier noch ne Grafik meiner Vorstellung
Schön guten Abend,
also ich habe jetzt schon viel zu lange gesucht und nichts gefunden, denke aber das dürfte nicht schwer sein:
Ich habe eine "Quell-Textbox" und eine "Ziel-Textbox". Der Inhalt der Quelltextbox soll beim drücken eines Buttons in die Zieltextbox übertragen werden. Soweit ist's ja recht leicht.
Jetzt will ich aber erreichen, dass wenn man den Button ein zweites mal drückt, der neue Inhalt eine Zeile tiefer dargestellt wird und der alte natürlich bleibt.
Ich hoffe das war verständlich.
P.S.: Das ganze mache ich mit Visual Basic 6
Und hier noch ne Grafik meiner Vorstellung
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 59373
Url: https://administrator.de/contentid/59373
Ausgedruckt am: 05.11.2024 um 17:11 Uhr
3 Kommentare
Neuester Kommentar
Hallo DonSimeo!
Der folgende Ansatz sorgt dafür, dass ab dem zwiten Klick auf den Button jeweils zunächst eine Zeilenschaltung in der ZielTextBox eingefügt und erst danach der Inhalt der QuellTextBox dem vorhandenen Text hinzugefügt wird. Voraussetzung für das ganze Vorhaben ist natürlich, dass die Eigenschaft "MultiLine" der ZielTextBox auf "True" gesetzt wurde.
Die Schalter-Variable "ButtonPressed" wird vor dem Code deklariert und gilt daher in jedem Sub (könnte also zB bei "QuellTextBox_Change()" wieder zurückgesetzt werden, etc).
Grüße
bastla
Der folgende Ansatz sorgt dafür, dass ab dem zwiten Klick auf den Button jeweils zunächst eine Zeilenschaltung in der ZielTextBox eingefügt und erst danach der Inhalt der QuellTextBox dem vorhandenen Text hinzugefügt wird. Voraussetzung für das ganze Vorhaben ist natürlich, dass die Eigenschaft "MultiLine" der ZielTextBox auf "True" gesetzt wurde.
Dim ButtonPressed As Boolean
Private Sub Button_Click()
If ButtonPressed Then ZielTextBox.Text = ZielTextBox.Text & vbCrLF
ZielTextBox.Text = ZielTextBox.Text & QuellTextBox.Text
ButtonPressed = True
End Sub
Grüße
bastla