integer liN,i
liN=integer(sle_1.text) //把用戶輸入的n值讀入變量liN
i=1 //i為輸出的指針,從1開始
mle_1.text="" //初始化多行編輯器
do while i<=liN //循環直到輸入指針到用戶指定的n
mle_1.text+=trim(string(i))+"~r~n" //輸入i的值,加上回車和換行,等於在鍵盤上輸入回車,trim(string(i))為把i由數字轉換為字符,然後去掉轉換結果前後的空格
i+=1 //輸出指針加1
loop