-
21.03.2011, 20:03 #1gcpGast
Textbox1.Text = Textbox7.Text + keys.enter
Kann mir jemand sagen wie ich es schaffe das der text der in tb1 steht in tb7 geschrieben und enter gedrückt wird? weil so geht es nicht
Code:Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_start.Click Timer1.Start() Timer1.Enabled = True Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick TextBox1.Text = TextBox7.Text + Keys.Enter End Sub End Sub
-
21.03.2011, 20:08 #2
Textbox1.Text = Textbox7.Text + keys.enter
Was soll denn bei dem Enter passieren?
-
21.03.2011, 20:09 #3gcpGast
Textbox1.Text = Textbox7.Text + keys.enter
ja das der text der in tb1.text steht der soll bei einem klick auf den button in tb7.text geschrieben werden und dann soll enter gedrückt werden..ist fürn stayonline..fange grade erst an mit coden
-
21.03.2011, 20:11 #4Projektleitung
- Registriert seit
- 15.11.2011
- Beiträge
- 8.495
- Blog Entries
- 5
Thanked 9.521 Times in 3.336 Posts
Textbox1.Text = Textbox7.Text + keys.enter
So wird's auch nie funktionieren. Eine Funktion muss immer beendet werden bevor eine neue deklariert wird, du deklarierst eine zweite Funktion in der Funktion.
Wenn schon dann
Sind aber sowieso die falschen Events, das Event KeyDown tritt ein wenn eine Taste gedrückt wird. Allgemein ist dein Code ziemlich wirr und teils auch unsinnig und wird so nie funktionieren.Code:Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_start.Click Timer1.Start() Timer1.Enabled = True End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick TextBox1.Text = TextBox7.Text + Keys.Enter End Sub
Nimm das KeyDown-Event, dort musst du dann halt die gedrückte Taste mit einer if-Abfrage prüfen und dann den Text der einen TB in die andere setzen.
Lass das bloß mit dem Timer, das ist übelst ugly.
EDIT
Ok habs falsch verstanden, deine Beschreibung war auch ziemlich wirr, dachte du wolltest wenn man in der einen Textbox auf Enter drückt den Text in die andere kopieren.
In dem Fall war dein EVent richtig, du brauchst das Click-Event. Der Timer ist aber unsinnig.
In das OnClick-Event packst du einfach
Dann wird beim Klick auf den Button der Text aus TextBox7 in TextBox1 gesetzt.Code:TextBox1.Text = TextBox7.Text
-
21.03.2011, 20:11 #5
Textbox1.Text = Textbox7.Text + keys.enter
Dann schau dir mal die SendKeys.Send-Methode (System.Windows.Forms) Klasse an
.
-
21.03.2011, 20:12 #6
Textbox1.Text = Textbox7.Text + keys.enter
Code:TextBox1.Text = TextBox1.Text SendKeys.Send("{ENTER}")
-
21.03.2011, 20:13 #7gcpGast
Textbox1.Text = Textbox7.Text + keys.enter
ok so war das auch nicht..war wie du es geschrieben hattest..also
Code:Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_start.Click Timer1.Start() Timer1.Enabled = True End Sub Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick TextBox1.Text = TextBox7.Text + Keys.Enter End Sub
Das mit dem
SendKeys.Send("{ENTER}")
funktioniert..jedoch nur wenn ich in der Textbox bin wo es geschrieben werden soll..
wenn ich das programm bspw. schließe drückt er enter also nicht
-
21.03.2011, 20:19 #8
Textbox1.Text = Textbox7.Text + keys.enter
Hier der Code, falls Du mit der KNLib codest. ;>Code:c.SendMessage("K-Script.cc " & tb_Nickname2.Text, Channel)
tb_Nickname2.Text in das umändern, in das Du haben willst. ^^
-
21.03.2011, 20:22 #9Projektleitung
- Registriert seit
- 15.11.2011
- Beiträge
- 8.495
- Blog Entries
- 5
Thanked 9.521 Times in 3.336 Posts
-
21.03.2011, 20:25 #10gcpGast
Textbox1.Text = Textbox7.Text + keys.enter
So funktioniert es, aber nur wenn ich auf der Textbox drauf klicke in der es gesendet werden soll..Code:Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_start.Click Timer1.Start() Timer1.Enabled = True End Sub Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick TextBox1.Text = TextBox7.Text SendKeys.Send("{ENTER}") End Sub
Ähnliche Themen
-
Knuddels Text Bug's
Von ZarneXxX im Forum DarstellungAntworten: 0Letzter Beitrag: 03.10.2012, 20:46 -
[H] VB Text Senden
Von AmJano im Forum Knuddels ProgrammierungAntworten: 2Letzter Beitrag: 19.08.2012, 17:12 -
Text zentrieren
Von Skindred im Forum HTMLAntworten: 2Letzter Beitrag: 16.04.2012, 18:00 -
Glow Text
Von Shane im Forum Angebot & NachfrageAntworten: 1Letzter Beitrag: 04.04.2012, 20:28 -
3D Text Dingsbums. :D
Von Bossgen im Forum ShowroomAntworten: 11Letzter Beitrag: 16.02.2012, 21:25
Diese Seite nutzt Cookies, um das Nutzererlebnis zu verbessern. Klicken Sie hier, um das Cookie-Tracking zu deaktivieren.
Zitieren