Cómo mostrar todos los archivos en una carpeta en el código fuente del cuadro de lista en un lenguaje sencillo

.Ensamblaje Ventana Ensamblaje 1

.Subrutina __Iniciar Ventana_Creada

.Directorio de variables locales, tipo de texto

.Variable local buscar, tipo de texto

' El primer botón no puede ver lo que quieres hacer

Directorio = "D:\Application\Pictures\*.*" ' Cámbialo tú mismo

Buscar = buscar archivo (directorio, )

Determinar la posición inicial del bucle (buscar≠"")

cuadro de lista 1. Agregar elemento (buscar, )<. /p>

buscar = buscar archivo (, )

.Determinar el final del bucle ()

.Subroutine_Button2_Clicked

.Ruta del archivo de variable parcial , tipo de texto

. Variable local Archivo, tipo de texto

' No sé si quieres agregar una ruta o un archivo

' La ruta es lo mismo que el anterior Similar

Cuadro de diálogo general 1.Abrir ()

Ruta del archivo = Cuadro de diálogo general 1.Nombre de archivo

Archivo = Buscar archivo ( ruta del archivo,)

ListBox 1.Open ()

.

.Subroutine_Button 3_Clicked

Listbox 1. Quitar elemento ( Cuadro de lista 1. Selección actual)

Se hizo clic en la subrutina _Botón 4_

Cuadro de lista 1. Borrar()

.