1+2+3+4+5+6+......100Visual FoxPro用for endfor語句編程

SET TALK OFF

CLEAR

S=0 && 設置S初值

M=0 && 設置S初值 **此變量可省**

FOR J=1 TO 100 && 循環開始 j從1開始，每次加1，直到100

S=S+J && 循環體， 第壹次循環 0+1 賦值給S，S的值為1，第二次循環 1+2再 賦值給S，S的值為3 。

ENDFOR && 循環結束

@ 10,10 SAY "1到100之和為："+LTRIM(STR(S)) &&在屏幕的 第10行，每10列顯示 1到100之和為：5050 （LTRIM(STR(S)) 將S轉化為字符並刪除前導空格）

RETURN && 返回調用處

這樣說明能理解嗎？