Al presionar un botón activar una tecla del teclado en visual Basic 6

hola buen día tengo esta duda espero me puedan ayudar quiero que presione un botón en visual y me active una tecla , intente este código

Private Sub Command1_Click(KeyCode As Integer, Shift As Integer)
MsgBox ("Se Ha Soltado la Tecla")
Sendkey "{ESC}"
End Sub