[neuling] keycode

onip

Mitglied
hallo zusammen,
bin jetzt gerade 2 std mit VB beschäftigt.
ich hab vom tuten und blasen null ahnung.
bin flasher, nicht schlagen :rolleyes:
was ich gern machen würde, ist ein alert (msgbox)
das mir anzeigt welcher keycode die taste hat die gedrückt wurde.

im groben:
ich drücke "a" und es erscheint ein fenster (kann auch ein textbox sein) das mir den keycode verrät.
das soll mit allen tasten gehen.

ansätze hab ich leider keine, da ich mich erstmal in VB reindenken muß
und ich noch nichts in VB programmiert habe.

ich hoffe das ich mir jetzt kein schlechten namen mache (flasher).
die materie interesiert mich nur.

ich danke euch
 
In den Code-Teil einer Form das hier eintragen:
Code:
Private Sub Form1_KeyDown(ByVal KeyCode As Integer, ByVal Shift As Integer)
    MsgBox KeyCode
End Sub
Dann das Programm starten und wenn das Fenster aktiviert ist eine Taste drücken.

Setzt natürlich voraus das dein Form auch "Form1" heißt.
 
@momoxp
es soll mir angezeigt werden welcher tastencode z.b. "a" hat, wenn dies gedrückt wurde.
in flash wäre das 65

@retlaw
vielen dank, leider passiert da nichts. irgendetwas mach ich grundlegent falsch.
im anhang dein code, so wie ich mir das denke einzubinden.
form1 berücksichtigt.


kurz zu dem was ich vor habe.
hab hier ein tut für ein taschenrechner gefunden, dieses wollte ich nachprogrammieren. was dazu jedoch fehlt, ist die tastatur.
also, wenn ich 1 drücke, soll in die textbox auch eine 1 erscheinen.

dafür brauche ich die keycodes

später vielleicht mal sowas wie ne schreibmaschine.

danke für eure hilfe
 

Anhänge

  • keycode.zip
    1,2 KB · Aufrufe: 31
Was heißt passiert nichts ?
Wenn Form1 während der Laufzeit (wichtig) markiert ist und du eine Taste drückst kommt keine Meldung ?

Hab grad kein VB da um dein Projekt zu testen.
Welche Version verwendest du ?

Versuch mal die Sub selber zu erstellen, kann sein das ich bei den Parametern was vergessen hab:
Im Code-Editor in den ComboBoxen über dem Code links "Form" und rechts "KeyDown" auswählen.
In die automatisch generierte Sub kannst du dann eine MsgBox-Anweisung schreiben und die Parameter der Sub ausgeben.

//EDIT:
Les grad für was du das brauchst und da fällt mir was ein:
Wenn du auf der Form Steuerelemente (z.B. Buttons) hast die den Fokus haben muss die KeyPreview-Eigenschaft des Forms auf True stehen.
 
ich verwende VB 6.0

das keypreview hab ich gefunden und auf true gestellt, aber was das bezweckt, hab ich nicht verstanden.

hab gestern mal ein keycode von flash verwendet (ziffernblock 1 = 97)

PHP:
Private Sub Command1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 97 Then Text1 = Text1 + "1"
End Sub

das , aber die weiteren nicht

ziffernblock 2 = 98
ziffernblock 3 = 99

in gewisser weise hab ich es schon, aber ich glaub nicht das ich die keycodes von flash verwenden kann.
daher den weg herauszufinden welche keycodes die einzelnen tasten haben.

....

hey, ich merk gerade das 1-3 doch geht.
und zwar nur wenn der button gerade aktiv ist.
wenn ich die 1 (maus) drücke, kann ich die 1 (zifferblock) drücken, ,
aber nicht die 2 oder 3. geht erst wenn ich dies markiert habe.

hab also schon 50% :)
jetzt noch der rest, freu, es geht voran.
 
Zuletzt bearbeitet:
Command1_KeyUp macht hier wenig Sinn.
Dieses Ereignis springt nur an wenn Command1 den Fokus hat und du eine Taste drückst.

Wenn die KeyPreview-Eigenschaft des Forms auf True steht werden Tastatur- und Maus-Ereignisse zuerst an das Form geleitet, dann kannst du in Form1_KeyUp alle Tastenanschläge über einen Select-Case abfangen.
 
Also hier ist jetzt mal der normale code mit dem du so fenster öffnen kannst!

Private Sub Form1_Click ()
Msgbox Prompt:="Da deinen Text eingeben"
End Sub

so des müste es gewesen sein!
dann kannst du ja noch den code umänder (die Click funktion)

und des was du eigentlich haben willst mit dem code anzeigen!
weis ich leider auch nicht! bin auch noch net so lange am Code schreiben!

gruß Cracked
 
Zurück