Hi, ich habe ein programm geschrieben, das mir erleichtert meine blacklist in nem ame abzulaufen aber ich will, anstatt selbst die Zeilen markieren das wennn ich F12 drücke (hab ich mit asynckeystate gemacht) das es zuerst das erste sendet, dann das zweite dannn das dritte. aber falls Item 4 nciht vorhanden ist soll es 4 auch nicht eintragen, also nur die ausgefülten Zeilen.
ALLE Listboxeinträge mit senkeys Senden
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 16 Antworten in diesem Thema. Der letzte Beitrag () ist von Dendem.
-
-
-
-
-
-
-
-
Das hintereinander machst du mit der Schleife durch die ListBox Items.
Hey man das sind alles Grundlegende Sachen von VB. Wenn du nichtmal weißt wie eine Schleife durch eine Liste machst, dann lies dir mal Galileo OpenBooks durch. Wie gesagt 3 Zeilen Code, simpelster art und deswegen bekommste sicher keine Copy & Paste Code von mir. Wenn du Proggen willst, dann musst du auch bereit sein zu lernen und vorallem auch mal VERSUCHEN Probleme SELBSTSTÄNDIG zu lösen. Da sind Google und MSDN gute anlaufstellen. -
Also dennis, das muss man doch wissen
Ich hab das ganze mal so gelöst:
Das wird jetzt halt n bisschen Copy and Paste :D VB.NET-Quellcode
- On Error Resume Next
- Dim i As Integer
- For i = 0 To ListBox1.Items.Count - 0
- ListBox1.SelectedIndex = i
- ListBox2.SelectedIndex = i
- ProgressBar1.Value = i
- ProgressBar2.Value = i
- Windows.Forms.Cursor.Position = New Point(ListBox1.SelectedItem, ListBox2.SelectedItem)
- If ListBox1.SelectedItem = "klick" Then
- mouse_event(mouseclickdown, 1, 23, 23, 23)
- mouse_event(mouseclickup, 0, 0, 0, 0)
- ElseIf ListBox1.SelectedItem = "a" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "b" Then
- SendKeys.Send(Keys.B)
- ElseIf ListBox1.SelectedItem = "c" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "d" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "e" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "f" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "g" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "h" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "i" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "j" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "k" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "l" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "m" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "n" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "o" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "p" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "q" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "r" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "s" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "t" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "u" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "v" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "w" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "x" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "y" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "z" Then
- SendKeys.Send(Keys.A)
- ElseIf ListBox1.SelectedItem = "enter" Then
- SendKeys.Send(Keys.Enter)
- ElseIf ListBox1.SelectedItem = "alt" Then
- SendKeys.Send(Keys.Alt)
- End If
- Next
Edit:
ich weiß jetzt aber nicht, ob ichs richtig verstanden hab... -
also die Schleife:
For i As Integer = 0 To ListBox1.Items.Count - 1
If GetAsyncKeyState(Keys.F12) Then SendKeys.Send(ListBox1.Items(i))
Next
aber ich will jetzt das er vor jedem Word noch ein /kick macht und nach jedem wort enter senden also erste Zeile:
/kick Player1 ("{ENTER}")
/kick player2 ("{ENTER}")
und so weiter, das bekomme ich leider ncht hin, pls help -
-
-
Nur mal so, ein EDIT ist nur dann ein EDIT, wenn er in einem bestehenden Post von dir gemacht wird. In diesem Fall dein vorletzter. Edit ist gerade dafür gedacht um jene doppel Posts zu vermeiden die du hier gemacht hast.
Sollte es "ausversehen" mal passiert sein kannste nochma richtig Editieren und einen Mod bitten den anderen überflüssigne Post zu löschen! -
TG22997 schrieb:
Tja, so nen Code is scheiße, sry.
Hast du damit den von asdf gemeint??
Für nen Anfänger is der doch garnet so übel -
-
-
-
Ähnliche Themen
-
LioLKG - - Sonstige Problemstellungen
-
TCPClient über TCP Verbindung übermitteln
Kevin Hombre - - Sonstige Problemstellungen -
Mr. VB 2008 Man - - Sonstige Problemstellungen
-
2 Benutzer haben hier geschrieben
- Gast (16)
- Fortender (1)