Cómo generar automáticamente 001-100 en lenguaje sencillo ¿Cómo debo escribirlo?
.Subrutina _Button1_clicked
.Variable local Generar bits, entero
.Variable local Fetch Zero, tipo de texto
. Las variables locales generan números, enteros
. Variable local i, número entero
. Texto temporal de variable local, tipo de texto
Contenido del cuadro de edición 4 = ""
Generar número = Convertir a valor numérico (contenido del cuadro de edición 2)
Generar cantidad = Convertir a valor numérico (contenido del cuadro de edición 3)
Obtener cero = Repetir texto (generar número, 0")
Obtener texto repetido (generar número, "0" )
Obtener cero = obtener texto repetido (generar número, "0")."0")
Cuenta la primera posición del bucle (generar recuento, i)
i = i - 1
Texto temporal = tomar el texto correcto (tomar cero + al texto (i), generar bit)
Editar cuadro 4. Agregar texto ( cuadro de edición 1. Contenido + texto temporal + # carácter de nueva línea)
.Fin del ciclo de conteo ()
.Subrutina__Iniciar ventana_Creada
Cuadro de edición 1.Contenido = "79453 "
Cuadro de edición 4. Permitir varias líneas = Verdadero.