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的后面，一个符 点可延长该音长的二分之一。
- 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]