key changer

[joeppoep12]

Hallo ik ben een programma aan het maken maar nu is het de bedoeling dat als je da A intypt de E op het beeldscherm komt te staan dus een soort van key changer. dus a = e

weet iemand een code hoe ik da kan doen ?

alvast bedankt.

Joep

 

[The Mighty Atom]

Zet onder het KeyDown event van bijvoorbeeld een textbox:

        Select Case e.KeyCode

            Case Keys.A
                TextBox2.Text += "e"

            Case Keys.B
                TextBox2.Text += "r"

            Case Keys.C
                TextBox2.Text += "t"

        End Select

 

[joeppoep12]

dankje wel, is er ook een manier om het niet in een textbox te typen maar gewoon op je pc ??

edit: hij doet het wel maar als je Select Case e.KeyCode

Case Keys.A
TextBox2.Text += "e"

Case Keys.B
TextBox2.Text += "r"

Case Keys.C
TextBox2.Text += "t"

End Select

gebruikt dan komt nu bij de A de E maar de A zelf ook en dat moet niet

 

[The Mighty Atom]

Selecteer je main form en zet de property Key Preview op True.

Ga dan naar dit topic: http://www.helpmij.nl/forum/showthr...tions-willen-niet-gaan?highlight=KeyboardHook

In post nummer 3 leg ik uit hoe je gebruik maakt van een keyboardhook. In datzelfde topic vind je ook een link naar een voorbeeld.

De code die ik eerder heb gegeven blijft onveranderd.

 

[joeppoep12]

Heel erg bedankt, echt waar .

 

[joeppoep12]

maar die vb beeld bestand doet het niet webpagina bestaat niet meer

 

[The Mighty Atom]

Hmmm drommels. Vaag. Dacht die link doet het nog wel, maar blijkbaar heb ik em dus verwijderd. Dan houd het effe op.

Maar ook zonder dat voorbeeld moet het wel lukken om een keyboard hook te maken. Probeer het maar en ik hoor het wel als iets niet lukt.

 

[NPS25]

edit: hij doet het wel maar als je Select Case e.KeyCode

Case Keys.A
TextBox2.Text += "e"

Case Keys.B
TextBox2.Text += "r"

Case Keys.C
TextBox2.Text += "t"

End Select

gebruikt dan komt nu bij de A de E maar de A zelf ook en dat moet niet

misschien moet je dan de +jes weghalen:

            Case Keys.A
                TextBox2.Text = "e"

            Case Keys.B
                TextBox2.Text = "r"

            Case Keys.C
                TextBox2.Text = "t"
        End Select

ik weet niet zeker maar ik denk dat dat het antwoord is

Groetjes,
Nick

 

[The Mighty Atom]

Het was niet de bedoeling dat je in diezelfde textbox zou typen. Ik had twee textboxen, in de eerste typ je de letters, en in de tweede textbox verschijnen dan de andere letters dus een 'e' als er in de eerste textbox een 'a' werd getypt.

In dat geval moet je die plusjes laten staan anders wordt de textbox steeds weer leeggehaald.

 

[NPS25]

ja ik dacht al dat het niet klopte van wat ik zei...:d
maar het was ook een gok, ik had het verder niet uitgetest