[vb6] Op button klikken dmv ctrl+enter

[Verwijderd]

Ik heb een simpel programma'tje gemaakt waarmee ik op school makkelijk berichten via het commando net send kan sturen. (gewoon naam kiezen van klasgenoot en typen maar)

Hij werkt helemaal, alleen krijg ik het niet voor elkaar om de send button in te klikken met de ctrl+enter toetsencombinatie.
Ik kan wel gewoon bij de preferences van de button kiezen dat de knop wordt ingedrukt als ik op enter druk, maar niet een combinatie van toetsen.

Ik heb op internet en dus ook hier op GOT gezocht naar een voorbeeld, maar ik kan nergens iets nuttigs vinden.

Bij de help zie ik wel iets staan van KeyPress, maar ik kan daar zo niets mee aan te praat krijgen.
Hoe moet dit kleine probleempje worden opgelost?

[RayNbow]

Visual Basic 6:

Option Explicit

Dim CtrlDown As Boolean

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    CtrlDown = (Shift And vbCtrlMask) > 0
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
    If (KeyAscii = 10 Or KeyAscii = 13) And CtrlDown Then
        MsgBox "Ctrl+Enter"
    End If
End Sub

Private Sub Form_Load()
    Me.KeyPreview = True
End Sub