Postada em 31/05/2005 10:38 hs
Amigos fiz o seguinte:
If Month(txtdata) = 5 And Year(txtdata) = 2005 And Text2 = "123" Then
MsgBox "Código liberado"
Combo1.Enabled = True
txtsenha.Enabled = True
Else
MsgBox "código não é válido"
Text1 = Empty
End If
Este código é dado no inicio do programa, e faz o seguinte, quando a data chegar ao mês 5, ele pedi o text2 que é um código de liberação o usuario digita 123, e pronto liberou o acesso.
Agora como eu faço para que:
depois que o usuário digitou o valor 123, o text2 fica gravado com "123" e não peça mais pro usuario digitar. é como se fosse um serial.
|
