¿Qué significa para j =1 para i j en vfp Golden Tower? ! !

* *Comando borrar pantalla

C= "Pagoda Dorada"

* *Asigne los cinco caracteres chinos "Pagoda Dorada" a la variable c.

n=LEN(c)/2

**LEN(c) ​​​​es la longitud de la variable estadística c, excepto 2, porque 1 carácter chino ocupa dos bytes. n es igual al número calculado de caracteres chinos.

Para i = 1 a n

* *Ejecute un ciclo, y el número de ciclos es el número de caracteres chinos.

? Space(70-i)

* *Se muestra en la pantalla una cadena de espacios de 70-i.

Para j =1 a I

* *Un bucle está anidado y el número de bucles es el valor I en el bucle superior.

SUBS(c, 2*i-1, 2)

* *Se envía a la pantalla un carácter, tomado de la variable C, y 2 números se toman de 2i-1 personajes. Es decir, tomemos un carácter chino.

=Ingene(0.5)

* *Espera 0,5 segundos.

Finalizar en

Finalizar bucle

Fin

Finalizar bucle

Un solo signo de interrogación es una nueva línea antes el símbolo de carácter de salida, se muestran signos de interrogación dobles en la posición actual. Entonces, el resultado de este programa es mostrar un personaje de cinco elementos en forma de pagoda dorada en la pantalla.

Consulta la explicación a continuación para conocer los comandos relacionados.

Para... comando ENDFOR

Explicación: Repetir un conjunto de comandos un número específico de veces.

Formato del comando:

FOR VarName = nInitialValue a nFinalValue [paso n incremento]

Comando

[Salir]

[Bucle]

ENDFOR |Siguiente

Parámetro

Varnum

Especifique el nombre de la variable de memoria como contador. El contador guarda el número de veces que se ejecuta un comando de Visual FoxPro en un bucle ...ENDFOR. Es posible que la variable de memoria no exista antes de que finalice la ejecución.

nInitialValueTO nFinalValue

Especifique el valor inicial y el valor final del contador. Tanto NInitialValue como nFinalValue pueden ser elementos de matriz.

[Incremento del paso n]

Especifique el tamaño del paso para que el contador aumente o disminuya. Si nIncrement es negativo, el contador disminuye. Si se omite la cláusula STEP, VarName se incrementa en 1 cada vez.

Comando

Especifica el comando de Visual FoxPro que se ejecutará. Un comando puede contener cualquier número de comandos.

[Salir]

En... el bucle ENDFOR, el control se pasa al comando inmediatamente después de ENDFOR. EXIT se puede colocar en cualquier lugar entre FOR y ENDFOR. Consulte el comando SALIR para obtener más información.

[Loop]

Devuelve el control directamente a la cláusula FOR y ya no ejecuta las declaraciones entre las palabras clave LOOP y ENDFOR. Los contadores normalmente se incrementan o disminuyen como si se ejecutara ENDFOR. Consulte el comando LOOP para obtener más información.

Fin

El final especificado...bucle ENDFOR.

********************************************* *** ****************

SUBS(c, 2*i-1, 2) se explica a continuación:

Función SUBSTR()

Función: Devuelve una cadena de la expresión de carácter o campo de comentario dado. La cadena comienza en la posición especificada en la expresión de caracteres o campo de nota y termina en el número de caracteres especificado.

Formato:

SUBSTR(cExpression, nStartPosition [, nCharactersReturned])

Parámetros

cExpression

Especificar la expresión de carácter o campo de nota desde el cual devolver una cadena.

nStartPosition

Especifica la posición de la cadena devuelta dentro de una expresión de caracteres o campo de nota, donde el primer carácter de la expresión es la posición 1. Nota:

Si nStartPosition es mayor que el número de caracteres en cExpression, SUBSTR() devolverá una cadena vacía (" ").

nCharactersReturned

El número de caracteres devueltos por cExpression. Si se omite el parámetro nCharactersReturned, se devuelven todos los caracteres hasta el final de la expresión de caracteres.

Valor de retorno

Tipo de carácter. SUBSTR() devuelve una cadena.

Nota:

SUBSTR() no devuelve un valor para el campo memo cuando se emite en la ventana de depuración. Para devolver un valor en la ventana de depuración, puede colocar el nombre del campo de anotación en ALLTRIM() y ALLTRIM() en SUBSTR().

Explicación

Cuando se utiliza SUBSTR() para el campo memo en el comando SQL SELECT, la función PADR() se incluye en SUBSTR(), por lo que los campos memo están vacíos o tienen diferentes longitudes. are Producirá resultados consistentes cuando se convierta en cadena.

Ejemplo

El siguiente ejemplo utiliza el comando STORE para almacenar la cadena "abcdefghijklm" en la variable myString. Borrar Borra la ventana principal de Visual FoxPro. En primer lugar, utilizando nStartPosition = 1 como primer carácter especificado y nCharactersReturned = 5 como los cinco caracteres especificados, SUBSTR() muestra la cadena 'abcde'. SUBSTR() luego muestra la cadena "fghijklm" desde el sexto carácter de la cadena hasta el final de la expresión de caracteres (usando el nCharactersReturned omitido como valor especificado), usando nStartPosition = 6 como especificación.

Almacenar "abcdefghijklm" en myString

Borrar

SUBSTR(myString, 1, 5)

SUBSTR( My string, 6)