Código fuente de la libreta de direcciones de Android

Diseñe un formulario de inicio de sesión para un sistema de gestión de biblioteca que requiera que los usuarios ingresen el nombre de usuario (cena) y la contraseña (123) correctos.

(1) El título de la tabla es "Sistema de gestión de biblioteca", el ancho de la tabla es 500, el alto es 350 y la etiqueta 4: "Por los derechos e intereses legítimos suyos y de otros , regístrese ", la fuente es Song Dynasty, el tamaño de fuente es 28.

1 Crear pasos de formulario y configuración de atributos

Archivo|Nuevo|Formulario

Atributos del formulario: ¿título? Sistema de Gestión de Biblioteca

¿Ancho? 500

¿Altura? 350

○2 Configuración del atributo label label4

¿Título? "Para defender sus derechos e intereses legítimos y los de otros, regístrese..."

¿Nombre de fuente? Dinastía Song

¿Tamaño de fuente? 28

¿Color de primer plano? grb(255, 0, 0)

(2) El cuadro de texto correspondiente al nombre de usuario es text1, el cuadro de texto correspondiente a la contraseña del usuario es text2 y los controles del temporizador timer1 y label5 se utilizan para mostrar información rápida.

○1 Inicialización de formulario: Defina variables para proteger el número de inicios de sesión. Inicialmente, la etiqueta5 es invisible y se escribe el código de evento correspondiente.

Este formulario.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 es incorrecto. Se mostrará "Usuario ilegal, vuelva a ingresar"; si la contraseña es incorrecta, se mostrará "Contraseña incorrecta, vuelva a ingresar", y solo hay tres posibilidades. Más de tres veces se muestra "Lo siento, no se puede ingresar al sistema".

Al mismo tiempo, los cuadros de texto correspondientes a "Nombre de usuario" y "Contraseña" no están disponibles, por lo que se muestra el código de evento "OK". está escrito:

¿Y si? all trim(this form . text 1 . value)== " super "

¿Si? all trim(este formulario . texto 2 . valor)= = " 123 "

Este formulario.label5.caption= "Bienvenido"

Otro

Este formulario.label5 .caption= "Contraseña incorrecta, vuelva a ingresarla"

n=n 1

endif

Otro

Este formulario.label5. caption = "Usuario ilegal, vuelva a ingresar"

n=n 1

endif

thisform.label5.visible=.t.

¿Y si? n gt三

Thisform.label5.caption= "Lo sentimos, no puedes acceder al sistema"

este texto del formulario habilitado = .

este formulario.text2.enabled=.f.

endif

○3 Escriba el código de evento del temporizador del temporizador1 para indicar que la dirección del texto en la etiqueta4 se mueve circularmente de derecha a izquierda.

Establezca el valor del atributo Intervalo en: 200

¿Y si? este formulario etiqueta 4 . dejó este formulario etiqueta 4 . ancho gt ； = 0

este formulario .

este formulario. etiqueta 4. izquierda = este formulario.

endif

○4 El botón "Salir" cierra el formulario.

Este formulario.Release

Puedes realizar tus propios cambios según sea necesario.