Hola de nuevo... realmente me la vivire aqui!!! ya me gusto el foro jeje
Bueno ya termine el problema del post anterior pero despues de la calma surge otro gran problema... tengo otro programa que es un reloj despertador donde puedes agregar diferencias horarias de otros paises pero... me an pedido que le ponga password con oportunidad de dar la clave erronea 3 veces.. una vez fallando las 3 veces debe cerrarse el programa... este es el codigo que le puse al formulario clave y aun no se como darle la funcion de fallar 3 veces... necesido de su enseñanza... jeje
ya le intente de varias formas y aun no puedo:
Private Sub Clave_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Clave.Text = "RMR" Then
Unload Me
FrmReloj.Show
Else
MsgBox "Clave Incorrecta...", 16, "Error"
End
End If
End If
End Sub
Ese es el codigo y de verdad gracias
con ustedes aprendo mas que es lo que me hace falta...
SOLUCION:
Gracias a todos por su aporte:
dim control as Integer
Private Sub Clave_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Clave.Text = "RMR" Then
Unload Me
FrmReloj.Show
Else
MsgBox "Contraseña incorrecta",vbcritical,"Acceso Denegado"
control=control+1
if control=3 then
End
end if
End If
End If
End Sub
Mostrar Mensajes
esto funciona con windows XP ?
