QBASIC语句一览表
QBASIC讲义第三讲结束语句暂停语句结束语句条件语句
QBASIC 讲义第三讲结束语句暂停语句结束语句条件语句一、结束语句（ END 语句）格式：ENDEND 语句的作用是使程序结束运行。
END 语句也可以放在程序中任何位置。
一个程序可以有一个以上的END 语句，但运行程序时，只有一个起作用，即执行其中任一个END 语句都使程序结束。
END 语句一般写在程序的最后一行。
二、暂停语句（STOP 语句）格式：STOPSTOP语句使程序暂停，而不是结束。
程序暂停执行后可以使其继续运行。
在调试程序时可以在程序中设几个STOP语句，即设置若干个"断点",使运行一段程序后暂停一下，检查已得到的数据是否正确，如无问题则继续运行，如有问题及时修改程序。
这在调试一个较长的程序时往往是很有用的。
三、REM语句的一般格式为：格式：REM ［注释内容］REM 语句的功能是用注释内容对程序做注释或说明。
它是一个非执行语句，对程序的执行结果不起任何影响，是写给人看的，不是写给计算机执行的。
注释内容也不受QBASIC语法的限制，只是在打印程序清单时将其照原样打印出来。
REM语句用来建立程序的内部文档，增加程序的可读性。
四、分支结构程序设计IF 语句1、行IF 语句行IF 语句的一般格式有两种：（1）IF 条件THEN 语句（1）IF 条件THEN 语句1 ELSE 语句2一个行IF 语句只占一个程序行，它是在一行中写完的IF 语句。
"条件" 可以逻辑表达式或关系表达式，或者是一个逻辑量。
有多个ELSE 和THEN 时规定：每一个ELSE 部分都与它前面的、距它最近的、且未曾被配对的IF-THEN 配对。
2、块IF块IF 结构的一般格式块IF 的一般格式如下：IF 条件THEN语句组1ELSE语句组2ENDIF关于块IF 结构的说明：①执行块IF 时，先判断所给的条件是否满足，如求出条件表达式的值为真（即条件成立），条件满足，则执行语句组1，然后跳过ELSE 行的语句组2，由ENDIF 出口；如果逻辑表达式为假（即条件不成立），条件不满足，则跳过THEN 部分，执行ELSE 部分的语句组2，然后由ENDIF 出口。
第三章 最简单的QBASIC程序
LET语句(I)
赋值语句的一般格式： LET 变量=表达式
1. “=”不是数学中的“等号”，而应理解为一个“赋值 号”
a=3
a=3 : b=4 : a=b
n=n+1
2. 赋值号左侧只能是变量，而不能是常数或表达式，右 侧可以是表达式，“=”具有计算功能。
3=a
(×)
b+6=a
(×)
a=3*5-4 (√)
CONST Pi=3.14159 CONST r=3.5 LET l = 2 * pi * r LET s = pi *r *r LET v=4/3 *pi*r*r*r PRINT l PRINT s PRINT v END
变量
程序运行期间可以改变的量就是变量。
变量的命名规则：
1. 以字母开头，后面跟字母、数字和小数点，不能有空 格，如A，A2，CD1，Mr.John合法，而-Y, LI Ming不合 法；
PRINT “在主程序中" 主
CALL MySub1 PRINT “返回主程序中" 程
END
序
SUB MySub1
子
PRINT “在子程序中" 程
END SUB
序
QBASIC程序中的运算量
数据类型
数值型数据 非数值型数据
运算对象：又称运算量、操作数， 就是参加运算的数据
常量
变量 数组和数组元素
函数（标准函数和 自定义函数）
a=3:b=4 SWAP a,b PRINT a,b END
PRINT语句
语法：PRINT [输出列表项]
用PRINT语句能输出常量、变量和表达式；
LET pi=3.14159
LET pi=3.14159
QBasic部分指令格式与功能
LET （赋值语句）格式：[LET] 变量=表达式功能：先计算右边表达式，然后将结果赋给左边的变量SWAP （变量值交换语句）格式：SWAP 变量1，变量2功能：将变量1和变量2的值进行交换PRING （显示或输出语句）格式：PRING [表达式表][，|；]功能：将指定的数据显示在屏幕上LPRING （打印语句）格式：LPRINT [表达式表][，|；]功能：将指定的数据用打印机打印出来REM （注释语句）格式1：REM 注释内容格式2：’注释内容功能：在程序中加以解释来说明该程序段的作用END （结束语句）格式：END功能：结束一个程序CLS （清屏语句）格式：CLS功能：清除屏幕上显示的信息PRING USING （自选显示格式语句）格式：PRING USING〈“格式字符串”〉；〈表达式表〉[；]功能：根据格式字符串规定的格式，将表达式表中的数据显示在屏幕上LPRINT USING （自选打印格式语句）格式：LPRINT USING 〈“格式字符串”〉；〈表达式表〉[；]功能：根据格式字符串规定的格式，将表达式表中的数据打印在打印机纸上STOP （暂停语句）格式：STOP功能：暂停程序的执行SLEEP （定时暂停语句）格式：SLEEP [数值表达式]功能：暂停执行程序，时间为数值表达式所指定的数值（以秒为单位）INPUT （键盘输入语句）格式：INPUT [；][“注释内容”][；|，]变量[，变量]功能：通过键盘给INPUT语句中的各个变量依次提供数据LINE INPUT （行输入语句）格式：LINE INPUT [；][“注释内容”；]字符串变量功能：将键盘上输入的字符串（最长为255个）赋给字符串变量READ/DATA（读数/置数语句）格式：READ 变量[，变量]………DA TA 常量[，常量]…功能：READ语句将DATA语句中提供的数据依次赋给指定的变量RESTORE （恢复数据区语句）格式：RESTORE [行号|行标号]功能：从指定的DA TA语句行中读入常量数值函数SIN （正弦函数）格式：SIN （X）功能：求X的正弦函数值COS （余弦函数）格式：COS（X）功能：求X的余弦函数值TAN （正切函数）格式：TAN（X）功能：求X的正切函数值A TN （反正切函数）格式：A TN（X）功能：求X的反正切函数值SQR （平方要函数）格式：SQR（X）功能：求X的算术平方根值，其中X必须大于或等于零EXP （指数函数）格式：EXP（X）功能：求以e为底的X次幂，e=2.718282LOG （对数函数）格式：LOG（X）功能：求以e为底的自然数值，即In x 的值SGN （符号函数）格式：SGN（X）功能：求自变量X的符号ABS （绝对值函数）格式：ABS（X）功能：求自变量X的绝对值，即|X|INT （取整函数）格式：INT（X）功能：取不大于X值的最大整数FIX （截取整数函数）格式：FIX（X）功能：把一个带有小数的数去掉小数部分，不进行舍入，直接截取整数部分。
VISUAL BASIC 常用语句74条详解
首先打开 Microsoft Excel，然后运行程序，单击命令按钮，你将看到 Excel 变成活动窗 体。
下面示例用 Shell 函数启动 Microsoft Excel，然后用 AppActivate 语句来激活 Microsoft Excel。在运行程序前，首先找到 Microsoft Excel 的路径，并关闭 Excel。
元素，以及释放动态数组的存 23
储空间。
模拟错误的发生。
23
定义用户自定义的事件。
24
提前退出控制结构、循环或过
程的语句体。
26
3
20 FileCopy 语句
复制一个文件。
27
21 ForEach...Next 语句
针对一个数组或集合中的每个
元素，重复执行一组语句。
28
22 For...Next 语句
建立一标准工程，在窗体上添加一命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口
MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub
13 Do...Loop 语句
14 End 语句 15 Enum 语句 16 Erase 语句 17 Error 语句 18 Event 语句 19 Exit 语句
QBASIC read和data语句
（3）data语句中必须是常量，不能 是变量、函数及表达式。 例 3： read a,b,c data 3*2,sqr(4),d print a,b,c
错误
（4）data语句中所提供的各数据的 类型必须和read语句中各变量的类型 一致。 例 4： read a%,b$ data 2,“good” print a%,b$
（1）若省略行号或行标号时，将数据指
针移动到数据区起始位置。
例1： read a,b,c data 1,2,3,4 data 5,6,7,8 read d,e,f restore read g,h,i print a,b,c,d,e,f,g,h,I end 结果： 1 2 3 4 5 6 1 2 3
6 1 4 5 3 7
第一个data语句
第二个data语句
第三个data语句
3.24 数据恢复语句restore 1.格式：
restore [行号|行标号]
行号：0-65529,0除外。
行标号：由字母和数字组成，必须以字母 开头，以冒号结束，最多不超过40个字符。
2.功能： 使数据指针恢复到某一位置。 3.说明：
句中“读数”，data语句是非执行语
句，它只是为data语句提供数据。
3.说明： （1）read语句与data语句必须配合使用。 例 1： read a,b data 3,4 print “a=”;a,“b=”;b 结果：a=3 b=4
（2）data语句中的数据个数不得小 于read语句中变量的个数。 例 2： read a,b,c data 3,4 print a,b,c 系统提示：out of data
（6）一个程序中可有多个read语句和 多个data语句，如果程序中有多个
小学信息学奥林匹克竞赛QBASIC讲义 第二讲 输出语句 键盘输入语句 读数语句 置数语句 恢复数据区语句
QBASIC讲义第二讲输出语句键盘输入语句读数语句置数语句恢复数据区语句变量在程序中起什么作用？（保存数据，保存我们需要的、关心的各种类型的数据，有数值型数据，也有字符串型数据。
还有参与运算作用）变量名不能以系统保留字（即语句定义符，或说命令单词，和标准函数定义符）作为变量名字。
即“LET、PRINT、INPUT、READ……”这些单词不能作为变量名字。
顺序结构程序设计：LET语句 PRINT语句 READ语句 DATA 语句 INPUT语句 RESTORE语句 END语句 STOP语句REM语句,这些语句被执行时，不会改变程序的执行顺序，即：执行完本语句后必定顺序地执行其下一条语句。
程序的执行顺序就是语句书写先后顺序，这样的结构称为程序的顺序结构。
程序还有另外两种结构就是：分支结构和循环结构。
程序的三种基本结构：顺序结构、分支结构、循环结构。
数据的输入与输出一、输出语句(PRINT语句)：格式：PRINT “提示内容” ；表达式列表功能：先计算表达式的值，然后将表达式的值输出到显示器屏幕上显示或打印机上打印。
规则：（1）提示内容必须加双引号；（2）可以一次完成输出多个表达式的功能。
PRINT语句格式化输出1、固定输出格式：表达式即输出项之间用“,”分隔，则分区输出（固定输出），分五个区，每区14列。
如是输出数值数据，每个固定位置的第一格是符号位，若打印正数或零则省略符号，这时该位置就是空格。
一行打印不下时，自动换行。
2、紧凑输出格式输出项之间“；”分隔，则紧凑输出，即打印输出项之间只留一个空格。
PRINT语句句末符号的作用1、末尾无符号，换行（即输出空行）2、末尾以“，”结束，不换行。
末尾以“，”结束，本行不满5个固定位置不换行。
遇到下一个print语句输出到下一固定位置。
本行打印满则自动换行。
3、末尾以“；”结束，不换行。
执行本print语句后，输出不换行，若没印满一行则下一个PRINT语句仍在本行输出。
Qbasic音乐编程
Qbasic⾳乐编程Qbasic⾳乐编程QB中提供了专门的演奏⾳乐的语句PLAY和通⽤的发声语句SOUND,不过由于那会⼉多媒体并不像如今这般流⾏，所以所谓的⾳乐也仅仅相当于⼿机中的单⾳铃声。
对于听惯了低⾳炮、⽴体声、混响的我们，偶尔⾃娱⾃乐还是挺不错的:)下⾯先介绍PLAY语句功能：演奏由给定的字符串所表⽰的⾳乐格式：PLAY [命令字符串]说明：[命令字符串]是⼀种⾳乐语⾔单个字符命令组成，⽤以表⽰⾳符的⾳⾼、⾳长、速度及演奏⽅式等。
乐谱中的⾳符CDEFGAB(当1=C时相当于简符1234567)在BASIC中仍然是这7个字母，“#”(或“+”)号与“-”号分别表⽰乐谱中的升半⾳(#)和降半⾳(b)，字符“.”代表延长前⾯⾳符的⼀半时长(⽤来表⽰附点⾳符)，其他字符命今如下：1、O命令功能：⽤来设置要演奏的⾳符所在的⼋度，即⾳阶。
格式：On说明：命令中n的取值为0-6。
⽐如．使计算机在演奏完⾳阶3的CD之后，再演奏⼀个⾼⼋度的C，即⾳阶4中的c调，可以⽤PLAY “O3CDO4C”来实现。
普通中⾳是指⾳阶3中的⾳符。
2、L命令功能；⽤来设置要演奏的每个⾳符的长度(亦称⾳符的时值)。
格式：Ln说明：n的取值1-64，L1表⽰以全⾳符，L2表⽰半⾳符，L4表⽰四分⾳符，L8表⽰⼋分⾳符……⼀个⾳符的时值也可以直接写在该⾳符后⾯，⽽不⽤L命令。
如L8A与A8等效，C4E4D4A4等效于L4CEDA，⽽L4CDEFC2AB2则表⽰⾳符后⾯不带数字的按L 设定的四分⾳符演奏，后⾯带数字的G2和B2按数字指定的⾳值演奏，显然⽤L命令更简洁⽅便。
3、P命令功能：表⽰休⽌符的长度格式：Pn说明：n的取值1-64，P1表⽰全休⽌符．P2表⽰半休⽌符，P4表⽰四分休⽌符……4、T命令功能；⽤来设置演奏的节拍速度。
格式：Tn说明：n为每分钟演奏四分⾳符的数量，取值32-255，缺省是T120注意：除了T命令外还可以⽤以下三个命令来控制演奏的速度：(1)MN(⾳乐标准)：它使每个⾳符以L设定的⾳值的7/8来演奏，使得两两⾳符之间有短暂的停顿。
用QBASIC演唱_课件1
六、发声语句
■ 1.PLAY语句 ■ PLAY语句可以演奏音乐字符串指定的音乐。如：PLAY“CDEFGAB” ■ 2.SOUND语句 ■ SOUND语句可以使计算机按指定的声音频率和持续时间发声。声音
频率的单位是赫兹，取值范围为37~32767；持续时间的取值范围为 0~65535，持续时间为18时为1秒，持续时间为65535时为1小时。 ■ 如：SOUND 1000，36 ■ 3.BEEP语句 ■ BEEP语句能使计算机发出一声短促的声音。
■ 对于连续几个音长一样的音符，用Ln来设置 比较简单，对于单个音符设置音长可以在音 符的后面直接加n值。如：PLAY“C1 D2 E4 F8 G16 A32 B64”。
四、休止符与符点音符
■ （1）设置休止符用命令Pn来表示，n是休止时间，取值范围为1~64，其休止时间 长度与音符发声长度相同。
用QBASIC演唱
学习目标
■ 1.了解QBASIC的音乐功能。 ■ 2.学会三种QBASIC发声语句的用法。
一、音名
■ 1.音乐字符和简谱唱名的对照如表所示
■ 2.半音的升与降
■ 用符号#或+可以对前面的发声音符升半音， 用符号—可以对前面的发声音符降半音。
试试看
在QBASIO中输入以下语句并运行程序，体 会声音的变化。 PLAY"CDEFGAB" PLAY"CC+DD+EE+FF+GG+AA+BB+" PLAY"CC-DD-EE-FF-GG-AA-BB-"
谢谢
■ （2）符点音符用“.”来表示，符点音符可以用在A~G或休止符P的后面，一个符 点可延长该音长的二分之一。
qbasic编程命令语句
得到前一个点的坐标
POSy=POS(x)得到光标的列数位置
RIGHT$S$=RIGHT$(x$,n)从字符串X$的右边取n个字符
RNDy=RND(n)得到0到1之间的随机数,n=0则得到前一个RND值
INPUT$S$=INPUT$(m[,[#]n])从键盘或文件中读入指定数量的字符
INSTRy=INSTR([n,]targetstring, patternsttring)字符串查找
INTy=INT(n)得到一个不大于n的最大整数
IOCTL$S$=IOCTL$[#]n从一个设备驱动器程序接收数据
MID$S$=MID$(X$,n[,m])从X$的第n个字符开始取m个字符;省略m,则取完
MKD$S$=MKD$(V#)把双精度数值转化为随机文件中输出字符串
MKI$S$=MKI$(V%)把整数转换为字符串
MKL$S$=MKL$(V&)把长整数转换为字符串
CINTy=CINT(n)对n进行舍入取整(奇凑偶
CLNGy=CLNG(n)把一个数n转化为长整数
COMMAND$S$=COMMAND$在DOS下启动程序时,获得命令行中的其余信息
COSy=COS(n)得到自变量n的余弦值
CSNGy=CSNG(n)把一个数值转化为单精度数
S$=ENVIRON$(n)得到环境表中的参数
EOFy=EOF(filenum)遇到文件结束则返回真,否则为假
ERDEVy=ERDEV返回设备驱动器错误码
ERDEV$S$=DEDEV$返回设备驱动器错误信息
ERRy=ERR返回错误的错误号
BEEP BEEP 使喇叭发声
QBASIC 多分支语句
例题8：
input x select case x case is>0 y=1 case <0 y=-1 cቤተ መጻሕፍቲ ባይዱse else y=0 end select print y end
input x select case x case is>0 y=1 case else y=0 case <0 y=-1 end select print y end
例题1：输入数字“1”,输出“星期一”， 输入数字“2”,输出“星期二”，…，输入 数字“7”,输出“星期日”。
程序如下： dim a as integer input a select case a case 1 print “Monday” case 2 print “Tuesday” case 3 print “Wednesday” case 4 print “Thursday”
input x select case x case else y=0 case is>0 y=1 case <0 y=-1 end select print y end
例题9：课本51页，例4.8
例题7： input x select case x case 1 to 10, 12，is<6 print “a” case is>12,-5 to 0 print “b” case else print “error!” end select end
（6）case else子句放在不同的位置， 影响程序的运行结果。
说明： 在用is定义条件时，不能使用任何逻辑运 算符。 如：要表示0≤x ≤100 Case is ≥0 and is≤100 （错误） Case is ≥0 ,is ≤100 Case 0 to 100 （错误） （正确）
QBASIC语言的基本语句(通用版)
通用QBASIC语言的基本语句1．赋值语句（LET）【格式】LET 变量=表达式【功能】将一个数据赋给一个变量。
【说明】⑴LET 可省略基本语句。
⑵表达式的值就是要赋给变量的数据。
⑶表达式可以是一个数值，也可以是一个算术式。
【应用】 LET A=52．暂停语句（PAUSE）【格式】PAUSE 时间【功能】暂时停止程序的执行，或是延迟一段时间。
【说明】⑴在让机器人运动时，是通过时间的长短来控制机器人前进、后退的距离，以及左、右转动的角度。
⑵时间的具体值就是指时间的长短，它可以精确到毫秒。
【应用】PAUSE 1000 此语句的意思是延时时间设为1秒。
3．结束语句（END）【格式】END【功能】终止运行4．循环语句（FOR/NEXT）FOR 循环变量= 初值TO 终值STEP 步长（………… ------ 循环体……）NEXT变量FOR 循环说明语句（循环入口）NEXT 循环终值语句（循环出口）【功能】循环语句用来执行固定次数的重复动作。
【说明】⑴循环变量的初值、终值和步长均可以是常数或变量。
⑵当步长为1时，STEP可以省略。
⑶FOR/ NEXT需同时使用缺一不可，循环变量名要一致。
⑷循环的嵌套层数不超过8层。
5．声音语句（SOUND）【功能】在指定的持续时间内发出给定的声调的声音。
【说明】⑴本模块已集成在通用机器人主板的10号端口。
⑵声音频率的值，是实际的频率的值，能发出人的耳朵听到的频率，实际应用中，可适当改变声音的频率来校正音准，声音频率0为休止符。
6．无条件转移语句（GOTO）【格式】GOTO 行标号【功能】无条件地转向指定的行标号去执行程序。
【说明】⑴标号是表示某一地址的符号。
⑵标号以冒号结束，并且出现在执行语句的前面，而不能出现在不可执行语句前。
7．注释语句（REM）【格式】REM 字符串【功能】释语句的主要作用是为了增强程序的可读性，在程序执行中并不被执行，即REM”后的语句只是起到说明作用。
QBASIC讲义 第三讲 结束语句 暂停语句 结束语句 条件语句
QBASIC讲义第三讲结束语句暂停语句结束语句条件语句一、结束语句(END语句)格式：ENDEND语句的作用是使程序结束运行。
END语句也可以放在程序中任何位置。
一个程序可以有一个以上的END语句，但运行程序时，只有一个起作用，即执行其中任一个END语句都使程序结束。
END语句一般写在程序的最后一行。
二、暂停语句(STOP语句)格式：STOPSTOP语句使程序暂停，而不是结束。
程序暂停执行后可以使其继续运行。
在调试程序时可以在程序中设几个STOP语句，即设置若干个"断点"，使运行一段程序后暂停一下，检查已得到的数据是否正确，如无问题则继续运行，如有问题及时修改程序。
这在调试一个较长的程序时往往是很有用的。
三、REM语句的一般格式为：格式：REM［注释内容］REM语句的功能是用注释内容对程序做注释或说明。
它是一个非执行语句，对程序的执行结果不起任何影响，是写给人看的，不是写给计算机执行的。
注释内容也不受QBASIC语法的限制，只是在打印程序清单时将其照原样打印出来。
REM语句用来建立程序的内部文档，增加程序的可读性。
语句说明符REM也可以一个单撇号"'"来代替。
四、分支结构程序设计IF 语句1、行IF语句行IF语句的一般格式有两种：（1）IF 条件THEN 语句（1）IF 条件THEN 语句1 ELSE 语句2一个行IF语句只占一个程序行，它是在一行中写完的IF语句。
"条件"可以逻辑表达式或关系表达式，或者是一个逻辑量。
有多个ELSE和THEN时规定：每一个ELSE部分都与它前面的、距它最近的、且未曾被配对的IF-THEN配对。
2、块IF块IF结构的一般格式块IF的一般格式如下：IF条件THEN语句组1ELSE语句组2ENDIF关于块IF结构的说明：①执行块IF时，先判断所给的条件是否满足，如求出条件表达式的值为真(即条件成立)，条件满足，则执行语句组1，然后跳过ELSE行的语句组2，由ENDIF出口；如果逻辑表达式为假(即条件不成立)，条件不满足，则跳过THEN部分，执行ELSE部分的语句组2，然后由ENDIF出口。
QBASIC程序设计
QBASIC程序设计BASIC是英文Beginner’s All-purpose Sybol——初学者通用符号指令代码。
BASIC语言是一种常用的高级程序设计语言之一。
目前比较流行的BASIC语言版本有True BASIC、Turbo BASIC、QBASIC、GWBASIC。
本讲义仅介绍QBASIC。
BASIC语言基本知识与要求１、QBASIC语言的基本知识：QBASIC语言的基本特点；常量、变量、字符串、算术表达式的概念；数的表式方法及范围；语句的基本格式；顺序、选择、循环结构的程序设计；程序设计的基本步骤。
２、QBASIC语句：LET INPUT PRINT END IF FOR DO WHILE REM３、算术运算符、关系运算符与逻辑运算符：+、—、*、/、\、MOD、^＝、>、<、>＝、<＝、< >ＡＮＤ、ＯＲ、ＮＯＴ４、流程图的基本符号；流程图的作用。
5、循环语句循环变量、循环体、循环初值、循环终值、步长的概念；循环语句的基本格式。
6、常用函数数值函数ＩＮＴ（Ｘ）、ＡＢＳ（Ｘ）、ＳＱＲ（Ｘ）、ＲＮＤ（Ｘ）、ＳＧＮ（Ｘ）、ＳＩＮ（Ｘ）、ＣＯＳ（Ｘ）、ＴＡＮ（Ｘ）字符串函数（了解）ＡＳＣ、ＬＥＮ、TAB（Ｘ）、ＶＡＬ、ＬＯＧ（Ｘ）、ＳＴＲ＄、ＣＨＲ＄、ＬＥＦＴ＄、ＲＩＧＨＴ＄、ＭＩＤ＄7、数组及其应用（了解）下标变量、一维、二维数组的概念；数组说明语句第一章BASIC语言基础第一节QBASIC的环境1、QBASIC的进入用QBASIC语言编写程序，首先要进入QBASIC集成环境。
QBASIC主要由QBASIC.EXE 和QBASIC.HLP两个文件组成，按照教师的要求进入指定的位置，运行QBASIC.EXE后，屏幕上会出现一个如图1-1的对话框：图1-1直接单击“确定”按钮，便进入QBASIC的集成环境，其界面如下图2-2：图1-2再按“Esc”键即可取消屏幕中央的对话框，进入图1-3所示的主屏幕。
VisualBasic语句大全及详解
VisualBasic语句⼤全及详解VisualBasic是微软公司推出的简单易学、功能强⼤编程⼯具，是⼀种可视化的、⾯向对象和采⽤事件驱动⽅式的结构化⾼级程序设计语⾔，使⽤VB能轻⽽易举地开发适合在Windows环境下各类应⽤程序。
语句是程序的基本功能单位，每条语句都有确切的含义，能完成⼀定的任务。
熟练掌握语句，是开发应⽤程序的基础。
VB共有语句77个，这⾥给出72个，另外5个由于很少⽤到没有给出，它们是Width#语句，设置⽂件的输出⾏宽度。
Implements语句，指定要在包含该语句的类模块中实现的接⼝或类。
其余3个⽤于声明Property过程的名称，参数以及构成其主体的代码，PropertyGet语句，该Property过程获取⼀个属性的值；PropertyLet语句，该Property过程给⼀个属性赋值；PropertySet语句，该Property过程设置⼀个对象引⽤。
点击相关语句看详细内容语句描述AppActivate语句激活其它应⽤程序。
Beep语句通过计算机喇叭发出声⾳。
Call语句调⽤⼀个⼦程序或函数。
ChDir语句改变当前的路径(⽬录或⽂件夹)。
ChDrive语句改变当前的驱动器。
Close语句关闭⽤Open语句打开的⽂件。
Const语句声明常量。
Date语句设置当前系统⽇期。
Declare语句⽤于在模块或窗体中声明对动态链接库(DLL)中外部过程的引⽤，在引⽤API函数时经常⽤到。
Deftype语句在模块或窗体，为变量和传给过程的参数，设置缺省数据类型，以及为其名称以指定的字符开头的Function和PropertyGet过程，设置返回值类型。
DeleteSetting语句删除指定的Windows注册表的⼦键。
Dim语句声明局部变量并分配存储空间。
Do...Loop语句循环语句，有两种变形，⼀种是当条件为True时，重复执⾏⼀个语句块中的命令。
另⼀种重复执⾏⼀个语句块中的命令，直到条件变为True时。
QBasic教程(全)
BASICQbasic 教程BASIC（Beginner’s All-purpose Symbolic Instruction Code 的缩写，意为初学者通用符号指令代码）语言是在1964年由美国的两位教授Thomas 和John G.Kemeny在Fortran语言的基础上设计的语言系统，这个简单、易学的程序设计语言当时只有17条语句，12个函数和3个命令，现在一般称其为基本BASIC。
BASIC语言自诞生起，几十年间，经过世界和地的微机生产厂家的不断扩充和完善，先后出现了许多版本，IBM-PC及其兼容机上用的BASIC和GWBASIC.这些不同版本的BASIC语言并不兼容,在很大程度上依赖于具体的硬件,这些BASIC语言都是非结构化的,一般称其为第一代BASIC。
70年代初，提出了结构化程序设计思想，BASIC语言的两位创始人Thomas 和John G.Kemeny于1985年推出了BASIC语言的新版本TrueBASIC，意思是说这才是真正的BASIC，以区别于各微机生产厂家自行开发的“街头BASIC”，它既保留了BASIC语言原有的简单，易学的特点，又使其成为结构化的程序设计语言，开创了BASIC语言的新纪元，属于第二代BASIC。
目前，比较流行的第二代BASIC还有Microsoft公司于1986年推出的Quick BASIC（快速BASIC）和Borland公司于1987年推出的TurboBASIC(增强BASIC)，尤其是Quick BASIC提供了集编辑、调试、编译、运行于一体的集成环境，具有下拉菜单、多窗口及在线帮助功能，并和以前IBM-PC机上的各种BASIC版本保持兼容。
进入90年代，Microsoft公司研制的Windows视窗软件问世之后，微软公司又开发了一个在Windows下运行的、面向对象的Visual BASIC（可视BASIC，即图形界面式的BASIC），称为第三代BASIC，Visual BASIC与Quick BASIC完全兼容，有Quick BASIC编写的程序不经修改就可在Visual BASIC下运行。
QBasic命令大全
COSy=COS(n)得到自变量n的余弦值
CSNGy=CSNG(n)把一个数值转化为单精度数
CSRLINy=CSRLIN返回光标行数位置
CVIV%=CVI(2字节的串)字符串转换为整型数
CVSV!=CVS(4字节的串)字符串转换为单精度数
LOGy=LOG(x)自然对数y=InX
LPOSy=LPOS(printer)得到打印缓冲区中当前的位置
LTRIM$S$=LTRIM$(x$)返回去掉前导空格的字符串复制品
MID$S$=MID$(X$,n[,m])从X$的第n个字符开始取m个字符;省略m,则取完
MKD$S$=MKD$(V#)把双精度数值转化为随机文件中输出字符串
GOSUB
RETURN GOSUB...RETURN 将控制转移到子程序和从子程序返回
GOTO GOTO {行号|行标号} 无条件转移到指定语句
IF...THEN... ELSE... 根据逻辑表达式的值进行条件执行
INPUT INPUT[;][提示字符串{;|,}]变量表 在程序运行期间从键盘输入数据
VALy=VAL(S$)输出字符串S$的相应数值
VARPTRy=VARPTR(variable)返回变量的偏移地址
VARSEGy=VARSEG(variable)返回变量的段地址
VARPTR$S$=VARPTR$(variable)返回变量地址的字符串表示
语句名 语句格式 功能
ERROR ERROR n 模拟产生BASIC错误 n
EXIT EXIT { DEF | DO | FOR | FUNCTION | SUB } 跳出循环或程序块
QBASIC教程
Qbasic 教程第九章屏幕控制和作图一、显示模式显示模式：信息在屏幕上的显示方式。
1、文本模式屏幕上显示的最小单位为一个字符，这种模式下的用户不能用线条来绘制各种图形只能用字符组合成粗糙的图案。
在这种模式下屏幕分为25行，每行80个字符。
屏幕左上角为原点坐标,坐标为(1,1)。
2、图形模式屏幕上显示的最小单位是显示器的象素点，可用基本的几何图形，如直线、方框、圆等绘制出复杂而精美的图画。
这种模式在VGA以上显示器的显示范围为640×480点，原点坐标（0，0）在屏幕左上角。
二、屏幕控制语句1、LOCATE语句格式：LOCATE [<行>]，[<列>]功能：确定光标在屏幕上的坐标位置。
说明：取值范围：行1-25,列1-80例如：LOCATE 10，10PRINT “QBASIC”LOCATE 15，10PRINT “再见”2、WIDTH语句（设置输出的行宽）格式：WIDTH <宽度值>功能：确定屏幕输出宽度。
其中：宽度的有效值是40或80例如：WIDTH40字符是扁形WIDTH80字符是长形3、CLS语句格式：CLS功能：清除屏幕信息,确定光标位置：在文本方式下，将光标置于屏幕的左上角，在图形方式下，将光标置于屏幕的中心。
4、CSRLIN和POS函数格式：CSRLINPOS（n）功能：CSRLIN记录光标所在的行位置。
POS记录光标所在的列位置。
例：LOCATE5，7A = CSRLINB = POS(0)LOCATE10，15PRINT“ABCD”PRINT A，B5、SCREEN语句格式：SCREEN[<模式>]，[<色彩>]功能：设置屏幕的显示方式(文本或图形)其中：“模式”代表显示器的工作方式“色彩”是一个数值表达式，只有在模式为0、1和2时它才有效。
显示模式：0-13（除5和6外）有12种图形模式可供使用。
（参见P296表11.3）色彩：0，1，2，三种（参见P297表11.5）例：SCREEN 0，0模式为0，彩色为0表示屏幕工作在黑白字符模式下。
QBASIC语言
QBASIC语言符号常量用一个符号代替一个常量。
在程序中往往多次用到同一个数据，例如，求圆的半径、圆的面积、体积等，都要用到π=3.1416，如果写成：length=2*3.1416*rarea=3.1416*r*rvolume=4/3*3.1416*r*r*r，要多次重复写3.1416，又费事又容易出错。
可以先用一个符号pi代替3.1416，用CONST 语句来定义符号常量:CONST pi=3.1416则程序中的3.1416都可以用pi来代替。
有关变量的知识1.变量名和变量的值每一个变量都应该有一个名字，即变量名。
在同一个程序模块中，不能有两个同名的变量，也就是变量名必须是唯一的。
QBASIC对变量名有以下规定：(1)变量名的第一个字符必须是字母；(2)变量名中第2个字符及其后的各字符可以是字母、数字或小数点；(3)变量名的长度范围为1~40个字符；(4)表示变量类型的符号（如%、！、#、—、$)应作为最后一个字符；(5)不应该用QBASIC的保留字作为变量名使用（如语句定义符和函数名的等均属保留字，QBASIC保留字见附录）；(6)大小写字母等效，如num，Num，nUM等效，如果程序中先出现变量名num，后来又键入变量名Num，则QBASIC会将原来的num改为Num，以与后来输入的形式一致;(7)变量名中不可有空格。
2.变量的类型每一个变量都是用来存储数据的，由于数据分为不同的类型，因此存放数据的变量也应该具有相应的类型。
例如，用来存放整数的变量称为整型变量，在内存中占2个字节。
用来存放单精度实数的变量，称为单精度实型变量，占4个字节。
用来存放双精度实型数据的变量称为双精度变量，占8个字节。
用来存放长整型数据的，称为长整型变量，占4个字节。
用来存放字符串常量的变量称为字符串变量，每个字符占1个字节。
怎样定义变量的类型呢?或者说怎样使计算机识别变量属于哪种类型，以便分配相应的内存单元和确定数据的存放形式呢?有两种万法。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
关闭全部磁盘文件
RESTORE
RESTORE {行号|行标号}
允许从指定的行重读DATA语句
RESUME
RESUME {行号|行标号|NEXT}
错误捕捉程序调用后继续执行程序
RETURN
RETURN {行号|行标号}
控制从子程序里返回
RMDIR
RMDIR path
消去目录path(相当于DOS的RD)
FOR...NEXT
FOR...NEXT
允许一批命令在循环中执行给定的次数
FUNCTION
FUNCTION...END FUNCTION
说明过程函数的名字,参数和代码
GET
GET [#]filenum[,recnum[,variable]]
GET (x1,y1)-(x2,y2),array
把一磁盘文件读入随机存取缓冲器
说明要传递给被链接程序的变量
CONST
CONST常值名=常值表达式
说明用于代替数值或字符串的符号常数
DATA
DATA常量[,常量]...
为READ语句准备数据
DATE$
DATE$=S$
根据S$中的内容设置系统日期
DECLARE
DECLARE {FUNCTION|SUB}过程名[(参数表)]
说明引用过程和检查参数类型
SYSTEM
关闭所有打开文件并把控制返回操作系统
TIME$
TIME$=S$
按字符串S$来设置时间
TIMER {ON| OFF|STOP}
允许.禁止或轶计时事件捕捉
TRON/TROFF
TRON/TROFF
跟踪程序语句的执行TYPEຫໍສະໝຸດ TYPE...END TYPE
定义数据类型
UNLOCK
释放对文件一部分的锁定
向打印机按格式发送数据
LSET
LSET字段变量=S$
以左对齐方式把字符串数据放入随机文件缓冲区中
MID$
MID$(S$,n[,m])=r$
用r$把S$中的第n个符开始替换m个字符,原长度不变
MKDIR
MKDIR path
用字符串path建立一个子目录
NAME
NAME旧文件名AS新文件名
为文件改名
ON ERROR
ERROR
ERROR n
模拟产生BASIC错误n
EXIT
EXIT { DEF | DO | FOR | FUNCTION | SUB }
跳出循环或程序块
FIELD
FIELD [#]filenum,宽度AS字符串变量...
在随机存贮文件缓冲器里为变量分配空间
FILES
FILES [filespec]
显示指定磁盘上文件(相当于DOS的DIR)
DEF FN
DEF FN
DEF FN...END DEF
定义单行或多行函数
DEF SEG
DEF SEG[=n]
为需段地址语句定义数据段
DEF type
DEF type字符范围
定义变量的缺省类型
DIM
DIM变量[AS类型]
说明变量并分配存贮空间
DO...LOOP
DO...LOOP
根据条件决定是否进行循环
CHAIN
CHAIN filespec
将控制由当前程序转到别的程序
CHDIR
CHDIR path
改变现行的目录(相当于DOS的CD)
CIRCLE
CIRCLE(x,y),r,[,c[,start,end,[,aspect]]]
画圆或圆的一部分
CLEAR
CLEAR
重新初始化全部变量,关闭文件和设置堆栈的大小
以全屏幕方式将一页拷贝到另一页上
PEN {ON| OFF|STOP}
允许.禁止和暂停光笔事件捕捉
PLAY
PLAY字符串
演奏字符串指定的音乐
PLAY {ON|
OFF|STOP
允许.禁止和暂停对演奏事件的捕捉
POKE
POKE address,byte
将一字节写入指定内存单元
PRESET
PRESET (x,y)[,color]
QBASIC语句一览表
语句名
语句格式
功能
BEEP
BEEP
使喇叭发声
BLOAD
BLOAD filespc[,address]
把用BSAVE语句存贮的文件装入内存
BSAVE
BSAVE filespc,address,length
把某一内存区域中的内容存入磁盘
CALL
CALL过程名[(形式参数表)]
调用一个过程
PAINT
PAINT (x,y)[,color][,boundary]
在图形屏幕上用颜色或图案填充封闭区域
PALETTE
PALETTE attribute,color
改变调色板中的颜色
PALETTE USING
PALETTE USING array
改变调色板中所有颜色
PCOPY
PCOPY源显示而,目的显示页
VIEW
VIEW [SCREEN](x1,y1)-(x2,y2),color,border
为图形输出定义屏幕边界
VIEW PRINT
VIEW PRING top TO bottom
设置屏幕上文本窗口边界
WAIT
WAIT portno,and_value,xor_valud
监视端口状态并暂停程序的执行
ON ERROR GOTO {行号|行标号}
设置错误陷阱
ON even
ON even GOSUB {行号|行标号}
设置事件陷阱
ON...GOSUB
ON n GOSUB {行号|标号表}
转到第N个标号所示子程序
ON...GOTO
ON n GOTO {行号|标号表}
转到第n个标号所示语句
OPEN
OPEN filespec [FOR mode]AS [#]n [len=recordsize]
DRAW
DRAW S$
在显示器上画图
END
END {DEF | FUNCTION | IF| SELECT | SUB | TYPE}
结束程序.过程或程序块
ENVIRON
ENVIRON含"="的字符串
修改DOS环境字符串表中的参数
ERASE
ERASE array,[array]...
重新初始化静态数组,重新为动态数组分配空间
变量存储屏幕上的图像
GOSUB
RETURN
GOSUB...RETURN
将控制转移到子程序和从子程序返回
GOTO
GOTO {行号|行标号}
无条件转移到指定语句
IF...THEN... ELSE...
根据逻辑表达式的值进行条件执行
INPUT
INPUT[;][提示字符串{;|,}]变量表
在程序运行期间从键盘输入数据
得到自变量n的余弦值
CSNG
y=CSNG(n)
把一个数值转化为单精度数
CSRLIN
y=CSRLIN
返回光标行数位置
CVI
V%=CVI(2字节的串)
字符串转换为整型数
CVS
V!=CVS(4字节的串)
字符串转换为单精度数
CVL
V&=CVL(4字节的串)
字符串转换为长整数
CVD
V#=CVD(8字节的串)
字符串转换为双精度数
开启.关闭或停止捕捉指定键
KILL
KILL filespec
删去磁盘上的指定文件
LET
[LET]变量=表达示
赋值
LINE
LINE(x1,y1)-(x2,y2),color, BF, style
画线或方框
LINE INPUT
LINE INPUT[;][提示字符串{;|,}]字符串变量
输入一整行字符
LINE INPUT#
将变量或随机存贮缓冲器写入文件
将由GET得到的图像放置在屏幕上
RANDOMIZE
RANDOMIZE [n]
预置(重新播种)随机数发生器
READ
READ变量表
从DATA语句读数据并赋给变量
REDIM
REDIM变量AS类型...
改变已为动态数组分配的空间
REM
REM remark
在程序里插入说明或注释
RESET
LINE INPUT #filenum,S$
从顺序磁盘文件读一整行字符串到S$中
LOCATE
LOCATE row,col,cursor,start,stop
将光标移到指定位置或改变光标属性
LOCK ...
UNLOCK
用另外的过程控制对打开文件的全部或部分的存取
LPRINT
向打印机发送数据
LPRINT USING
打开磁盘文件
OPEN COM
OPEN "COMn:[baud][,parity][,data][,stop][,option]" AS [#]n [LEN=num]
打开一通讯文件
OPTION BASE
OPTION BASE n
设置数组下标缺省最小值
OUT
OUT portno,n
把一个字节值n送到I/O端口
在屏幕上画一点(缺省为背景色)
显示语句
PRINT #
输出字符串到文件
PRINT #
USING
格式输出到文件
PRING USING
格式显示
PSET
PSET (x,y)[,color]