Referencia de miembro de matriz de lenguaje simple distinta del subíndice

.Subroutine_Button1_clicked

.Variable local texto a leer, tipo de texto, "0"

.Variable local Texto por línea, tipo de texto, "0"

Variable local x, entero

Leer texto = dividir texto(a texto(leer archivo(obtener directorio actual()) "\dictionary. txt")), #newline,)

Cuenta el primer bucle (obtener miembro de la matriz (leer texto), x)

Cada línea de texto = dividir texto (leer Obtener texto [x], "). ",)

. Si es verdadero (obtenga el número de miembros de la matriz (cada línea de texto) > 0)

Cuadro de edición 1. Agregue texto (cada línea de texto[1 ] # carácter de nueva línea)

.Fin si es verdadero

.Fin del bucle de conteo ()