Estoy esperando que un experto en Internet me ayude a analizar el significado de estos códigos fuente de VB. Realmente no tengo idea, ¡lo siento!

En términos generales, este es un formulario para agregar información del lector. Si el número de lector ingresado ya existe, la ventana se cerrará automáticamente; de ​​lo contrario, se agregará nueva información (similar a registrar un nuevo lector).

Puede. Como se puede ver en el código Al control

Comando1 comienza a agregar, Comando2 cierra la ventana

Tipo de lector Combo1. Género combo2

Nombre del lector Text1, número del lector Text2

Tres funciones Command1_Click, Command2_Click (cerrar ventana), primero define rs_addreader como una variable global del tipo de conjunto de datos

Luego la función

Command1_Click hace clic en el botón 1

Primero es el juicio de validez

Si Combo1 está vacío, aparecerá el mensaje "Seleccione el tipo de lector". configure Combo1 para obtener el foco y luego salga del proceso

Si Texto1 está vacío, aparecerá el mensaje "El nombre del lector no puede estar vacío", establezca Texto1 como foco y luego salga del proceso

Si Texto2 está vacío, aparecerá el mensaje "el número de lector no puede estar vacío" y establecerá Texto2 como foco,

y luego ejecutará la instrucción SQL "seleccione * de la información del lector donde número de lector = **" (** es el valor ingresado en Text2 Reader ID)

Si la base de datos no existe en la información del lector, el ID del lector no debe estar vacío.

Si este número de lector no existe en la base de datos (es decir, este lector no se ha registrado antes), para agregarlo a la base de datos, rs_addreader.AddNew es una declaración de control de adición que debe agregarse antes los datos están listos., seguido de rs_addreader.Fields(0)=Trim(Text1.Text) este tipo de datos, cada campo debe agregarse porque no existe en la base de datos. Fields (0) = Trim (Text1.Text), lo que significa que es necesario agregar los datos de cada campo. Dado que no hay una base de datos a la que hacer referencia, no está claro cuál es la información correspondiente, pero generalmente es un número. nombre, edad (fecha de nacimiento), lugar de nacimiento, dirección, etc. Por cierto, rs_addreader.Update significa actualizar La tarea anterior no agregó datos, pero este paso realmente debe agregarse y luego aparecerá. "¡Agregue información del lector exitosamente!" y cierre la base de datos

Si el número del lector ya existe en la base de datos (es decir, el lector ya se ha registrado), aparecerá el mensaje "Número de lector duplicado". Y establezca Texto1 como foco, luego borre Texto1, cierre la base de datos, salga del proceso

Luego Form_Load

Combo2 agrega opciones (masculino, femenino)

Luego Abra la base de datos, ejecute la instrucción "seleccionar * de la categoría del lector", agregue las categorías del lector existentes en la base de datos a Combo1 y luego cierre la base de datos

.