 |
||||
|
||||
 |
Programar el ingreso de datos:
- script - modified for sle_1
if text = “” or sle_2.text = “” then
cb_1.enabled = false
else
cb_1.enabled = true
end if
- script - modified for sle_2
if text = “” or sle_1.text = “” then
cb_1.enabled = false
else
cb_1.enabled = true
end if
Programaci贸n del Bot贸n Aceptar:
- script - clicked por cb_1
If sle_1.text <> “Eduardo” Then
Beep(2)
MessageBox( “Mensaje”,”Nombre de usuario incorrecto”,StopSign!,Ok! )
sle_1.SetFocus()
sle_1.SelectText( 1,len(sle_1.text) )
ElseIf sle_2.text <> “ICA” Then
Beep(2)
MessageBox( “Mensaje”,”Contrase帽a del usuario es incorrecta”,StopSign!,Ok! )
sle_2.SetFocus()
sle_2.SelectText( 1,len(sle_2.text) )
Else
MessageBox( “Mensaje”,”Los datos son correctos”,Information!,Ok! )
End If
Programaci贸n del Bot贸n Cancelar:
- Script - Clicked for cb_2
Close( Parent )
 |
