Duda sobre visual basic 6

[bodka]

no es mas facil hacer esto
Option Explicit


Private Sub Form_Keydown(Keycode As Integer, shift As Integer)
If Keycode Then
Select Case Keycode
Case vbKeyL ' o con la tecla q kieras
Call Formulario ' creas un sub q esta mas abajo
End Select
End If
End Sub

Sub Formulario()
Form2.Visible = True
Form1.Visible = False
End Sub