wAlta puntuación y programación sencilla en Visual FoxPro, sistema de gestión de biblioteca\sistema de gestión de libreta de direcciones\sistema de gestión del rendimiento estudiantil....requiere código fuente y papel
Diseñe un formulario de inicio de sesión para el sistema de gestión de la biblioteca que requiera que los usuarios introduzcan el nombre de usuario (supper) y la contraseña (123) correctos.
(1) El título del formulario es "Sistema de gestión de biblioteca", el ancho del formulario es 500 y el alto es 350. Etiqueta 4: "Por los derechos e intereses legítimos suyos y de otros, por favor regístrate..." . ...", la fuente es Song Dynasty y el tamaño es 28.
○1 Pasos para crear una tabla y configuración de atributos
Archivo|Nuevo|Formulario
Atributos de formulario: TítuloSistema de gestión de libros ¿Ancho?500 Alto?350
○2 etiquetas etiqueta4 configuración de atributos
Título "Para los derechos e intereses legítimos suyos y de otros, regístrese ..."
Nombre de fuente Songti
Fontsize28
Forecolorgrb(255,0,0)
(2) El nombre de usuario corresponde al cuadro de texto texto1, usuario La contraseña corresponde al cuadro de texto texto2, el temporizador controla el temporizador1 y la etiqueta 5 se usa para mostrar información de solicitud
○1 Inicialización del formulario: define las variables utilizadas para proteger el. El número de inicios de sesión Label5 es invisible al principio y se escribe el código de evento correspondiente.
Thisform.label5.visible=.F.
Público?n
n=1
○2 Haga clic en el botón "Aceptar". Si el nombre de usuario y la contraseña son correctos, se mostrará "Bienvenido". Si el nombre de usuario y la contraseña son correctos, se mostrará "Bienvenido". "; Si el nombre de usuario es incorrecto, se mostrará "Usuario ilegal, vuelva a ingresar"; si la contraseña es incorrecta, se mostrará "La contraseña es incorrecta, vuelva a ingresar" y solo hay tres posibilidades. Si es así excede tres veces, se mostrará "Lo siento, no puede ingresar al sistema"
Al mismo tiempo, los cuadros de texto correspondientes a "Nombre de usuario" y "Contraseña" no están disponibles, escriba el código de evento "OK" :
if?alltrim(thisform.text1.value)== "super"
if?alltrim(thisform.text2.value)=="123" thisform.label5.caption ="Bienvenido" else thisform.label5.caption="Contraseña incorrecta, vuelva a ingresar" n=n+1
endif
else
este formulario. text2.value)=="123"
if?label5.caption="Usuario ilegal, vuelva a ingresar"
n=n+1
endif
este formulario.label5.visible=.t.
if?n>3
este formulario.label5.text1.enabled=.f.
thisform.text2.enabled=.f.
endif
○3 Escriba el código para el evento del temporizador 1 y la dirección del texto en la etiqueta 4 se mueve circularmente de derecha a izquierda.
Establezca el valor del atributo Intervalo en: 200
if?thisform.label4.left+thisform.label4.width>=0 thisform.label4.left=thisform.label4.left- 20
else thisform.label4.left=thisform.width
endif
○4 Botón "Salir", cierra el formulario thisform.release
Puedes cambiarlo tú mismo según tus necesidades.