Texto en lenguaje sencillo con múltiples espacios

.Versión 2

.Subroutine_button1_clicked

.Variable local str, tipo de texto, "0"

.Variable local i, entero

. Variable local j, entero

str = texto dividido (editbox1.content, " ", )

Primer recuento (obtener miembro de matriz (str), i)

<. p>. Si es verdadero (elimine el primer y último valor nulo (str[i]) ≠"")

j = j 1

Texto de depuración de salida (elimine el primer y último valor nulo (str [i]))

.End if true

.Count loop end()

Texto de depuración de salida (a text(j ))

.