Lenguaje fácil para operar la base de datos MDB, por favor dame algún consejo

Es una declaración SQL, solo use la conexión de base de datos 1 y el conjunto de registros

¿Versión 2

? ¿Biblioteca de soporte? >.¿Si es verdadero?(Conexión de base de datos 1. ¿Acceso de conexión? (¿Obtener el directorio en ejecución?()?＋?"\MDB.mdb",?"")?=?False)

¿Cuadro de información? ( "¡Error al conectarse a la base de datos!",?0,?)

¿Regresar?()

Si es verdadero, finalizar

Conjunto de registros 1. ¿Establecer la conexión?(Conexión de base de datos 1)

.Versión?2

.¿Biblioteca de soporte?eDB

sql?＝?"insertar?en?tabla de comunicación (nombre, número de teléfono, dirección )?valores?('"?＋?Cuadro de edición 1. ¿Contenido?＋?"','"?＋?Cuadro de edición 3. ¿Contenido?＋?"','"?＋?Editar cuadro 2. ¿Contenido?＋? "')"

.Si?(_Iniciar ventana.Conexión de base de datos 1.Ejecutar SQL?(sql)?=?False)

¿Cuadro de información? ("¡Error al agregar el registro! ”,?0,?)

.Versión?2

.¿Biblioteca de soporte?iext

.Biblioteca de soporte?eDB

¿Temporal ?＝?“actualización?Tabla de comunicación?set?nombre='”?＋?Cuadro de edición 1. ¿Contenido?＋?“', número de teléfono='”?＋?Cuadro de edición 3. ¿Contenido? ＋?“', dirección=' "?＋?Cuadro de edición 2. ¿Contenido?＋?"'?where?number="?＋?Super cuadro de lista 1. ¿Obtener título? (Super cuadro de lista 1. ¿Elemento seleccionado actualmente? 0)

.If?(_Iniciar ventana.Conexión de base de datos 1. ¿Ejecutar SQL?(temporal)?=?False)

Cuadro de información?("Error al cambiar los datos",? 0,?)

Cuadro de edición 2. ¿Contenido?=?Temporal

.Versión?2

.Biblioteca de soporte?iext

.Biblioteca de soporte?eDB

SQL?＝?“delete?from?communication table?where?number=”?＋?Super cuadro de lista 1. ¿Obtener título (Super cuadro de lista 1. Elemento seleccionado actual, ? 0)

.If?(_Iniciar ventana.Conexión de base de datos 1. ¿Ejecutar SQL?(SQL)?=?False)

Cuadro de información?("¡Error al eliminar datos!@ ",?0,?)

. En caso contrario