Visual Basic - Urgente con una duda amigos!!!!

Life is soft - evento anual de software empresarial
 
Vista:

Urgente con una duda amigos!!!!

Publicado por Bendecido (5 intervenciones) el 09/02/2005 23:31:22
Hola amigos, tengo una problematica, ya que estoy utilizando la propiedad Keypreview y coloco el siguiente codigo en mis formularios para ser llamados al pulsar una tecla:
<<< FRMPLANTILLA3 >>>
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 120 Then
FRMmanterangos.Show 1
Else
If KeyCode = 121 Then
FRMcontrasena2.Show 1
end if
end if
end sub

Y funciona perfectamente, el asunto se me presenta que cuando cargo el formulario FRMcontrasena2 el me va a pedir unas condiciones que de acuerdo el boton que pulso el usuario se va a dirigir al otro formulario. El codigo es el siguiente:
<<< FRMcontrasena2 >>>
Private Sub cmdingresar_Click()
If FRMplantilla3.CMDlevantar.Value = True Then
FRMceobj_levantar.Show 1
Unload Me
Else
If FRMplantilla3.CMDmodificar.Value = True Then
FRMceobj_modi.Show 1
Unload Me
end if
end if
end sub

El problema radica en que cuando hago click en los botones el me cumple la condicion perfectamente ya que la propiedad value cambia a true al hacer click pero resulta que cuando lo utilizo por teclado al pulsar la tecla no me cumple la condicion y es como que si no cambiara la propiedad a True sino que se mantiene en False. Como puedo hacer para que me admita tanto sea por mouse como actualmente lo hace como al pulsar la tecla la cual programe con el KeyCode.. Gracias por la ayuda amigo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder