¿Cómo agregar datos a EXECL en idioma Yi? Quiero usar EXECL para crear datos de inventario de datos.

Utilice el entorno de programación Easy Language para crear un "programa de ventana de Windows". Haga clic en el elemento del menú "Herramientas" -> "Configuración de la biblioteca de soporte".

En la ventana que se abre, busque y marque "Biblioteca de soporte de objetos general versión 2.0" y haga clic en "Aceptar" para agregar el componente "Super List Box".

A continuación, dibuje la interfaz como se muestra en la figura en la "Ventana de inicio", que incluye los componentes una "Base de datos externa" y un "Super List Box" (se puede encontrar en el panel de extensión).

Luego usa Excel para crear un archivo Excel llamado "jiance.xls". Su contenido es como se muestra en la figura:

Nota: Coloque este archivo en el mismo directorio que el programa Easy Language.

5. Asegúrese de que "Ventana de inicio" esté seleccionada y luego agregue un evento "Creado".

Luego ingrese el código de idioma Yi como se muestra en la imagen:

Versión 2

. Biblioteca de soporte iext

. " ODBC; DBQ = " + Obtener el directorio actual () + " \jiance.xls; Controlador = {Controlador de Microsoft Excel (*. 5; ReadOnly=0; SafeTransactions=0; Threads=3; UID=admin; UserCommitSync=Sí ;", , ) = False)

Cuadro de información ("¡Error en la conexión a la base de datos!", #Icono de error, )

Retorno ()

. Si es verdadero end

Declaración de consulta = “seleccione * de [Hoja1$]”

Conjunto de registros = Base de datos externa 1. Consulta (declaración de consulta)

Si es verdadero (. conjunto de registros = 0)

Cuadro de información ("¡La consulta falló!", icono #Error, )

Retorno()

.Finalizar si es verdadero

Base de datos externa 1. Vaya al primer registro (conjunto de registros)

Partial_count = 1

Super cuadro de lista 1. Inserte la columna (, "número de serie", 80, , , )

Cuadro de lista súper 1. Insertar columna (, "nombre", 80, , , )

Cuadro de lista súper 1. Insertar columna (, "Género", 80, , , )

Cuadro de lista superior 1. Insertar columna (, "Edad", 80, , , )

Encabezado del bucle de juicio (base de datos externa 1. después del último registro (conjunto de registros). ) = false)

Partial_temporary A = base de datos externa 1. lectura (conjunto de registros, 1)

p>

local_temporary B = external_database1.read(conjunto de registros, 2)

local_temporary C = to text(externaldatabase1.read(recordset, 3))

p>

Índice = Super cuadro de lista 1. Insertar entrada (, , , , , )

Super cuadro de lista 1. Establecer título (índice, 0, a texto (local_count))

Super cuadro de lista 1. Establecer título (índice, 1, parcial_temporal A)

Cuadro de lista súper 1. Establecer título (índice, 2, parcial_temporal B)

p>

Cuadro de lista súper 1. Establecer título (índice, 3, temporal_parcial C)

Base de datos externa 1. Ir al siguiente registro (conjunto de registros)

Partial_ Count = local_count + 1

Determinar el final del ciclo ()

. Base de datos externa 1. Cerrar el conjunto de registros ()