Hey, Leute!
Ich wollte einfach mal ein Makro-Programm schreiben, dachte, es sei nicht sonderlich schwierig, es auf die Beine zu stellen.
Mein Problem ist folgendes:
Ich möchte alle 10 MS die Mausposition als Variable PosX(1/2/3)/PosY(1/2/3) speichern.
Mein Code sieht so aus:
GetThem = True
CountA = 0
While GetThem = True
If Control.ModifierKeys <> Keys.Escape Then
GetThem = False
End If
CountA += 1
PosY(CountA) = Control.MousePosition.Y.ToString()
PosX(CountA) = Control.MousePosition.X.ToString()
Wartezeit(10)
End While
Ich erklär eben warum mein Code so aussieht, wie er es tut:
- Ich benutze die Funktion Wartezeit (Link), welche ich leider nicht in einer For-Schleife benutzen kann.
- Als Abbruch-Bedingung der While-Schleife steht "GetThem" (Boolean), welche bei Druck auf "Escape" "true" wird und somit die While-Schleife beendet.
- CountA ist vom Typ "Integer" und wird wie in einer For-Schleife += 1 gerechnet.
- PosX ist die X-Koordinate und soll mehrere "Arrays" (?) haben. (Sorry, kenne mich damit leider nicht so gut aus :()
- PosY ist dasselbe nur mit Y-Koordinate.
Der Fehler, den ich bekomme, zeigt auf
Und besagt:
Ich habe mir diese With-"Funktion" mal angeschaut und ehrlich gesagt keinen blassen Schimmer, wozu sie gut sein soll...
Hoffe, mir kann hier jemand helfen!
MfG,
X-Zat / Momo
Ich wollte einfach mal ein Makro-Programm schreiben, dachte, es sei nicht sonderlich schwierig, es auf die Beine zu stellen.
Mein Problem ist folgendes:
Ich möchte alle 10 MS die Mausposition als Variable PosX(1/2/3)/PosY(1/2/3) speichern.
Mein Code sieht so aus:
GetThem = True
CountA = 0
While GetThem = True
If Control.ModifierKeys <> Keys.Escape Then
GetThem = False
End If
CountA += 1
PosY(CountA) = Control.MousePosition.Y.ToString()
PosX(CountA) = Control.MousePosition.X.ToString()
Wartezeit(10)
End While
Ich erklär eben warum mein Code so aussieht, wie er es tut:
- Ich benutze die Funktion Wartezeit (Link), welche ich leider nicht in einer For-Schleife benutzen kann.
- Als Abbruch-Bedingung der While-Schleife steht "GetThem" (Boolean), welche bei Druck auf "Escape" "true" wird und somit die While-Schleife beendet.
- CountA ist vom Typ "Integer" und wird wie in einer For-Schleife += 1 gerechnet.
- PosX ist die X-Koordinate und soll mehrere "Arrays" (?) haben. (Sorry, kenne mich damit leider nicht so gut aus :()
- PosY ist dasselbe nur mit Y-Koordinate.
Der Fehler, den ich bekomme, zeigt auf
Und besagt:
Die Objektvariable oder die With-Blockvariable wurde nicht festgelegt.
Ich habe mir diese With-"Funktion" mal angeschaut und ehrlich gesagt keinen blassen Schimmer, wozu sie gut sein soll...
Hoffe, mir kann hier jemand helfen!
MfG,
X-Zat / Momo