GVbasic指令及函数一览修改版.pdf
GVbasic指令及函数一览
指令及函数一览:
变量及数组定定义函数:
DIM数组定义
说明:定义数组维数并分配空间，没有经过DIM说明的数组下缺省最大值是10.
用法:DIM数组名(N1,N2,N3...)
IF...THEN/(GOTO)...ELSE条件判断
语法:IF...THENn,条件成立时跳到n行处执行；条件不成立时接着下一行执行。
IF...GOTOn等价于IF...THENn
IF...THENnELSE...,IF...
IF...GOTOnELSE...IF...
范例:
10N=1
20PRINTN,SQR(N)
30N=N+1
40IFN4THENGOTO20
50END
RUN
显示结果:
1
1
2
1
3
1
4
2
LET给变量赋值
说明:LET命令可以省略
语法:LET变量=表达式
范例:
10LETN=2008-1999
20R=0.09
30LETAAL=100*(1+R)^N
40PRINTAAL;AAL
50END
RUN
AAL=217.189328
SWAP变量互换
语法:SWAPA1,B1
范例:
10A=28;B=50
20PRINTA,B
30SWAPA,B
40PRINTA,B
50END
RUN
28
50
50
28
选择结构流程语句
GOTO无条件跳转
说明:*程序跳转到指定行号处运行
语法:GOTn行号
范例:
10LETA=20
20GOT40程序跳转到行号40处在屏幕上输出HELL字样
30PRINTA
40PRINTHELLO
50END
RUN
显示结果:HELL
IF...THEN/(GOTO)...ELSE条件判
语法:IF...THENn,条件成立时跳到n行处执行；条件不成立时接着下一行执行。
IF...GOTn等价于IF...THENn
IF...THENnELSE...,IF...
IF...GOTnELSE...IF...
范例:
10N=1
20PRINTN,SQR(N)
30N=N+1
40IFN4THENGOT20
50END
RUN
显示结果:
1
1
2
1
3
1
4
2
ON控制转移
语法:ON...GOTOn1,n2,n3...
说明:计算O后的表达式的值，为1时对应n1子程序,为2时对应n2子程序..当无
对应时继续执行下一条语句.
范例:请参考本教程后面的例程四则运算
循环控制语句
FOR...TO...STEP...NEXT循环控制
语法:FOR...TO...
NEXT
如:
10FORI=5TO1STEP-1
20PRINTI
30NEXTI
40END
RU
显示结:
5
4
3
2
1
WHILE/WEND循环控制
说明:当表达式为真时执行循环,当表达式为假时继续执行WEND后的下一条语句
语法:WHILE表达式
WEND
范例:
10REMAVERAGE
20S0=0
30GOSUBS0
40PRINTS0
50GOTO990
100READA
110WHILEA-1
120S0=S0+A
130READA
140WEND
900DATA34,45,50,65,23,88,-1
990END
RUN
305
自定义函数及转子过程语句:
DEFFN自定义函数
用法:DEFN函数名=表达式
范例:
10DEFNA(W)=2*W+W;
20PRINTFNA(23)
30DEFNB(X)=4+3
40G=FNB(23)
50PRINTG
60DEFNA(Y)=FNB(Z)+Y
70PRINTFNA(G)
80END
RUN
结果:
69
7
14
GOSUB跳转子程序
说明:程序跳转到以指定行号开始的子程序处运行，遇到RETURN语句时，就返回到GOSUB
的下一条语句接着运行.
语法:GOSUBn行号
范例:
10GOSUB100
20IX0THENPRINT