什么是QBASIC语言????QBASIC是BASIC(Beginner's All-purpose Symbolic Instruction Code,初学者通用指令代码)语言的一个变种,由美国微软公司开发 , 1991年随MS-DOS 5.0推出 。它不能被编译成独立的可执行文件 , 源代码在集成开发环境(IDE)中先被编译成中间代码,然后中间代码在IDE中被解释执行 。它被设计用来代替GW-BASIC,并被集成在MS-DOS 5.0及其更高版本(包括Windows 95)中 。QBASIC基于微软稍早推出的QuickBASIC 4.5,但去掉了后者的编译和连接部分 。
Basic语言是计算机高级语言的一种,它简单、易学、好用,被广大计算机用户所青睐 。Basic语言的表达式与数学中的表达式相似,语句与自然语言相仿,极容易被初学者掌握,而Basic语言的最新发展Visual Basic 6.0、7.0 , 其友好的可视化编程界面、强大的面向对象编程能力及其网上发行和网上查询的功能,不仅能使用户方便而轻松地编写出具有任何功能的应用程序,而且更好地适应了网络时代的到来 。
微软在较新版本的Windows中不再集成QBASIC 。不过Windows 98的用户可以在光盘的\TOOLS\OLDMSDOS目录中找到它,在Windows 95的光盘中,它存放在\OTHER\OLDMSDOS目录中 。微软网站对它的技术支持只对MS-DOS的授权用户有效 。
QBASIC拥有一个值得称道的集成开发环境和一个功能强大的集成调试器,这一切在那个时代让人耳目一新 。直到今天,QBASIC依然是许多面向初学者的编程书籍的主题 。
语法
和Quick BASIC类似而又不同于微软其他BASIC的早期实现版本的是,QBASIC是一种结构化的编程语言 。和GW-BASIC相比 , QBASIC的主要改进是:
扩充了变量和常量的类型
变量名长度:40个字符
增加了长整型、定长字符型变量
可定义数值常量、字符串常量
提供了新的选择结构
条件语句
IFTHENELSE
多分支语句SELECT
改进了循环结构
增加以下两个循环语句:
WHILE循环
WHILE
WEND
DO循环
DO WHILELOOP
子程序和函数作为单独的模块
不需要行号
代码示例(赋值,求和运算,并显示结果)
LET A=10
LET B=20
LET C=A+B
PRINT C
在编写程序时为了节省时间,可以不用写LET;并且 , PRINT在编写程序时直接用“?”代替 。有一点非常重要,在参加竞赛时,程序第一行必须是CLS!
快捷键
F5:运行程序(其功能等于run)及继续运行被中断的程序;
Ctrl+Break:中断正在运行的程序;
Shift+F5:从第一条语句开始重新运行程序;
F4:当程序中断运行时,查看运行结果屏幕,再按一次F4则切换回代码屏幕;
F1:获得帮助 。
F2:切换主程序或SUB、FUNCTION 。
范例
范例1:
菜场上一公斤香菇是7.5元,编一个程序,从键盘上输入重量,计算机自动算出其总价
INPUT X
SUM=7.5*X
PRINT SUM
END
范例2:
卖西瓜 , 10千克以下每千克1.4元,10千克以上每千克0.7元,输入要买多少千克(必须为自然数),输出需要多少钱 。
INPUT X
IF XFIX(X) THEN ? "NO":GOTO 1
IF X>10 THEN SUM=10*1.4+(X-10)*0.7 ELSE SUM=X*1.4
PRINT SUM
END
范例3:
输入10个字母,比较大小,输出最大的一个
DIM A$(10)
FOR I=1 TO 10
INPUT A$(I)
NEXT I
B$=A$(1)
FOR I=2 TO 10
IF B$<A$(I) THEN B$=A$(I)
NEXT I
PRINT B$
END
上面的那些程序都太水了,我在此编了一个超长的画图程序:
DRAWTOOL.BAS
CLS
DO
SCREEN 1
SCREEN 0
PRINT TAB(16); "Draw tool"
PRINT STRING$(40, "*")
PRINT "Help:"
PRINT "Press highlighted letter."
FOR I = 1 TO 8
READ S$, S
GOTO PrintHLWord
PrintHLWordBack:
NEXT I
RESTORE
DATA "HorizontalBAR", 1, "UprightBAR", 1, "CrossBARs", 1, "BiasBAR1", 8
DATA "BiasBAR2", 8, "DiagonalBARs", 1, "DiffuseBARs", 2, "Exit", 1
ElseKey:
K$ = INPUT$(1)
SELECT CASE UCASE$(K$)
CASE "H"
GOTO HorizontalBAR
HorizontalBARBack:
CASE "U"
GOTO UprightBAR
UprightBARBack:
CASE "C"
GOTO CrossBARs
CrossBARsBack:
CASE "1"
GOTO BiasBAR1
BiasBAR1Back:
CASE "2"
GOTO BiasBAR2
BiasBAR2Back:
CASE "D"
GOTO DiagonalBARs
DiagonalBARsBack:
CASE "I"
GOTO DiffuseBARs
DiffuseBARsBack:
CASE "E"
END
CASE ELSE
GOTO ElseKey
END SELECT
LOOP
END
PrintHLWord:
IF S = 1 THEN
COLOR 15
PRINT LEFT$(S$, 1);
COLOR 7
PRINT MID$(S$, 2)
ELSE
COLOR 7
PRINT LEFT$(S$, S - 1);
COLOR 15
PRINT MID$(S$, S, 1);
COLOR 7
PRINT MID$(S$, S + 1)
END IF
GOTO PrintHLWordBack
HorizontalBAR:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO HorizontalBARBack
UprightBAR:
SCREEN 1
FOR I = 1 TO 200
PSET (100, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO UprightBARBack
CrossBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
PSET (100, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO CrossBARsBack
BiasBAR1:
SCREEN 1
FOR I = 1 TO 200
PSET (I, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO BiasBAR1Back
BiasBAR2:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO BiasBAR2Back
DiagonalBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, I)
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO DiagonalBARsBack
DiffuseBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
PSET (100, I)
PSET (I, I)
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO DiffuseBARsBack
路程图:
CLS
输入
计算
输出
END
QBASIC下载地址:
4.0版http://down.lihuasoft.net/irrwd/download/program/vb/qb40.zip
4.5版http://dlzisai.pchome.net/development/linetools/qb45.zip
4.0版的地址中有许多QB程序例子,比如SINEWAVE.BAS,可以画出正弦波 。
QBASIC语言中的!什么意思是单精度实型 。1!是1*1,3!是3×3×3的意思
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 变量 [ , 变量]…
…
…
DATA 常量 [,常量]…
功能:READ语句将DATA语句中提供的数据依次赋给指定的变量
RESTORE (恢复数据区语句)
格式:RESTORE [行号|行标号]
功能:从指定的DATA语句行中读入常量
数值函数
SIN (正弦函数)
格式:SIN (X)
功能:求X的正弦函数值
COS (余弦函数)
格式:COS(X)
功能:求X的余弦函数值
TAN (正切函数)
格式:TAN(X)
功能:求X的正切函数值
ATN (反正切函数)
格式:ATN(X)
功能:求X的反正切函数值
SQR (平方要函数)
格式:SQR(X)
功能:求X的算术平方根值,其中X必须大于或等于零
EXP (指数函数)
格式:EXP(X)
功能:求以e为底的X次幂,e=2.718282
LOG (对数函数)
格式:LOG(X)
功能:求以e为底的自然数值,即In x 的值
SGN (符号函数)
格式:SGN(X)
功能:求自变量X的符号
ABS (绝对值函数)
格式:ABS(X)
功能:求自变量X的绝对值 , 即|X|
INT (取整函数)
格式:INT(X)
功能:取不大于X值的最大整数
FIX (截取整数函数)
格式:FIX(X)
功能:把一个带有小数的数去掉小数部分,不进行舍入,直接截取整数部分 。自变量X可以是任意数值表达式
CINT (转为整数函数)
格式:CINT(X)
功能:把一个带有小数的数转换成整数,对小数部分四舍五入
CLNG (转为长整数函数)
格式:CLNG(X)
功能:把自变量X转变为长整数
CSNG (单精度函数)
格式:CSNG(X)
功能:把数值X转变为单精度数 , 其中自变量X是一个数值表达式 , 使用该函数它将被转换成单精度数
CDBL (双精度函数)
格式:CDBL(X)
功能:把数值X转变为双精度数,自变量X可以是任意数值表达式
RND (随机函数)
格式:RND(X)
功能:产生一个0与1之间的随机数
TIMER (?函数)
格式:TIMER
功能:从午夜开始计算秒数
ASCII (ASCII码函数)
格式:ASC(X$)
功能:返回字符串 X$ 第一个字符的ASCII代码
VAL (字符串转数值函数)
格式:VAL(X$)
功能:将字符串 X$ 转换成数值
LEN (测长函数)
格式:LEN(X$)
功能:测量字符串的长度,即字符串的字符个数
INSTR (子字符串检索函数)
格式:INSTR([N,] X$,Y$)
功能:返回字符串 Y$ 在字符串 X$ 中第一次出现的位置
屏幕显示格式中常用的三个函数
TAB (?函数)
格式:TAB(X)
功能:在指定位置X上显示或打印所需要的信息
SPC (?函数)
格式:SPC(X)
功能:空X个空格
SPACE$ (?函数)
格式:SPACE$(N)
功能:返回一个字符串,该字符串由N个空格组成
输入函数
INKEY$ (?函数)
格式:INKEY$
功能:从键盘上读一个字符
INPUT$ (?函数)
格式:INPUT$ (N[ , [#] 文件号])
功能:返回从键盘或指定文件中读出的N个字符组成的字符串
CSRLIN (光标行座标函数)
格式:CSRLIN
功能:返回当前光标行座标位置
POS (光标列座标函数)
格式:POS(N)
功能:返回当前光标列座标位置
UBOUND;LBOUND (测试下标上、下界函数)
格式:UBOUND(数组[,维])
LBOUND(数组[,维])
功能:返回一个已定义数组中指定维的上、下界
FRE (测试空字节函数)
格式:FRE(X)
功能:返回空闲内存节数
GOTO
格式:GOTO 行标识符
功能:改变程序的执行顺序,无条件地转去执行GOTO后面所指的行标识符去执行
ON/GOOT
格式:ON 表达式 GOTO 行标识符表
功能:先计算ON后面的表达式的值,再根据计算结果,将程序转移到GOTO所指行标识符表中的某个行标识符去执行
关系运算
= (等于)
> (大于)
>=(大于或等于)
< (小于)
<=(小于或等于)
(不等于)
AND(与)
OR (或)
NOT(非)
表: A B | NOT A | NOT B | A AND B | A OR B
1 1 | 0 | 0 | 1 | 1
1 0 | 0 | 1 | 0 | 1
0 1 | 1 | 0 | 0 | 1
0 0 | 1 | 1 | 0 | 0
逻辑运行顺序: NOT—AND—OR
()—算术—关系—逻辑
IF (条件语句)
单行 IF 条件语句
格式:IF 条件 THEN 语句序列1 [ELSE 语句序列2]
功能:首先计算条件的值,如果为真则执行THEN后的语句序列1,否则执行ELSE后面的语句序列2
块结构 IF 条件语句
格式:IF 条件1 THEN
[语句块1]
[ELSEIF 条件2 THEN
[语句块2]
……
[ELSE
[语句块n]]
END IF
CASE (条件语句)
格式: SELECT CASE 测试表达式
CASE 表达式表1
[语句块1]
[CASE 表达式表2
[语句块2]]
……
[CASE ELSE
[语句块N]]
END SELECT
功能:根据表达式的值,从多个语句块中选择符合条件的一个语句块执行
FOR/NEXT(循环语句)
格式:FOR A=E1 TO E2 STEP E3
循环体
NEXT A
说明: FOR 语句为循环说明语句,它说明了循环的次数FOR TO STEP 为语句定义符
A--循环控制变量,可以用任一简单变量表示
E1--循环控制变量的初值
E2--循环控制变量的终值
E3--循环控制变量的增值,也称步长
NEXT 语句为循环终端语句,它与FOR语句必须成对出现 NEXT语句中的循环控制变量必须与FOR语句中的一致
循环体由一条或多条语句构成,是被重复执行的部分
WHILE/WEND (循环语句)
格式: WHILE
循环体
WEND
说明: WHILE是循环的起始语句又称说明语句,它的作用是给出循环条件 WEND是循环的终止语句.
代表一个逻辑条件,它可以是一个关系表达式也可以是一个逻辑表达式,还可以是一个变量或常数
DO/LOOP (循环语句)
格式1: DO[(WHILE 或 UNTIL)条件]
循环体
[EXIT DO]
LOOP
格式2: DO
循环体
[EXIT DO]
LOOP[(WHILE 或 UNTIL)条件]
说明: 如果条件永远成DO-LOOP循环可能陷入"死循环"这时可用EXIT DO 来退出循环
DO循环可以嵌套,其规则与FOR-NEXT循环相同
字符串函数
CHR$ (字符函数)
格式:CHR$ (N)
功能:将ASCII码值N转换成它所表示的字符
MID$ (取中间字符串函数)
格式:MID$ (A$, N [,M])
功能:从字符串A$中,第N个字符起,取出M个字符
STRING$
格式1:STRING$(N, X)
功能: 产生N个ASCII码X所对应的字符.通常用在无法从键盘按输入的字符
格式2:STRING$(N, X$)
功能: 产生N个字符串X$中的第一个字符
OCT$ (十进制转八进制函数)
格式:OCT$ (X)
功能:将十进制数值转换成八进制字符串
STR$ (数值转换成字符串函数)
格式:STR$ (X)
功能:将数值数据转换成字符串数据
LTRIM$ (删除字符串左边空格函数)
格式:LTRIM$ (X$)
功能:删除字符串X$左边的空格
RTRIM$ (删除字符串右边空格函数)
格式:RTRIM$ (X$)
功能:删除字符串数据X$右边的空格
LCASE$ (小写函数)
格式:LCASE$ (A$)
功能:将A$中所有大写字母改成小写
UCASE$ (大写函数)
格式:UCASE$(A$)
功能:将A$中所有小写字母改成大写
TRIM$ (两头截空函数)
格式:TRIM$ (A$)
功能:截去字符串A$的头尾所有空格
LEFT$ (左取函数)
格式:LEFT$(A$,N)
功能:得到字符串A$最左边的N个字符
RIGHT$ (右取函数)
格式:RIGHT$(A$,N)
功能:得到字符串A$最右边的N个字符
HEX$(十进制数转换十六进制字符串)
格式:HEX$(N)
功能:将十进制数N转换成十六进制字符串
MKI$ (把整数转换为字符串)
IKL$ (把长整数转换为字符串)
MKS$ (把单精度数转换为字符串)
DATE$/TIME$ (取得系统的日期/时间)
GOSUB/RETURN (调用子程序语句和返回语句)
GOSUB (调用子程序)
格式: GOSUB
功能:用于转移到子程序的入口语句去执行
RETURN (子程序返回语句)
格式:RETURN []
功能:用于子程序执行完毕从子程序返回,作为子程序的结束语句
DEF FN (用户自定义函数)
格式1: DEF FN [(参数表)]=
格式2: DEF FN [(参数表)]
语句块
FN =
END DEF
功能: 定义一个用户自己的函数
SUB (过程定义)
格式: SUB 过程名[(参数表)][STATIC]
语句序列
END SUB
功能: 定义一个SUB过程
FUNCTION (过程定义)
格式: FUNCTION 过程名[(参数表)][STATIC]
语句序列
过程名=表达式
END FUNCTION
功能: 定义FUNCTION函数过程
DECLARE (过程说明语句)
格式: DECLARE [RUNCTION/SUB] 过程名[(参数表)]
功能: 对被调用的过程进行说明,对传递的自变量进行检查
DIM SHARED / COMMON SHARED (定义全局变量)
格试: DIM SHARED 变量名表 / COMMON SHARED 变量名表
功能: 将变量名表中的变量定义为全局变量
STATIC (定义局部变量)
格式: STATIC 变量表
功能: 在DEF FN 函数、FUNCTION 或 SUB 过程中把变量定义为局部变量
SHARED (共享变量)
格式: SHARED 变量[AS类型][,变量[AS类型]…
功能: 使主程序与某个过程共享变量
DIM (数组定义)
格式: DIM[SHARED] 变量 [(下标)][AS类型][,变量[(下标)][AS类型]]…
功能:说明变量或数组并分配存储空间
REDIM (改变分配给数组的空间)
格式: REDIM[SHARED] 变量 (下标)[AS类型][,变量(下标[AS类型]……
功能: 改变分配给动态数组的空间
OPTION BASE (?)
格式: OPTION BASE n
功能: 指定数组下标的缺省下界
OPEN (打开或建立文件)
格式1: OPEN 文件说明[FOR 方式1] AS [#] 文件号 [LEN=记录长度]
格式2: OPEN 方式2,[#] 文件号,文件说明[,记录长度]
说明:
1.在格式1中,"方式1"指定文件的输入/输出有以下几种方式:
OUTPUT 指定顺序输出方式
INPUT 指定顺序输入方式
APPEND 指定顺序添加方式
RANDOM 指定随机存取方式,也是缺省方式
2.格式2中的"方式2"指的是以下几种字符
O 指定顺序输出方式
I 指定顺序输入方式
R 指定随机读/写方式
A 指定顺序添加方式
CLOSE (结束文件的读/写操作)
格式:CLOSE [[#] 文件号 [, [#] 文件号 ]……]
功能: 结束文件的读/写操作
FREEFILE
格式:FREEFILE
功能:产生一个尚未使用的最小文件号
LOC
格式:LOC(N)
功能: 返回文件号为N的指定文件的当前位置
LOF
格式:LOF(N)
功能: 返回文件长度
PRINT#
格式:PRINT# 文件号,[USING 格式字符串;] 表达式[{,|;}]
功能: 把数据写入顺序文件中
WRITE#
格式:WRITE# 文件号,表达式表
功能: 把数据写入顺序文件中
INPUT#
格式:INPUT# 文件号,变量名
功能:从顺序文件中读出数据,并把读出的数据赋给相应的程序变量
LINE INPUT#
格式: LINE INPUT# 文件号,字符串变量
功能: 从顺序文件中读取一整行的数据,并赋给其后的字符串变量
EOF
格式: EOF(文件号)
功能:检查文件是否已读完
CLS
格式:CLS[0|1|2]
功能:清除部分或全部屏幕信息
说明: CLS 0 清除整个屏幕,系统缺省值
CLS 1 如果利用VIEW语句设置过图形视见区,则清除该区,否则清除整个画面
CLS 2 清除文本视见区,但屏幕的最底行仍保持不变
WIDTH
格式: 1. WIDTH 宽度
2. WIDTH LPRINT 宽度
功能: 语句格式1的功能是改变屏幕显示行的宽度,2的功能是改变打印机输出行的宽度
SCREEN
格式: SCREEN [模式][,颜色][,当前页][,可见页]
功能: 设置屏幕显示方式
PSET
格式:PSET [STEP](X,Y)[,颜色号]
功能:在指定的坐标位置上,以指定的颜色画一个点
PRESET
格式: PRESET [STEP](X,Y)[,颜色号]
功能:在屏幕的指定位置(X,Y)上画一个点
LINE
格式: LINE[[STEP](X1,Y1)]-[STEP](X2,Y2)[,[颜色号],[,B[F]][,类型符]
功能:在屏幕上画线段或矩形框
CIRCLE
格式: CIRCLE[STEP](X,Y)半径[,颜色][,起始角][,终止角][,纵横比]
功能: 以(X,Y)为圆心,用给定的半径画圆 椭圆或圆弧
DRAW
格式: DRAW 字符串
功能: 按语句中的字符串,逐步描绘出图形
COLOR
格式: 1. COLOR [前景色][,背景色][,边框色]
2. COLOR [背景色][,调色板]
PAINT
格式: PAINT [STEP](X,Y)[,颜色号][,边框色]
功能:给一个封闭的图形,涂上指定的颜色和边框色
VIEW
格式: VIEW [[SCREEN](X1,Y1)-(X2,Y2)[,[颜色号][,边框色]]]
功能:定义输出图形的屏幕尺寸
VIEW PRINT
格式: VIEW PRINT [顶行 TO 底行]
功能: 在屏幕上定义一个文本输出区域
WINDOW
格式: WINDOW[[SCREEN](X1,Y1)-(X2,Y2)
功能:定义当前视见区的逻辑尺寸
GET
格式: GET [STEP](X1,Y1)-[STEP](X2,Y2),数组名[(下标)]
功能:把屏幕上指定区域的图形映象存放到"数组"中
PUT
格式: PUT[STEP](X,Y),数组名[(下标)][,显示方式]
功能: 将GET语句所存入数组中的图形映象在屏幕所指定的区域重新显示出来
BEEP
格式: BEEP
功能: 使电脑喇叭发出"嘟"的一声
SOUND
格式: SOUND 频率,音长
功能: 使喇叭发出一定频率延时的声音
PLAY
格式: PLAY 命令字符串
功能: 用给定字符串表示的音乐演奏
QBASIC语言有什么用过时的编程语言
你要学就从C开始
qbasic常用命令你说的是常用命令,我来告诉你:
LET (赋值语句)
格式:[LET] 变量=表达式
功能:先计算右边表达式,然后将结果赋给左边的变量
SWAP (变量值交换语句)
格式:SWAP 变量1,变量2
功能:将变量1和变量2的值进行交换
PRINT (显示或输出语句)
格式:PRINT [表达式表][,|;]
功能:将指定的数据显示在屏幕上
LPRING (打印语句)
格式:LPRINT [表达式表][ , |;]
功能:将指定的数据用打印机打印出来
REM (注释语句)
格式1:REM 注释内容
格式2:’ 注释内容
功能:在程序中加以解释来说明该程序段的作用
END (结束语句)
格式:END
功能:结束一个程序
CLS (清屏语句)
格式:CLS
功能:清除屏幕上显示的信息
PRINT USING (自选显示格式语句)
格式:PRINT USING 〈“格式字符串”〉;〈表达式表〉 [;]
功能:根据格式字符串规定的格式,将表达式表中的数据显示在屏幕上
LPRINT USING (自选打印格式语句)
格式:LPRINT USING 〈“格式字符串”〉;〈表达式表〉[;]
功能:根据格式字符串规定的格式,将表达式表中的数据打印在打印机纸上
STOP (暂停语句)
格式:STOP
功能:暂停程序的执行
SLEEP (定时暂停语句)
格式:SLEEP [数值表达式]
功能:暂停执行程序,时间为数值表达式所指定的数值(以秒为单位)
INPUT (键盘输入语句)
格式:INPUT [;][“注释内容”][;|,]变量[,变量]
功能:通过键盘给INPUT语句中的各个变量依次提供数据
LINE INPUT (行输入语句)
格式:LINE INPUT [;][“注释内容”;]字符串变量
功能:将键盘上输入的字符串(最长为255个)赋给字符串变量
READ/DATA(读数/置数语句)
格式:READ 变量 [,变量]…
…
…
DATA 常量 [,常量]…
功能:READ语句将DATA语句中提供的数据依次赋给指定的变量
RESTORE (恢复数据区语句)
格式:RESTORE [行号|行标号]
功能:从指定的DATA语句行中读入常量
数值函数
SIN (正弦函数)
格式:SIN (X)
功能:求X的正弦函数值
COS (余弦函数)
格式:COS(X)
功能:求X的余弦函数值
TAN (正切函数)
格式:TAN(X)
功能:求X的正切函数值
ATN (反正切函数)
格式:ATN(X)
功能:求X的反正切函数值
SQR (平方要函数)
格式:SQR(X)
功能:求X的算术平方根值 , 其中X必须大于或等于零
EXP (指数函数)
格式:EXP(X)
功能:求以e为底的X次幂,e=2.718282
LOG (对数函数)
格式:LOG(X)
功能:求以e为底的自然数值,即In x 的值
SGN (符号函数)
格式:SGN(X)
功能:求自变量X的符号
ABS (绝对值函数)
格式:ABS(X)
功能:求自变量X的绝对值,即|X|
INT (取整函数)
格式:INT(X)
功能:取不大于X值的最大整数
FIX (截取整数函数)
格式:FIX(X)
功能:把一个带有小数的数去掉小数部分,不进行舍入,直接截取整数部分 。自变量X可以是任意数值表达式
CINT (转为整数函数)
格式:CINT(X)
功能:把一个带有小数的数转换成整数,对小数部分四舍五入
CLNG (转为长整数函数)
格式:CLNG(X)
功能:把自变量X转变为长整数
CSNG (单精度函数)
格式:CSNG(X)
功能:把数值X转变为单精度数,其中自变量X是一个数值表达式,使用该函数它将被转换成单精度数
CDBL (双精度函数)
格式:CDBL(X)
功能:把数值X转变为双精度数,自变量X可以是任意数值表达式
RND (随机函数)
格式:RND(X)
功能:产生一个0与1之间的随机数
TIMER (?函数)
格式:TIMER
功能:从午夜开始计算秒数
ASCII (ASCII码函数)
格式:ASC(X$)
功能:返回字符串 X$ 第一个字符的ASCII代码
VAL (字符串转数值函数)
格式:VAL(X$)
功能:将字符串 X$ 转换成数值
LEN (测长函数)
格式:LEN(X$)
功能:测量字符串的长度,即字符串的字符个数
INSTR (子字符串检索函数)
格式:INSTR([N,] X$ , Y$)
功能:返回字符串 Y$ 在字符串 X$ 中第一次出现的位置
屏幕显示格式中常用的三个函数
TAB (?函数)
格式:TAB(X)
功能:在指定位置X上显示或打印所需要的信息
SPC (?函数)
格式:SPC(X)
功能:空X个空格
SPACE$ (?函数)
格式:SPACE$(N)
功能:返回一个字符串,该字符串由N个空格组成
输入函数
INKEY$ (?函数)
格式:INKEY$
功能:从键盘上读一个字符
INPUT$ (?函数)
格式:INPUT$ (N[,[#] 文件号])
功能:返回从键盘或指定文件中读出的N个字符组成的字符串
CSRLIN (光标行座标函数)
格式:CSRLIN
功能:返回当前光标行座标位置
POS (光标列座标函数)
格式:POS(N)
功能:返回当前光标列座标位置
UBOUND;LBOUND (测试下标上、下界函数)
格式:UBOUND(数组[,维])
LBOUND(数组[,维])
功能:返回一个已定义数组中指定维的上、下界
FRE (测试空字节函数)
格式:FRE(X)
功能:返回空闲内存节数
GOTO
格式:GOTO 行标识符
功能:改变程序的执行顺序,无条件地转去执行GOTO后面所指的行标识符去执行
ON/GOOT
格式:ON 表达式 GOTO 行标识符表
功能:先计算ON后面的表达式的值,再根据计算结果,将程序转移到GOTO所指行标识符表中的某个行标识符去执行
关系运算
= (等于)
> (大于)
>=(大于或等于)
< (小于)
<=(小于或等于)
(不等于)
AND(与)
OR (或)
NOT(非)
表: A B | NOT A | NOT B | A AND B | A OR B
1 1 | 0 | 0 | 1 | 1
1 0 | 0 | 1 | 0 | 1
0 1 | 1 | 0 | 0 | 1
0 0 | 1 | 1 | 0 | 0
逻辑运行顺序: NOT—AND—OR
()—算术—关系—逻辑
IF (条件语句)
单行 IF 条件语句
格式:IF 条件 THEN 语句序列1 [ELSE 语句序列2]
功能:首先计算条件的值,如果为真则执行THEN后的语句序列1,否则执行ELSE后面的语句序列2
块结构 IF 条件语句
格式:IF 条件1 THEN
[语句块1]
[ELSEIF 条件2 THEN
[语句块2]
……
[ELSE
[语句块n]]
END IF
CASE (条件语句)
格式: SELECT CASE 测试表达式
CASE 表达式表1
[语句块1]
[CASE 表达式表2
[语句块2]]
……
[CASE ELSE
[语句块N]]
END SELECT
功能:根据表达式的值,从多个语句块中选择符合条件的一个语句块执行
FOR/NEXT(循环语句)
格式:FOR A=E1 TO E2 STEP E3
循环体
NEXT A
说明: FOR 语句为循环说明语句,它说明了循环的次数FOR TO STEP 为语句定义符
A--循环控制变量,可以用任一简单变量表示
E1--循环控制变量的初值
E2--循环控制变量的终值
E3--循环控制变量的增值,也称步长
NEXT 语句为循环终端语句,它与FOR语句必须成对出现 NEXT语句中的循环控制变量必须与FOR语句中的一致
循环体由一条或多条语句构成,是被重复执行的部分
WHILE/WEND (循环语句)
格式: WHILE
循环体
WEND
说明: WHILE是循环的起始语句又称说明语句,它的作用是给出循环条件 WEND是循环的终止语句.
代表一个逻辑条件,它可以是一个关系表达式也可以是一个逻辑表达式,还可以是一个变量或常数
DO/LOOP (循环语句)
格式1: DO[(WHILE 或 UNTIL)条件]
循环体
[EXIT DO]
LOOP
格式2: DO
循环体
[EXIT DO]
LOOP[(WHILE 或 UNTIL)条件]
说明: 如果条件永远成DO-LOOP循环可能陷入"死循环"这时可用EXIT DO 来退出循环
DO循环可以嵌套,其规则与FOR-NEXT循环相同
字符串函数
CHR$ (字符函数)
格式:CHR$ (N)
功能:将ASCII码值N转换成它所表示的字符
MID$ (取中间字符串函数)
格式:MID$ (A$, N [,M])
功能:从字符串A$中,第N个字符起,取出M个字符
STRING$
格式1:STRING$(N, X)
功能: 产生N个ASCII码X所对应的字符.通常用在无法从键盘按输入的字符
格式2:STRING$(N, X$)
功能: 产生N个字符串X$中的第一个字符
OCT$ (十进制转八进制函数)
格式:OCT$ (X)
功能:将十进制数值转换成八进制字符串
STR$ (数值转换成字符串函数)
格式:STR$ (X)
功能:将数值数据转换成字符串数据
LTRIM$ (删除字符串左边空格函数)
格式:LTRIM$ (X$)
功能:删除字符串X$左边的空格
RTRIM$ (删除字符串右边空格函数)
格式:RTRIM$ (X$)
功能:删除字符串数据X$右边的空格
LCASE$ (小写函数)
格式:LCASE$ (A$)
功能:将A$中所有大写字母改成小写
UCASE$ (大写函数)
格式:UCASE$(A$)
功能:将A$中所有小写字母改成大写
TRIM$ (两头截空函数)
格式:TRIM$ (A$)
功能:截去字符串A$的头尾所有空格
LEFT$ (左取函数)
格式:LEFT$(A$,N)
功能:得到字符串A$最左边的N个字符
RIGHT$ (右取函数)
格式:RIGHT$(A$,N)
功能:得到字符串A$最右边的N个字符
HEX$(十进制数转换十六进制字符串)
格式:HEX$(N)
功能:将十进制数N转换成十六进制字符串
MKI$ (把整数转换为字符串)
IKL$ (把长整数转换为字符串)
MKS$ (把单精度数转换为字符串)
DATE$/TIME$ (取得系统的日期/时间)
GOSUB/RETURN (调用子程序语句和返回语句)
GOSUB (调用子程序)
格式: GOSUB
功能:用于转移到子程序的入口语句去执行
RETURN (子程序返回语句)
格式:RETURN []
功能:用于子程序执行完毕从子程序返回,作为子程序的结束语句
DEF FN (用户自定义函数)
格式1: DEF FN [(参数表)]=
格式2: DEF FN [(参数表)]
语句块
FN =
END DEF
功能: 定义一个用户自己的函数
SUB (过程定义)
格式: SUB 过程名[(参数表)][STATIC]
语句序列
END SUB
功能: 定义一个SUB过程
FUNCTION (过程定义)
格式: FUNCTION 过程名[(参数表)][STATIC]
语句序列
过程名=表达式
END FUNCTION
功能: 定义FUNCTION函数过程
DECLARE (过程说明语句)
格式: DECLARE [RUNCTION/SUB] 过程名[(参数表)]
功能: 对被调用的过程进行说明,对传递的自变量进行检查
DIM SHARED / COMMON SHARED (定义全局变量)
格试: DIM SHARED 变量名表 / COMMON SHARED 变量名表
功能: 将变量名表中的变量定义为全局变量
STATIC (定义局部变量)
格式: STATIC 变量表
功能: 在DEF FN 函数、FUNCTION 或 SUB 过程中把变量定义为局部变量
SHARED (共享变量)
格式: SHARED 变量[AS类型][,变量[AS类型]…
功能: 使主程序与某个过程共享变量
DIM (数组定义)
格式: DIM[SHARED] 变量 [(下标)][AS类型][,变量[(下标)][AS类型]]…
功能:说明变量或数组并分配存储空间
REDIM (改变分配给数组的空间)
格式: REDIM[SHARED] 变量 (下标)[AS类型][,变量(下标[AS类型]……
功能: 改变分配给动态数组的空间
OPTION BASE (?)
格式: OPTION BASE n
功能: 指定数组下标的缺省下界
OPEN (打开或建立文件)
格式1: OPEN 文件说明[FOR 方式1] AS [#] 文件号 [LEN=记录长度]
格式2: OPEN 方式2,[#] 文件号,文件说明[,记录长度]
说明:
1.在格式1中,"方式1"指定文件的输入/输出有以下几种方式:
OUTPUT 指定顺序输出方式
INPUT 指定顺序输入方式
APPEND 指定顺序添加方式
RANDOM 指定随机存取方式,也是缺省方式
2.格式2中的"方式2"指的是以下几种字符
O 指定顺序输出方式
I 指定顺序输入方式
R 指定随机读/写方式
A 指定顺序添加方式
CLOSE (结束文件的读/写操作)
格式:CLOSE [[#] 文件号 [, [#] 文件号 ]……]
功能: 结束文件的读/写操作
FREEFILE
格式:FREEFILE
功能:产生一个尚未使用的最小文件号
LOC
格式:LOC(N)
功能: 返回文件号为N的指定文件的当前位置
LOF
格式:LOF(N)
功能: 返回文件长度
PRINT#
格式:PRINT# 文件号,[USING 格式字符串;] 表达式[{,|;}]
功能: 把数据写入顺序文件中
WRITE#
格式:WRITE# 文件号,表达式表
功能: 把数据写入顺序文件中
INPUT#
格式:INPUT# 文件号,变量名
功能:从顺序文件中读出数据,并把读出的数据赋给相应的程序变量
LINE INPUT#
格式: LINE INPUT# 文件号,字符串变量
功能: 从顺序文件中读取一整行的数据,并赋给其后的字符串变量
EOF
格式: EOF(文件号)
功能:检查文件是否已读完
CLS
格式:CLS[0|1|2]
功能:清除部分或全部屏幕信息
说明: CLS 0 清除整个屏幕,系统缺省值
CLS 1 如果利用VIEW语句设置过图形视见区,则清除该区,否则清除整个画面
CLS 2 清除文本视见区,但屏幕的最底行仍保持不变
WIDTH
格式: 1. WIDTH 宽度
2. WIDTH LPRINT 宽度
功能: 语句格式1的功能是改变屏幕显示行的宽度,2的功能是改变打印机输出行的宽度
SCREEN
格式: SCREEN [模式][,颜色][,当前页][,可见页]
功能: 设置屏幕显示方式
PSET
格式:PSET [STEP](X,Y)[,颜色号]
功能:在指定的坐标位置上,以指定的颜色画一个点
PRESET
格式: PRESET [STEP](X,Y)[,颜色号]
功能:在屏幕的指定位置(X,Y)上画一个点
LINE
格式: LINE[[STEP](X1,Y1)]-[STEP](X2,Y2)[,[颜色号],[,B[F]][,类型符]
功能:在屏幕上画线段或矩形框
CIRCLE
格式: CIRCLE[STEP](X,Y)半径[,颜色][,起始角][,终止角][,纵横比]
功能: 以(X,Y)为圆心,用给定的半径画圆 椭圆或圆弧
DRAW
格式: DRAW 字符串
功能: 按语句中的字符串,逐步描绘出图形
COLOR
格式: 1. COLOR [前景色][,背景色][,边框色]
2. COLOR [背景色][,调色板]
PAINT
格式: PAINT [STEP](X,Y)[,颜色号][,边框色]
功能:给一个封闭的图形,涂上指定的颜色和边框色
VIEW
格式: VIEW [[SCREEN](X1,Y1)-(X2,Y2)[,[颜色号][,边框色]]]
功能:定义输出图形的屏幕尺寸
VIEW PRINT
格式: VIEW PRINT [顶行 TO 底行]
功能: 在屏幕上定义一个文本输出区域
WINDOW
格式: WINDOW[[SCREEN](X1,Y1)-(X2,Y2)
功能:定义当前视见区的逻辑尺寸
GET
格式: GET [STEP](X1,Y1)-[STEP](X2,Y2),数组名[(下标)]
功能:把屏幕上指定区域的图形映象存放到"数组"中
PUT
格式: PUT[STEP](X,Y),数组名[(下标)][,显示方式]
功能: 将GET语句所存入数组中的图形映象在屏幕所指定的区域重新显示出来
BEEP
格式: BEEP
功能: 使电脑喇叭发出"嘟"的一声
SOUND
格式: SOUND 频率,音长
功能: 使喇叭发出一定频率延时的声音
PLAY
格式: PLAY 命令字符串
功能: 用给定字符串表示的音乐演奏
楼上的好像没学过qbasic吗,要加油?。。?
qbasic 命令 详细的解释下Quick BASIC类似而又不同于微软其他BASIC的早期实现版本的是,QBASIC是一种结构化的编程语言 。和GW-BASIC相比,QBASIC的主要改进是:
扩充了变量和常量的类型
变量名长度:40个字符
增加了长整型、定长字符型变量
可定义数值常量、字符串常量
提供了新的选择结构
条件语句
IFTHENELSE
多分支语句SELECT
改进了循环结构
增加以下两个循环语句:
WHILE循环
WHILE
WEND
DO循环
DO WHILELOOP
子程序和函数作为单独的模块
不需要行号
代码示例(赋值,求和运算,并显示结果)
LET A=10
LET B=20
LET C=A+B
PRINT C
在编写程序时为了节省时间 , 可以不用写LET;并且,PRINT在编写程序时直接用“?”代替 。有一点非常重要 , 在参加竞赛时,程序第一行必须是CLS!编辑本段|回到顶部快捷键F5:运行程序(其功能等于run)及继续运行被中断的程序;
Ctrl+Break:中断正在运行的程序;
Shift+F5:从第一条语句开始重新运行程序;
F4:当程序中断运行时,查看运行结果屏幕,再按一次F4则切换回代码屏幕;
F1:获得帮助 。
F2:切换主程序或SUB、FUNCTION 。编辑本段|回到顶部范例 范例1:
菜场上一公斤香菇是7.5元,编一个程序,从键盘上输入重量,计算机自动算出其总价
INPUT X
SUM=7.5*X
PRINT SUM
END
范例2:
卖西瓜 , 10千克以下每千克1.4元 , 10千克以上每千克0.7元,输入要买多少千克(必须为自然数),输出需要多少钱 。
INPUT X
IF XFIX(X) THEN ? "NO":GOTO 1
IF X>10 THEN SUM=10*1.4+(X-10)*0.7 ELSE SUM=X*1.4
PRINT SUM
END
范例3:
输入10个字母,比较大?。涑鲎畲蟮囊桓?br>DIM A$(10)
FOR I=1 TO 10
INPUT A$(I)
NEXT I
B$=A$(1)
FOR I=2 TO 10
IF B$<A$(I) THEN B$=A$(I)
NEXT I
PRINT B$
END
QBASIC 编译命令【qbasic】4.0以上版本才有这个功能!qb的集成环境可以直接设置,不需要编译命令
有谁能帮我解释一下Qbasic里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来演奏,使得两两音符之间有短暂的停顿 。
(2)ML(音乐连奏);使演奏时两两音符间不停顿 , 每个音符将演奏足L规定的音长 。
(3)Ms(音乐断音):使每个音符更短一些,以L给出的音值的3/4来演奏,以此来延长音符间的停顿 。
另外.QB演奏音乐时有两种方式供选择:前台音乐和背景音乐 。由MF和MB来确定 。当“命令字符串”中出现MF时,表示在前台插放音乐.即QB要等到执行完PLAY语句后才能继续往下执行程序,在播放音乐时不能做其它的事情 。而出现MB时,则表示在后台播放音乐,QB可以将最多32个音符或休止符保存在缓冲区,然后继续执行下面程序 , 而无需等待把这些音符全部演奏完 。这样 , MB允许QB在演奏的同时做一些其它的事情,如运算、绘图等等 。
现在,在了解了PLAY语句使用方法的基础上我们编制一个简单的程序,来演奏《友谊地久天长》的片断,其相应的简谱如下:
我们把这段乐曲分四部分 , 每部分单独用一字符串表示,为使两部分间有短暂停顿,在每一部分的末端都用MN演奏 。乐曲中连线处用ML连贯演奏 。
A$="O2MNG O3C.C16CE D.C16DE C.C16EG MNA4."
B$="A G.E16EC D.C16DE C.O2A16AG O3MNC4."
C$="A MLG.E16EC D.C16MNDA MLG.E16EG MNA4."
D$="O4C O3G.E16EC D.C16DE C.O2A16AG O3C4."
PLAY "T60 L8"+A$+B$+C$+D$
END
为清晰起见,程序中各小节的音乐编码之间以空格分开,这样编码与乐谱之间的对应关系一目了然 。
请告诉我17个Q-BASIC语言命令语句QBASIC - Statements
命令:
BEEP, BLOAD, BSAVE, CALL, CHAIN, CHDIR, CIRCLE, CLEAR, CLOSE, CLS, COLOR, COM, COMMON, CONST, DATA, DATE$, DECLARE, DEF, DEFDBL, DEFINT, DEFLNG, DEFSNG, DEFSTR, DIM, DO, DRAW, END, ENVIRON, ERASE, ERROR, EXIT, FIELD, FILES, FOR, FUNCTION, GET, GOSUB, GOTO, IF, INPUT, IOCTL, KEY, KILL, LET, LINE, LINE INPUT, LOCATE, LOCK, LPRINT, LSET, MID$, MKDIR, NAME, ON, OPEN, OPTION, OUT, PAINT, PALETTE, PCOPY, PEN, PLAY, POKE, PRESET, PRINT, PSET, PUT, RANDOMIZE, READ, REDIM, REM, RESET, RESTORE, RESUME, RETURN, RMDIR, RSET, RUN, SCREEN, SEEK, SELECT CASE, SHARED, SHELL, SLEEP, SOUND, STATIC, STOP, STRIG, SUB, SWAP, SYSTEM, TIME$, TROFF, TRON, TYPE, UNLOCK, VIEW, WAIT, WHILE, WIDTH, WINDOW, WRITE
程序:
CALL
CHAIN
DECLARE
END
OPTION
REM
RUN
STOP
事件:
ON
SLEEP
WAIT
结构:
DO
ERROR
EXIT
FOR
FUNCTION
GOSUB
GOTO
IF
RESUME
RETURN
SELECT CASE
SUB
WHILE
数据
CLEAR
COMMON
CONST
DATA
DEFDBL
DEFINT
DEFLNG
DEFSNG
DEFSTR
DIM
ERASE
INPUT
LET
MID$
RANDOMIZE
READ
REDIM
RESTORE
SHARED
SWAP
STATIC
TYPE
Pen
PEN
Joystick
STRIG
Keyboard
INPUT
KEY
LINE INPUT
Screen
CLS
COLOR
LOCATE
PALETTE
PCOPY
PRINT
SCREEN
VIEW
WIDTH
WINDOW
Printer
LPRINT
WIDTH
Graphics
CIRCLE
DRAW
GET
LINE
PAINT
PRESET
PSET
PUT
Sound
BEEP
PLAY
SOUND
Memory
BLOAD
BSAVE
CLEAR
DEF
DEF SEG
POKE
File
CLOSE
KILL
NAME
OPEN
RESET
Sequential file
INPUT
LINE INPUT
PRINT
WRITE
Random file
FIELD
GET
LOCK
LSET
PUT
RSET
SEEK
UNLOCK
Binary file
BLOAD
BSAVE
Directory
CHDIR
MKDIR
RMDIR
System
COM
ENVIRON
IOCTL
OUT
SHELL
SYSTEM
Date & Time
DATE$
TIME$
Debug
TROFF
TRON
BEEP
Sounds the speaker at 800 Hz for 1/4 second.
PRINT CHR$(7) also beeps
CIRCLE
>SCREEN 1: CIRCLE
CLOSE
Close an open file
>OPEN
DATA
>maskinkode: array
DEF
DEF SEG
Sets the current segment address.
DEF SEG [=address]
addressA segment address used by BLOAD, BSAVE, CALL ABSOLUTE, PEEK, or POKE
- a value in the range 0 - 65535.
If address is omitted, DEF SEG resets the current segment address to the default data segment.
Example:
DEF SEG = 0
Status% = PEEK(&H417)
POKE &H417, (Status% XOR &H40)
DEF SEG
Read keyboard status.
Change Caps Lock state, bit 6.
Reset segment address.
>maskinkode: array
DIM
DIM declares an array or specifies a data type for a nonarray variable.
>REDIM, $DYNAMIC, $STATIC
DIM [SHARED] variable[(subscripts)] [AS type][, variable[(subscripts)] [AS type]]...
SHAREDSpecifies that variables are shared with all SUB or FUNCTION procedures in the module.
subscriptsDimensions of the array, expressed as follows:
[lower TO] upper [, [lower TO] upper]...
lowerThe lower bound of the array's subscripts.
The default lower bound is zero.
upperThe upper bound.
>OPTION BASE
AS typeDeclares the data type of the array or variable:
INTEGERA 16-bit signed integer variable
LONGA 32-bit signed integer variable
SINGLEA single-precision 32-bit floating-point variable
DOUBLEA double-precision 64-bit floating-point variable
STRING * n%A fixed-length string variable n% bytes long
STRINGA variable-length string variable
DIM i%
DIM i AS INTEGER
DIM s AS STRING * 20
DIM a(4) AS SINGLE'5 numbers (0 to 4)
DRAW
> SCREEN 1: DRAW
GET
>GET [File I/O]
>GET [Graphics]
IF...THEN...ELSE
IF condition THEN statements [ELSE statements]
IF condition THEN
statements
[ELSEIF condition THEN
statements]...
[ELSE
statements]
END IF
KEY
>KEY [Assignment]
>KEY [Event Trapping]
LINE (Graphics)
> SCREEN 1: LINE
LOCATE
> SCREEN 0: LOCATE (show/hide/define cursor)
LPRINT
> Printer: LPRINT
> PRINT
MID$
The MID$ statement replaces part of a string variable with another string.
MID$(stringvariable$,start%[,length%])=stringexpression$
stringvariable$The string variable being modified.
start%The position of the first character in the substring being replaced.
length%The number of characters in the substring. If the length is omitted, MID$ replaces all characters to the right of the start position.
stringexpression$The replacement string. It can be any string expression.
Ex:
Text$ = "Paris, France"
PRINT Text$
MID$(Text$, 8) = "Texas "
PRINT Text$
Paris, France
Paris, Texas
>Function: MID$()
PAINT
> SCREEN 1: PAINT
PALETTE
> SCREEN 1: PALETTE
PLAY
> Sound: PLAY
> SOUND
> PLAY (Event Trapping)
POKE
> DEF SEG
> SCREEN 0: POKE (attributes and chars)
> PEEK()
PRESET
> PSET
> SCREEN 1: PRESET
PSET
> PRESET
> SCREEN 1: PSET
PUT
>PUT (File I/O)
>PUT (Graphics)
>GET
RANDOMIZE [seed]
Benytter 'seed' til at danne en ny start p? den sekvens af 'tilf?ldige' tal, som RND() returnerer.
Med en fast seed-v?rdi kan man sikre, at den tilf?ldige sekvens altid er den samme:
RANDOMIZE 124
FOR i = 1 TO 4
PRINT RND
NEXT
.2441675
.214439
.6458486
.7624476
Hvis talsekvensen skal v?re 'rigtig tilf?ldig' benyttes
RANDOMIZE TIMER
der benytter maskines aktuelle tid som seed.
REDIM
REDIM declares or resizes a dynamic array, erasing any previous values.
REDIM [SHARED] variable[(subscripts)] [AS type][, variable[(subscripts)] [AS type]]...
>DIM
SOUND
> Sound: SOUND
> PLAY
SYSTEM
Lukker alle ?bne filer og returnere til operativsystemet (DOS)
VIEW
Definerer et omr?de af en grafik-sk?rm ("viewport") - grafik (men ikke tekst) bliver begr?nset til dette omr?de.
VIEW Uden parametre nulstiller en defineret Viewport - s? hele sk?rmen benyttes til grafik.
Grafikkoordinater er relative til en defineret Viewport - men:
VIEW SCREEN ... benytter absolutte koordinater.
CLS rydder kun det indre af en Viewport.
VIEW [[SCREEN] (x1!,y1!)-(x2!,y2!) [,[color%] [,border%]]]
SCREENSpecifies that coordinates are relative to the
screen rather than the viewport.
(x1!,y1!)-(x2!,y2!)The coordinates of diagonally opposite corners
of the viewport.
color%A color attribute that sets the viewport fill
color. Depends on Screen mode.
border%A color attribute that sets the viewport border
color. Depends on Screen mode.
F?lgende to rutiner (uden og med SCREEN) giver samme resultat (bem?rk parametrene til CIRCLE):
SCREEN 1
VIEW (80, 80)-(160, 120), , 1
LOCATE 13, 13: PRINT "A viewport";
CIRCLE (25, 20), 30
SCREEN 1
VIEW SCREEN (80, 80)-(160, 120), , 1
LOCATE 13, 13: PRINT "A viewport";
CIRCLE (105, 100), 30
et udsnit af sk?rmen:
view1.gif (1722 bytes)
SCREEN 1
VIEW (80, 80)-(160, 120), 2, 1
LOCATE 13, 13: PRINT "A viewport";
CIRCLE (25, 20), 30
view2.gif (1904 bytes)
WHILE...WEND
WHILE
'statements
WEND
Wait for any key:
WHILE Inkey$="": WEND
WIDTH
> SCREEN
Visual Basic与Basic有什么不同吗?我接楼上的继续回答你的追问:
//////////////////////////////////////////////////////////////////////////////////////////////////////
Visual Basic与Basic的编程机制不同吗?
VB是典型的快速开发平台(缩写是RPD还是RAD什么的忘记了),以事件驱动为编程机制.具备一些面向对象的特性,但是没有采用面向对象程序设计的很多特性,比如继承,多态,构造,析构,重载.....
Basic是结构化编程,解析一行执行一行.
//////////////////////////////////////////////////////////////////////////////////////////////////////
还有Visual Basic是过程设计语言吗?
Basic,Pascal,C是面向过程的语言,Visual Basic不是的,因为怎么说VB都还是有面向对象的特性的嘛.所以我个人认为不是.
/////////////////////////////////////////////////////////////////////////////////////////////////////
买本程序设计的书,这些内容应该都有啊,C++/Java多看看,了解得更多.
VB和BASIC语言有什么区别Basic语言不等于VB,VB6使用的语言基础是Basic语言,但它与传统的Basic语言有较多差异 。BASIC(Beginners' All-purpose Symbolic Instruction Code,又译培基),意思就是“初学者通用符号指令代码”,是一种设计给初学者使用的程序设计语言 。BASIC是一种直译式的编程语言,在完成编写后不须经由编译及连结等手续即可执行,但如果需要单独执行时仍然需要将其建立成执行档 。BASIC是由达特茅斯学院院长、匈牙利人约翰·凯梅尼(John G. Kemeny)与数学系教师托马斯·卡茨(Thomas E. Kurtz)共同研制出来的 。1964年BASIC语言正式发布 。第一个BASIC程序在1964年5月1日早上4时 , 由BASIC编译程序进行编译后成功运行。1975年,比尔·盖茨把它移植到PC上 。在20世纪80年代中期 , 美国国家标准化协会(ANSl)根据结构化程序设计的思想,提出了一个新的BASIC标准草案 。在此前后,出现了一些结构化的BASIC语言,主要有True BASIC、Quick BASIC、Turbo BASIC等 。这些都是运行在Dos系统下的 。VB即Visual Basic是一种由微软公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言 。从任何标准来说,VB都是世界上使用人数最多的语言——不管是盛赞VB的开发者还是抱怨VB的开发者的数量 。它源自于BASIC编程语言 。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件 。程序员可以轻松的使用VB提供的组件快速建立一个Windows系统上的应用程序 。
QBASIC与BASIC与qbasic都不同?QBASIC是BASIC(Beginner's All-purpose Symbolic Instruction Code,初学者通用指令代码)语言的一个变种 , 由美国微软公司开发,1991年随MS-DOS 5.0推出 。它不能被编译成独立的可执行文件,源代码在集成开发环境(IDE)中先被编译成中间代码,然后中间代码在IDE中被解释执行 。它被设计用来代替GW-BASIC,并被集成在MS-DOS 5.0及其更高版本(包括Windows 95)中 。QBASIC基于微软稍早推出的QuickBASIC 4.5,但去掉了后者的编译和连接部分 。
Basic语言是计算机高级语言的一种,它简单、易学、好用,被广大计算机用户所青睐 。Basic语言的表达式与数学中的表达式相似,语句与自然语言相仿,极容易被初学者掌握 , 而Basic语言的最新发展Visual Basic 6.0、7.0,其友好的可视化编程界面、强大的面向对象编程能力及其网上发行和网上查询的功能,不仅能使用户方便而轻松地编写出具有任何功能的应用程序,而且更好地适应了网络时代的到来 。
微软在较新版本的Windows中不再集成QBASIC 。不过Windows 98的用户可以在光盘的\TOOLS\OLDMSDOS目录中找到它,在Windows 95的光盘中,它存放在\OTHER\OLDMSDOS目录中 。微软网站对它的技术支持只对MS-DOS的授权用户有效 。
QBASIC拥有一个值得称道的集成开发环境和一个功能强大的集成调试器,这一切在那个时代让人耳目一新 。直到今天,QBASIC依然是许多面向初学者的编程书籍的主题 。
和Quick BASIC类似而又不同于微软其他BASIC的早期实现版本的是,QBASIC是一种结构化的编程语言 。和GW-BASIC相比 , QBASIC的主要改进是:
扩充了变量和常量的类型
变量名长度:40个字符
增加了长整型、定长字符型变量
可定义数值常量、字符串常量
提供了新的选择结构
条件语句
IFTHENELSE
多分支语句SELECT
改进了循环结构
增加以下两个循环语句:
WHILE循环
WHILE
WEND
DO循环
DO WHILELOOP
子程序和函数作为单独的模块
不需要行号
代码示例(赋值,求和运算,并显示结果)
LET A=10
LET B=20
LET C=A+B
PRINT C
在编写程序时为了节省时间 , 可以不用写LET;并且,PRINT在编写程序时直接用“?”代替 。有一点非常重要,在参加竞赛时 , 程序第一行必须是CLS!
F5:运行程序(其功能等于run)及继续运行被中断的程序;
Ctrl+Break:中断正在运行的程序;
Shift+F5:从第一条语句开始重新运行程序;
F4:当程序中断运行时,查看运行结果屏幕 , 再按一次F4则切换回代码屏幕;
F1:获得帮助 。
范例1:
菜场上一公斤香菇是7.5元 , 编一个程序,从键盘上输入重量,计算机自动算出其总价
INPUT X
SUM=7.5*X
PRINT SUM
END
范例2:
卖西瓜,10千克以下每千克1.4元,10千克以上每千克0.7元,输入要买多少千克(必须为自然数),输出需要多少钱 。
INPUT X
IF XFIX(X) THEN ? "NO":GOTO 1
IF X>10 THEN SUM=10*1.4+(X-10)*0.7 ELSE SUM=X*1.4
PRINT SUM
END
范例3:
输入10个字母 , 比较大?。?输出最大的一个
DIM A$(10)
FOR I=1 TO 10
INPUT A$(I)
NEXT I
B$=A$(1)
FOR I=2 TO 10
IF B$<A$(I) THEN B$=A$(I)
NEXT I
PRINT B$
END
上面的那些程序都太水了 , 我在此编了一个超长的画图程序:
DRAWTOOL.BAS
CLS
DO
SCREEN 1
SCREEN 0
PRINT TAB(16); "Draw tool"
PRINT STRING$(40, "*")
PRINT "Help:"
PRINT "Press highlighted letter."
FOR I = 1 TO 8
READ S$, S
GOTO PrintHLWord
PrintHLWordBack:
NEXT I
RESTORE
DATA "HorizontalBAR", 1, "UprightBAR", 1, "CrossBARs", 1, "BiasBAR1", 8
DATA "BiasBAR2", 8, "DiagonalBARs", 1, "DiffuseBARs", 2, "Exit", 1
ElseKey:
K$ = INPUT$(1)
SELECT CASE UCASE$(K$)
CASE "H"
GOTO HorizontalBAR
HorizontalBARBack:
CASE "U"
GOTO UprightBAR
UprightBARBack:
CASE "C"
GOTO CrossBARs
CrossBARsBack:
CASE "1"
GOTO BiasBAR1
BiasBAR1Back:
CASE "2"
GOTO BiasBAR2
BiasBAR2Back:
CASE "D"
GOTO DiagonalBARs
DiagonalBARsBack:
CASE "I"
GOTO DiffuseBARs
DiffuseBARsBack:
CASE "E"
END
CASE ELSE
GOTO ElseKey
END SELECT
LOOP
END
PrintHLWord:
IF S = 1 THEN
COLOR 15
PRINT LEFT$(S$, 1);
COLOR 7
PRINT MID$(S$, 2)
ELSE
COLOR 7
PRINT LEFT$(S$, S - 1);
COLOR 15
PRINT MID$(S$, S, 1);
COLOR 7
PRINT MID$(S$, S + 1)
END IF
GOTO PrintHLWordBack
HorizontalBAR:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO HorizontalBARBack
UprightBAR:
SCREEN 1
FOR I = 1 TO 200
PSET (100, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO UprightBARBack
CrossBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
PSET (100, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO CrossBARsBack
BiasBAR1:
SCREEN 1
FOR I = 1 TO 200
PSET (I, I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO BiasBAR1Back
BiasBAR2:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO BiasBAR2Back
DiagonalBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, I)
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO DiagonalBARsBack
DiffuseBARs:
SCREEN 1
FOR I = 1 TO 200
PSET (I, 100)
PSET (100, I)
PSET (I, I)
PSET (I, 200 - I)
DO: LOOP WHILE INKEY$ = ""
NEXT I
SCREEN 0
GOTO DiffuseBARsBack
路程图:
CLS
输入
计算
输出
END
QBASIC下载地址:
4.0版http://down.lihuasoft.net/irrwd/download/program/vb/qb40.zip
4.5版http://dlzisai.pchome.net/development/linetools/qb45.zip
4.0版的地址中有许多QB程序例子 , 比如SINEWAVE.BAS , 可以画出正弦波 。
请问Qbasic与Basic有什么区别?C++与C语言有什么区别?C是面向过程 , c++属于面向对象
面向过程就需要编程人自己考虑程序运行的每个细节和函数功能的实现
C++提供了一个库类 , 想实现什么功能直接调用哪个类就行了,一个类基本上就实现了一个功能
BASIC与VB有哪些不同?Basic的发展过程是:Basic、QBasic、Visual Basic(VB) , 前两种只能在Dos下运行,而VB是在Windows下运行的可视化Basic 。但总的来说这几种Basic的编程方法类似,程序结构都是三种结构化程序设计结构,即顺序结构、选择结构、循环结构,所使用的语句基本类似 。有了一种Basic的基础,再学其它的很容易掌握,学得也比较快了 。
哪里可以下载到qbasic教程http://www.looquu.com/chanpin/233404.html
http://zjsanzg.zje.net.cn/zxxx/qb/qb5.htm
请打开上面网址,就会找到你的答案 。
Qbasic 与 Visual basic 的区别 ?QBASIC是第三代BASIC语言,Visual Basic是第四代 。
相比之下,最明显的区别是VB是可视化语言(Visual 就是“可视的”的意思) 。窗体上的控件(文本框、按钮、复选框等)一般地直接“画”就可以了 。同时 , VB是面向对象的 。现在人用QBASIC一般是为了进行计算(鲁教版高中数学要学QBASIC,很多工程师也要学),而不是为了做软件 。
如何用qbasic编写音乐用PLAY,例]10 PLAY "A"
也可以尝试SOUND
谁能告诉我Qbasic里怎么保存文件(在线等)点file 菜单 然后点save as....选择你要保存的位置和文件名称*.bas
然后点OK保存
QBASIC语言是什么!Basic,源远流长的编程语言
说起Basic,它是最古老的高级编程语言之一(1964年创建),在70年代得到很大的发展 。那时候的个人计算机 , Basic编程语言是必备的程序 , 像当时如日中天的苹果电脑很多机型就只配备了Basic编程语言,大名鼎 鼎的微软公司就是靠为苹果电脑 , IBM电脑开发Basic程序起家的 。随着DOS和Windows操作系统的出现,电脑初学者不用先学习Basic了,但Basic作为一种编程语言仍然在高速发展 。
作为新手入门最合适的语言,八有着辉煌的过去,当年比尔.盖茨还不是从BASIC起家的吗!但是后来BASIC一度因为它的结构混乱而不敌C语言之类结构化的语言低迷了一阵,自从结构化的Quick Basic推出特别是Visual Basic推出之后这种情况更是发生了巨大的变化,BASIC不光是一种初学者首选的语言也成了一种功能强大的Windows开发工具了 。我们可以很快的通过学basic走进编程的大门,也可以在熟练之后开发出强大的Windows应用程序 .
Basic语言的特点
语法简单,语句与常用英语相似,容易理解;
概念,基本语句较少,没有复杂的概念如指针等;
处理图像,音乐,字符串非常方便;
可以解释执行,调试程序非常方便;
不受硬件限制,编程不用了解内存,中断等 。
Qbasic是什么语言qbasic
QBASIC是BASIC(Beginner's All-purpose Symbolic Instruction Code,初学者通用指令代码)语言的一个变种,由美国微软公司开发 , 1991年随MS-DOS 5.0推出 。它不能被编译成独立的可执行文件,源代码在集成开发环境(IDE)中先被编译成中间代码 , 然后中间代码在IDE中被解释执行 。它被设计用来代替GW-BASIC,并被集成在MS-DOS 5.0及其更高版本(包括Windows 95)中 。QBASIC基于微软稍早推出的QuickBASIC 4.5,但去掉了后者的编译和连接部分 。
微软在较新版本的Windows中不再集成QBASIC 。不过Windows 98的用户可以在光盘的\TOOLS\OLDMSDOS目录中找到它 , 在Windows 95的光盘中,它存放在\OTHER\OLDMSDOS目录中 。微软网站对它的技术支持只对MS-DOS的授权用户有效 。
QBASIC拥有一个值得称道的集成开发环境和一个功能强大的集成调试器,这一切在那个时代让人耳目一新 。直到今天,QBASIC依然是许多面向初学者的编程书籍的主题 。
语法
和Quick BASIC类似而又不同于微软其他BASIC的早期实现版本的是,QBASIC是一种结构化的编程语言 。和GW-BASIC相比,QBASIC的主要改进是:
扩充了变量和常量的类型
变量名长度:40个字符
增加了长整型、定长字符型变量
可定义数值常量、字符串常量
提供了新的选择结构
条件语句
IFTHENELSEEND IF
多分支语句SELECT
改进了循环结构
增加以下两个循环语句:
WHILE循环
WHILEWEND
DO循环
DO WHILELOOP
子程序和函数作为单独的模块
不需要行号
代码示例(赋值,求和运算,并显示结果)
let A=10
let B=20
let C=A+B
Print C
快捷键
Ctrl+Break:中断正在运行的程序;
F5:继续运行被中断的程序;
Shift+F5:从第一条语句开始重新运行程序;
F4:当程序中断运行时,查看运行结果屏幕,再按一次F4则切换回代码屏幕;
F1:获得帮助 。
解释一下QBASIC语句DIM SUM AS INTEGET '声明一个变量
SUM=9850
SUM%=4988 '%号注明是整型
PRINTSUM,SUM% '打印出结果到屏幕
求QBASIC中文版的下载地址在 http://www.gougou.com/ 里面搜,然后用迅雷下 。一大把一大把的 。
windows10 64bit,怎么安装QBasicWindows10 64bit 是64位的操作系统 , QBASIC是16位的程序 , Windows10 64bit原生是不支持16位的程序执行的 。
如果要在Windows 10 64bit下运行QBASIC,有几个方法供参考:
1. 执行原生的16位QBASIC程序:安装DOSBOX这个DOS虚拟程序,然后将QBASIC的程序拷贝到DOSBOX的环境下 , 之后执行QBASIC的程序
2.采用QBASIC的替代版本QB64:有人专门做了一个32/64位下可以执行的QBASIC的程序,叫做QB64,可以在官网:www.qb64.net 上下载QB64程序,之后执行即可 。
qbasic 7.1下载打开Qbasic,在任务栏Qbasic一项上右键单击,选属性 , 里面有关于窗口大小的设置 。
求qbasic下载地址http://xiazai.zol.com.cn/detail/14/132311.shtml
网上百度一下都有,不过下的QB都不能直接使用中文 。
qbasic下载与使用我发给你一个,里面会说明我是wcwcwdn 。
一定要给我最佳答案 。
我已发送
有什么问题就在邮箱上给我回信
QBasic与Quick BASIC是一回事吗QBasic与Quick BASIC都是微软在DOS平台下推出的BASIC编程软件,这两者很像 , 但有一些区别 。
相同点:语法完全的一样的 , 两者的源代码可以通用 。
不同点:QBasic是解释执行的,只能在QBasic的IDE环境下运行 。Quick BASIC可以将源代码编译成exe文件,脱离Quick BASIC IDE环境直接在DOS下运行 。
QBASIC编程语言和C语言有什么不同?定义C语言是一种计算机程序设计语言 。它既有高级语言的特点,又具有汇编语言的特点 。它可以作为系统设计语言,编写工作系统应用程序,也可以作为应用程序设计语言,编写不依赖计算机硬件的应用程序 。因此,它的应用范围广泛 。C语言对操作系统和系统使用程序以及需要对硬件进行操作的场合,用C语言明显优于其它解释型高级语言 , 有一些大型应用软件也是用C语言编写的 。C语言具有绘图能力强,可移植性,并具备很强的数据处理能力,因此适于编写系统软件,三维 , 二维图形和动画 。它是数值计算的高级语言 。常用的C语言IDE(集成开发环境)有Microsoft Visual C++ , Borland C++ , Watcom C++ ,Borland C++,Borland C++ Builder,Borland C++ 3.1 for DOS,Watcom C++ 11.0 for DOS,GNU DJGPP C++ ,Lccwin32 C Compiler 3.1,Microsoft C,High C,Turbo C等等..QB即Quick Basic语言.QBasic语言是Quick Basic语言的子集 , 它只有解释执行功能 。属DOS平台下的编程语言 , 其精髓是当前VB及VB.NET编程语言的基础,只能说QBASIC编的程序不能在WIDOWS平台上运行 。DOS发展到后期,出现了Quick Basic语言,它将BASICA,LINK以及DEBUG等软件合并在一起,在同一环境下对用户的源程序自动进行处理--编辑,进行语法检查,编译连接,执行,调试等,最终生成在DOS下的可执行EXE文件.Quick Basic兼容以往的Basic,大多以往Basica开发的源程序不作修改就可在Quick Basic环境下运行或编译.但要注意必须是Basica下以ASCII码存盘的源文件.Visual Basic是可视化Basic编程语言,有4.0,5.0和6.0,发展到现在有.NET BASIC,其中Visual Basic 6.0是应用最广泛的初学者编程语言,它基本兼容大多数BASIC下的源代码或稍加改动就能应用于Visual Basic的代码内,Visual Basic是编译型语言,所生成的EXE文件能在具有VB同版本运行库文件的WINDOWS环境下运行.学好QBASIC语言对学好VB或C语言都有帮助,就象古汉语现在不用,但古汉语是学习现代汉语的基础一样 。
QBASIC语言与VBQBASIC和VB,当然是QBASIC比较简单一些 。但VB也比较简单 , 我是相对于初学者说的 。
我觉得你一开始还是学习VB吧,因为VB是在WINDOWS下编程,这样等你把VB学好了,对于WINDOWS下编程也就理解清楚了 。
而QBASIC是在DOS下编程,虽然很简单,但当你学好后,你还的从头学习WINDOWS下编程 。
DOS和WINDOWS编程不一样,至少观念上不一样 。就我个人而言 , 我喜欢DOS下编程,因为它很开放 。但现实是你不得不在WINDOWS下编程 。
下面,我给你推荐几本VB的好书:
VB程序设计
http://book.jqcq.com/product/368178.html
本书深入浅地介绍了Visual Basic 6.0中文企业版的编程环境、Visual Basic 6.0语言成分和程序结构、常用内部控件和ActiveX控件的功能和用法、菜单和工具栏、图形图像、文件管理以及数据应用程序的开发技术等内容,还简单介绍了Visual Basic.NET 。本书可作为高?...
我也会VB编程
http://book.jqcq.com/product/381954.html
《菜鸟冬瓜玩电脑》之《我也会VB编程》光盘及手册将引导你一步步学习和掌握编程的方法 。本手册共分为七章内容,分别向你讲述了编程的基本概念、VB编程之初体验、VB控件大全以及VB数据库编程等等 。在本手册光盘中我们更是给读者提供了一些大型的编程实例以及在本书中 ...
这些书对于初学者来说都比较好 。
LOGO语言和QBASIC语言有什么不同和相同?区别太大了
logo就是做图案 而QBASIC是考察你逻辑思维的语言
Qbasic和VB只是用同一种语法,但它们的环境不一样,QBASIC是练习编程的,VB是可视话的,VB虽然是可以使用QB语言的,但它的功能比VB要大 。
怎样让一个QBASIC程序一打开就运行对不起 , 我研究了几天,没有发现这种可能性 。
widowsXP中怎么打开QBASIC?dos:点"开始"菜单的"运行",输入"cmd",出现窗口
QBASIC:在DOS窗口中输入它所在的盘,输入":/",回车
再输入路径,就OK了~~~
要分
怎么启动QBASIC啊,我用的是XP系统一直陪伴着她
和一锅炖杂草,
爹,抱我下来 。
一棵树生长
风到什麽地方去 。
就在天空中累积哈哈
QBASIC语言程序怎么在电脑上运行可以装个DOSbox软件,然后在Dosbox窗口里运行 。或者用VMwork虚拟机安装个DOS操作系统 。最简单的是用windows的CMD命令来执行 。以上三种方法各有优缺点:CMD命令方式操作简单 , 但消耗资源大,而且兼容性差,VMwork虚拟机方式兼容性最好 , 因为它本来就虚拟了一个安装DOS的PC机,跟真正的实际PC机一模一样,如果编程是与硬件高度相关,采用这种方式最好,缺点是占用CPU资源太大,几乎100% 。DosBox兼顾了以上两种方式的优点,占用CPU资源少而且兼容性也很好(大多数知名的DOS游戏可以很顺畅的运行),并且可以调整运行速度,高度推荐?。。?
qbasic45 的程序 现在能用什么打开电脑上的可执行文件的关联出现了问题所以打不开 。
方法一:
1,打开注册表编辑器把HKEY_CLASSES_ROOT\exefile\shell\open\command里的叫默认值的键值改为"%1" %*
把系统目录下Regedit.exe文件复制出来,将Regedit.exe改成Regedit.com,运行就可以了 。
方法二:
2,打开“我的电脑”,进入菜单“工具”→“文件夹选项”→“文件类型”,在现有的文件类型中找不到扩展名为exe的文件类型,可单击“新建”弹出“新建扩展名”对话框,在“文件扩展名”框中填入“exe” , 接着单击“高级”,在“关联的文件类型”下拉框中选择“应用程序”,单击“确定”返回,最后单击“应用”后关闭对话框 。
方法三:
下一个工具,比如360急救箱,扫描一下,可以自动修复关联 。
Qbasic 排序的格式及说明cls
input n
dim a(n)
for i=1 to n
input a(i)
next i
'这个循环是要把每个数都输入了,有几个数,就可循环多少次 。
for i=1 to n-1
for j=i+1 to n
if a(i)>a(j) then swap a(i),a(j)
next j
next i
'这两个循环 , 都是用一个数和它后面的所有数比较,先求出a(1),就是最小数 , a(2)是第二小的数……最后一项是最大数
for i=1 to n
?a(i);
next i
'这个循环是要把所有数输出 。
关于qbasic直接删除你下载的那个文件包或者程序就行了
实在不行用文件粉碎器
QB不是那种安装在控制面板里的程序
给我分……………………………………
用QBASIC做x=0
sum=0
while sum903
x=x+1
sum=sum+x-1
wend
print "有" & x & "人出席"
qbasic??...电脑排斥程序,我也有过,在下一个,或在拷一个呗
QBasic语言是什么?QBasic适合初学者学习,主要编写简单程序(因为范围在-32766—32767之间,大了就自动成科学记数法了,除非定义双精度或用字符串 。当数位超过32767位是,就不行了) 。运行界面是蓝色的 。QBasic分4.5版和7.1版的我用7.1的 。想要发邮件给我:729428718@qq.com 。程序是一条一条命令来编的 。
- verycd
- ie最新版本
- qq2013
- 马克斯cms
- 浴桶怎么选择 沐浴木桶选购需要注意什么
- 王羲之 十字加一笔是什么字
- skype官方下载
- 档案管理软件
- docx文件
- 上海奉贤黄桃什么时候采摘 上海奉贤黄桃的采摘时间