Tema: matar un proceso con combinación de teclas en VB6 o similar

cauros cauros, ayudenme un poco, la cosa es que quiero matar un proceso pero solo si apreto por ejemplo la letra "A" y la "B" al mismo tiempo, solo eso necesito, es para mi arcade, ya que no sé por qué pero me está mandando la tecla escape aleatoriamente y se me sale del mame, entonces quería dejar el salirse con una combinación de teclas, help plz

---
edito, me resultó combinar el escape y el uno, asi que pueden cerrar plz

Código:

  Option Explicit
    '***************************************************************************
    '*  Nota: Colocar la propiedad KeyPreview del formulario en True
    '***************************************************************************
      
    'Variable booleanas para determinar si está presionadas las teclas
    Dim Escape As Boolean, One As Boolean
    
    
      
    'Constantes de las teclas Alt, Ctrl y a
    Private Const vbKeyEscape = 27
    Private Const vbkeyOne = 49
    
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
      
            'Verifica las teclas
            If KeyCode = vbKeyEscape Then Escape = True
            If KeyCode = vbkeyOne Then One = True
            
            
      
            'Si las 2 variables están en True .. mostramos un mensaje
            If Escape And One Then
                MsgBox "Hola"
                Form_KeyUp 0, 0
            End If
      
    End Sub
      
    Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
          
        'Cuando se produce KeyUp ponemos las variables en false
        Escape = False
        One = False
    End Sub
      
    Private Sub Form_Load()
      
        'Establecemos la propiedad KeyPreview para que el formulario _
        'intercepte cualquier intento de presión de tecla
      
        Me.KeyPreview = True
      
        Me.Caption = " Ejemplo de  combinación de teclas "
      
        MsgBox " Deja apretado escape y despues apretas el 1, si sale bien te va a salir un saludo xD", vbInformation
      
    End Sub