Cómo leer el contenido de una tabla de Excel usando un lenguaje sencillo
Método/Pasos
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.
Asegúrate de que "Ventana de inicio" esté marcada y agrégale un evento "Creado".
Luego ingrese el código de Easy Language como se muestra en la imagen:
Versión 2
Biblioteca de soporte iext
. ( Base de datos externa 1. Abrir ("ODBC; DBQ=" + Obtener el directorio actual () + "\jiance.xls; Driver={Microsoft Excel Driver (*.xls)}; DriverId=790; FIL=excel 8.0; MaxBufferSize =2048 ;MaxScanRows=8; PageTimeout=5; ReadOnly=0; SafeTransactions=0; UID=admin;, , ) = False)
Cuadro de información ("Base de datos; ¡la conexión falló!", #Icono de error, )
Devolución ()
. Si es verdadero, final
Declaración de consulta = "seleccione * de [Hoja1$]" p>
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 de error, )
Regresar ()
Si es verdadero, finalizar
Base de datos externa 1. Vaya al primer registro (conjunto de registros)
Local_count = 1
Cuadro de lista súper 1. Insertar 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 súper 1. Insertar columna (, "Edad", 80, , , )
Cabeza de bucle de juicio (base de datos externa 1. después del último registro (conjunto de registros) = falso)
Local_temporary A = base de datos externa 1. leer (conjunto de registros, 1)
local_temporary B = base de datos externa 1.read(conjunto de registros, 2)
local_temporary C = a texto (base de datos externa 1.read(conjunto de registros, 3) )
Índice = Super cuadro de lista 1. Insertar entrada (, , , , , )
Super cuadro de lista 1. Establecer título (índice, 0, a texto (Partial_count))
Cuadro de lista súper 1. Establecer título (índice, 1, temporal_parcial A)
Cuadro de lista súper 1. Establecer título (índice, 2, temporal_parcial B)
Cuadro de súper lista 1. Establecer título (índice, 3, parcial_temporal C)
Base de datos externa 1. Ir al siguiente registro (conjunto de registros)
p>Partial_count=local_count+1
Determinar el final del bucle ()
Base de datos externa 1. Cerrar el conjunto de registros ()
7
Finalmente haga clic en Botón "Ejecutar" y podrá ver que Yi Language citó correctamente los datos en la tabla de Excel.