Visual Pro/5 (BBx) - SENTENCIA DE CONTROL

***deseo ejemplos de las sentencias de bucle o de repeticion: do while, do loop, for next, por favor muchos ejemplos, no tengo manual. por favor muchos ejemplos.
tAMBIEN DESEO UN EJEMPLO DEL USO DEL CASE

Estimado,

Las sentencios de control funcionan igual que en otros lenguajes, de todos modos he aqui un ejemplo;

2790 SWITCH E.ID
2800 CASE 414
2810 LET REST=401; BREAK
2820 CASE 424
2830 LET REST=403; BREAK
2840 CASE 434
2850 LET REST=404; BREAK
2860 CASE 444
2870 LET REST=405; BREAK
2880 CASE 454
2890 LET REST=406; BREAK
2900 SWEND

======================================================

2030 LET R=20
2040 WHILE DES_USUARIO$(R,1)=" "
2050 LET R=R-1
2060 WEND

======================================================

IF CTRL(100,REST,1)=$$ THEN GOTO RUTINA_PRINCIPAL ELSE RELEASE

======================================================

0050 FOR J=0 TO 20
0060 PRINT J
0070 NEXT J

======================================================

Espero que le sirva