Problema de programación de la base de datos vf, si se cometen errores de entrada tres veces seguidas, se prohibirá la entrada del usuario
Supongamos que el texto1 del formulario se usa para ingresar el número de cuenta, el texto2 se usa para ingresar la contraseña, el comando1 es el botón "Aceptar" y el comando2 es el botón "Salir".
El atributo contraseñachr de text2 está establecido en "*" para evitar que la contraseña se muestre en la pantalla durante el inicio de sesión.
Suponga que el número de cuenta correcto al iniciar sesión es "cuenta" y la contraseña es "123456".
Haga doble clic en el espacio en blanco del formulario de inicio de sesión, ingrese el evento de carga de form1 e ingrese:
público
dlcs
&&Variable de recuento de inicios de sesión
público
dlcs
dlcs=0
p>Cerrar el evento de carga.
Haga doble clic en comando1 para ingresar el evento de clic del botón Aceptar, ingrese:
zh1=allt(thisform.text1.value)
kl1=allt (thisform.text2 .value)
if
zh1="Cuenta"
y
kl1="123456"
=messagebox("Bienvenido a iniciar sesión")
thisform.release
hacer
formulario
menú1
&& Ingrese al formulario del menú con la contraseña correcta
else
dlcs=dlcs+1
if
dlcs >3
=messagebox("Contraseña incorrecta, adiós")
este formulario.release
hacer
formulario
quit1
&&Ingrese el formulario de salida después de tres errores
else
=messagebox("Contraseña incorrecta, vuelva a ingresar")
endif
endif