anoniem Geplaatst: 19 april 2002 Delen Geplaatst: 19 april 2002 Hoi allemaal Ik maak even een form met twee textboxen. Text1 en text2. Ik plaats de volgende code onder KeyPress van text1. [code:1:37edd204b1] Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = vbKeyReturn Then Text2.SetFocus ElseIf KeyAscii = vbKeyUp Then Text2.SetFocus ElseIf KeyAscii = vbKeyDown Then Text2.SetFocus Else End If End Sub [/code:1:37edd204b1] Als ik nu op Enter druk dan gaat de focus van text1 naar text2. Hoe komt het dat vbKeyReturn wel werkt, en vbKeyUp en vbKeyDown niet ? :sad: :sad: :sad: Groetjes Yvonne Quote Link naar reactie
anoniem Geplaatst: 19 april 2002 Auteur Delen Geplaatst: 19 april 2002 Zegt dit je iets? komt uit de handleiding: Use KeyDown and KeyUp event procedures to handle any keystroke not recognized by KeyPress, such as function keys, editing keys, navigation keys, and any combinations of these with keyboard modifiers. Unlike the KeyDown and KeyUp events, KeyPress doesn't indicate the physical state of the keyboard; instead, it passes a character. Quote Link naar reactie
anoniem Geplaatst: 20 april 2002 Auteur Delen Geplaatst: 20 april 2002 In de index van msdn kan ik geen vbKeyReturn vinden maar dat is niet zo belangrijk. Wel zie ik KeyUp en KeyDown als events, tezamen met de reden waarom ik juist die events zou willen gebruiken. Alles precies zoals ultrasaurus al zei. Wat ik me avfraag is wat je wilt bereiken met vbKeyUp en vbKeyDown, zo deze al bestaan. Is het de bedoeling dat iedere toets die niet door Keypress behandeld wordt hetzelfde doet als de vbKeyReturn toets? _________________ Interdum stultus bene loquitur [ Dit bericht is bewerkt door: D. Waas op 2002-04-20 09:16 ] Quote Link naar reactie
anoniem Geplaatst: 20 april 2002 Auteur Delen Geplaatst: 20 april 2002 Hoi Tja, kijk in je MSDN directory. Daar staan lijsten met deze "keys" Ik moet snel getallen invoeren, na return moet de cursor naar de onderliggende textbox. Ook wil ik ophoog en omlaag kunnen met de pijltjestoetsen, voor als je wat wilt wijzigen b.v. groetjes, Yvonne Quote Link naar reactie
anoniem Geplaatst: 20 april 2002 Auteur Delen Geplaatst: 20 april 2002 Wellicht heb je hier wat aan: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyDown Then Text2.SetFocus End If End Sub [ Dit bericht is bewerkt door: Ultrasaurus op 2002-04-20 23:11 ] Quote Link naar reactie
anoniem Geplaatst: 21 april 2002 Auteur Delen Geplaatst: 21 april 2002 Hoi Hartstikke bedankt Ultra. groetjes, Yvonne Quote Link naar reactie
anoniem Geplaatst: 21 april 2002 Auteur Delen Geplaatst: 21 april 2002 Hoi Ultrasaur[b:779af00684]I[/b:779af00684]us Nee, dat is het ook niet. Ik denk toch KeyAscii en dan de ascii waarden van pijltje up en down afvangen. Moet alleen bedenken hoe, want dat zijn waarden met een 0 (nul) ervoor. Maar toch bedankt, groetjes, Yvonne Quote Link naar reactie
anoniem Geplaatst: 21 april 2002 Auteur Delen Geplaatst: 21 april 2002 Hoi Ultrasaurius Eén woord: OEPS :oops: Het is toch wel goed. Door tikfoutje van Yvonne is het niet goed gegaan. groetjes, Yvonne :wink: ps Ik denk altijd nog met wat QB ervaring. [code:1:30b3581ee1] DO Toets$= "" DO Toets$= INKEY$ LOOP WHILE Toets$ = "" etc etc [/code:1:30b3581ee1] _________________ -Y&F- [ Dit bericht is bewerkt door: Yvonne op 2002-04-21 21:23 ] Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen