Toon posts:

[vb] KeyDown doet het niet altijd

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik ben nu bezig met VB6, en wilde een toetsactie definiëren. Dit is niet zo moeilijk, aangezien hier een speciale functie voor is die dit afvangt, echter dit is een methode voor een formulier, en als ik dus een object (bv een lijst) op dat formulier zet, dan doet de methode Form_KeyDown niets meer zodra die lijst de focus krijgt. Nu heb ik geprobeerd om zodra die lijst de focus krijgt, die focus weer terug te geven aan het formulier, maar dit werkt niet...
Iemand een oplossing??
code:
1
2
3
4
5
6
7
8
9
10
11
12
'Methode voor het teruggeven van de focus
Private Sub List1_GotFocus()
    frmWelkom.SetFocus
End Sub

'KeyDown methode
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    '65 = A
    If KeyCode = 65 Then
      List1.AddItem ("Test")
    End If    
End Sub

Verwijderd

keypreview property van je form op true zetten doet wonderen.

Verwijderd

Topicstarter
Thanks, sorry wist niet dat het zo simpel was.

  • Crazy D
  • Registratie: Augustus 2000
  • Laatst online: 09-09 16:14

Crazy D

I think we should take a look.

Als je de key niet altijd wilt afvangen, maar alleen als 1 bepaalde control de focus heeft, kun je ook het keydown event van de control gebruiken.

Exact expert nodig?