FoxPro/Visual FoxPro - BASIC GOTO LINE

HOLA A TODOS,

HACE TIEMPO QUE NO USO ALGO COMO ESTO, Y ME PREGUNTO SI HABRA ALGUNA FORMA DE UTILIZARLO EN VFP (v 7, 8 o 9)

EL CODIGO DE BASIC SERIA COMO EL QUE SIGUE :

1: LET A=1
2: LET X="OK"
3: IF A<3
4: PRINT X
5: LET A=A+1
6: GOTO 3
7: ENDIF
8: PRINT X
9: END

BIEN, LO QUE NO QUIERO, ES HACER UN CICLO WHILE, FOR, O SCAN , LO QUE QUIERO ES HACERLO TAL CUAL ESTA, ES DECIR, SIN EL WHILE, ES DECIR, QUIERO PROGRAMACION SPAGUETTI COMO LO PRESENTA EL CODIGO DE GW BASIC CON UN GOTO O SU EQUIVALENTE EN VFP. SERA POSIBLE?

EJEMPLO 1 DE QUE NO QUIERO :

X=[OK]
For a=1 to 2
?x
NEXT
X=[FIN]

EJEMPLO 2 DE QUE NO QUIERO :

A=1
X=[OK]
DO WHILE A<3
?X
A=A+1
ENNDO
X=[FIN]
?X

EJEMPLO 3 DE QUE NO QUIERO :

A=1
X=[OK]
?X
A=2
?X
A=3
X=[FIN]
?X


GRACIAS.
SALUDOS,
DALSOM

Los herederos de Basic eliminaron esos metodos anticuados, para que necesitas sacrificarte con eso??

ES QUE TENGO UN METODO PREFABRICADO, QUE SE EJECUTA SECUENCIALMENTE, Y NO QUIERO HACER MUCHOS CAMBIOS, Y SEGUN ESTA FORMA DE PROGRAMAR QUE HACE MUCHO YA NO EXISTE, ENTENDIA QUE PODRIA RESOLVER MI PROBLEMA.

SI EXISTE ALGUNA FORMA DD HACERLO, ESTARE AGRADECIDO.

No se que pretendes hacer pero puedes llamar un metodo o evento las veces que sea