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,但去掉了后者的编译和连线部分。
基本介绍 外文名 :Beginner's All-purpose Symbolic Instruction Code 简称 :QBasic 类型 :计算机语言 开发公司 :美国微软 特点,现状,语法,快捷键,范例, 特点 Basic语言是计算机高级语言的一种,它简单、易学、好用,被广大计算机用户所青睐。Basic语言的表达式与数学中的表达式相似,语句与自然语言相仿,极容易被初学者掌握,而Basic语言的最新发展Visual Basic 6.0、7.0,其友好的可视化编程界面、强大的面向对象编程能力及其网上发行和网上查询的功能,不仅能使用户方便而轻松地编写出具有任何功能的应用程式,而且更好地适应了网路时代的到来。 在windows 8中运行qbasic 现状 微软在较新版本的Windows中不再集成QBASIC。不过Windows 98的用户可以在光碟的\TOOLS\OLDMSDOS目录中找到它,在Windows 95的光碟中,它存放在\OTHER\OLDMSDOS目录中。微软网站对它的技术支持只对MS-DOS的授权用户有效。 QBASIC拥有一个值得称道的集成开发环境和一个功能强大的集成调试器,这一切在那个时代让人耳目一新。直到今天,QBASIC依然是许多面向初学者的编程书籍的主题。 语法 和Quick BASIC类似而又不同于微软其他BASIC的早期实现版本的是,QBASIC是一种结构化的程式语言。和GW-BASIC相比,QBASIC的主要改进是: 扩充了变数和常量的类型 变数名长度:40个字元 增加了长整型、定长字元型变数 可定义数值常量、字元串常量 提供了新的选择结构 条件语句 IF <条件> THEN <语句组1> ELSE <语句组2> 多分支语句SELECT 改进了循环结构 增加以下两个循环语句: 【WHILE循环】 WHILE <条件> <循环体> WEND 【DO循环】 DO WHILE <条件> <循环体> LOOP 子程式和函式作为单独的模组 不需要行号 代码示例(赋值,求和运算,并显示结果) LET A=10LET B=20LET C=A+BPRINT C 在编写程式时为了节省时间,可以不用写LET;并且PRINT在编写程式时直接用“?”代替。有一点非常重要,在参加竞赛时,程式第一行必须是CLS! 快捷键 QBASIC 7.1快捷键: F5:运行程式及继续运行被中断的程式; Ctrl+Break:中断正在运行的程式; Shift+F5:从第一条语句开始重新运行程式; F4:当程式中断运行时,查看运行结果萤幕,再按一次F4则切换回代码萤幕; F1:获得帮助。 F2:切换主程式或SUB、FUNCTION。 F9:增加断点。 Alt+Enter:全萤幕。 Shift+F5:在程式终止时重新从头执行。 Ctrl+Insert:选定文字后复制到剪下板(Ctrl+C无效) Shift+Insert:将剪贴簿中的文字贴上。(Ctrl+V无效) 范例 范例1: 菜场上一公斤香菇是7.5元,编一个程式,从键盘上输入重量,计算机自动算出其总价 INPUT XSUM=7.5*XPRINT SUMEND 范例2: 卖西瓜,10千克以下每千克1.4元,10千克以上每千克0.7元,输入要买多少千克(必须为自然数),输出需要多少钱。 INPUT XIF X<>FIX(X) THEN ? "NO":GOTO 1IF X>10 THEN SUM=10*1.4+(X-10)*0.7 ELSE SUM=X*1.4PRINT SUMEND 范例3: 输入10个字母,比较大小,输出最大的一个 DIM A$(10)FOR I=1 TO 10 INPUT A$(I)NEXT IB$=A$(1)FOR I=2 TO 10 IF B$<A$(I) THEN B$=A$(I)NEXT IPRINT B$END 范例4: 一个游戏: CLS '清屏LOCATE 5, 38 '定位到5,38PRINT "Game" '显示LOCATE 16, 34 '定位到16,34PRINT "Press Enter" '显示DOLOOP WHILE INKEY$ = "" '暂停DIM Name1$, Name2$, HP1, HP2, Temp$CLS '清屏LOCATE 8 '定位至第8行PRINT " Input 1st player's name"; '输入玩家1的名字INPUT Name1$PRINT " Input 2nd player's name"; '输入玩家2的名字INPUT Name2$RANDOMIZE TIMERHP1 = INT(RND * 50) + 50 '随机决定玩家1的HPHP2 = INT(RND * 50) + 50 '随机决定玩家2的HPPRINT STRING$(12, " ") + Name1$ + "'s HP is " + STR$(HP1) '显示玩家1的HPPRINT STRING$(12, " ") + Name2$ + "'s HP is " + STR$(HP2) '显示玩家2的HPPRINT " Press any key to contiune"DOLOOP WHILE INKEY$ = "" '暂停DIM Row, Text$, Attack, IText$ = "n"Row = 0CLSDO '循环 PRINT PRINT Name1$ + "'s HP:" + STRING$(16 - LEN(Name1$), " "); PRINT STRING$(INT(HP1 / 2), 2) PRINT PRINT Name2$ + "'s HP:" + STRING$(16 - LEN(Name2$), " "); PRINT STRING$(INT(HP2 / 2), 2) '以上这几句是用图形来表示HP FOR I = 1 TO 4 PRINT NEXT '显示空行 Row = Row + 1 '回合数+1 PRINT STRING$(11, " ") + STR$(Row) + "." PRINT STRING$(12, " ") + Name1$ + " now has HP " + STR$(HP1) PRINT STRING$(12, " ") + Name2$ + " now has HP " + STR$(HP2) '以上几句显示回合数和HP数 DO LOOP WHILE INKEY$ = "" '暂停 Attack = INT(RND * 20) '随机决定攻击点数 Text$ = STRING$(12, " ") + Name1$ Text$ = Text$ + " attack " + Name2$ + " " + STR$(Attack) '先想好要显示的文字 HP2 = HP2 - Attack '用玩家2的HP减去攻击点数 PRINT Text$ '显示文字 DO LOOP WHILE INKEY$ = "" '暂停 Attack = INT(RND * 20) '随机决定攻击点数 Text$ = STRING$(12, " ") + Name2$ Text$ = Text$ + " attack " + Name1$ + " " + STR$(Attack) '先想好要显示的文字 HP1 = HP1 - Attack '用玩家1的HP减去攻击点数 PRINT Text$ '显示文字 IF HP1 <= 0 OR HP2 <= 0 THEN EXIT DO 如果玩家1或2的HP小于等于0就退出循环 DO LOOP WHILE INKEY$ = "" '暂停 CLSLOOPIF HP1 <= 0 THEN PRINT STRING$(12, " ") + Name2$ + " win"IF HP2 <= 0 THEN PRINT STRING$(12, " ") + Name1$ + " win"IF HP1 <= 0 AND HP2 <= 0 THEN PRINT STRING$(12, " ") + "Double win!" 这里有一个超长的画图程式: 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
BASIC简介
Beginner's All-purpose Symbolic Instruction Code,简称BASIC,最初是由John G. Kemeny和Thomas E. Kurtz两位教授在1960年代中期在Dartmouth学院创立的。这款语言因其简洁易学的特性迅速流行,成为了早期家用小型电脑,甚至部分大型电脑上广泛使用的编程语言,如TRS-80 BASIC、Apple BASIC等。随着计算机科技...
BASIC历史
BASIC语言起源于20世纪70年代初期,最初功能简单,只有14条语句,后来增加到17条,被称为“基本的BASIC”。这个时期的BASIC主要用于小型计算机的编译执行。随着微型计算机的诞生,BASIC逐渐普及,微软总裁比尔·盖茨在其19岁的创业项目中引入了BASIC,使得BASIC成为微机的标准配置,但不同机型对其扩展导致了不...
BASIC关于
BASIC涵盖的编程类型广泛,包括工业编程语言,如A+、Ada、C++等,它们被设计用于复杂的系统开发和高效性能的需求。脚本编程语言如JavaScript和ActionScript,则更多地应用于网页交互和动态内容的生成。学术界也青睐于BASIC,如Haskell和Logo这样的编程语言,它们在教育和理论研究中占据重要地位。此外,BASIC还包括...
BASIC语言概述
BASIC是一种面向初学者的高级编程语言,其英文全称是"Beginner's All-Purpose Symbolic Instruction Code",缩写为"BASIC"。这个名称充分体现了它作为一门为初学者设计的多功能编程语言的定位,历史上在计算机领域有着广泛的应用。如同人类语言有标准和方言之分,电脑语言也是如此。BASIC语言并非一种固定不变...
BASIC名字
BASIC,全称为Beginner's All-purpose Symbolic Instruction Code,最初由作者构思,后来被微软广泛称为Basic。它的设计初衷是为了让大学生们能够更容易地接触和使用计算机,尽管最初的版本只有16条语句,但其易学性使其迅速从校园走向社会,成为了初学者入门编程的首选语言。1975年,比尔·盖茨创立的Microsoft...
BASIC语言发展史
Quick BASIC的发展历程中,1991年随着MS-DOS5.0的发布,微软推出了简化版QBASIC,作为操作系统的一部分免费提供给用户。随着Windows的普及,图形用户界面(GUI)的Visual Basic开始广泛应用,如Visual Basic .NET在2001年首次亮相,之后的2003年、2005年、2008年分别带来了Visual Basic .NET 2003、Visual ...
BASIC语言特点
BASIC语言以其显著的特点受到广大用户的欢迎。首先,它的简单易学特性让人印象深刻。BASIC语言的设计理念是将英语单词直接应用于编程,运算符号和表达式的书写方式与数学中的常规表达类似,使得学习过程直观且易于理解。标准的BASIC语句仅有17种,进一步简化了编程入门的门槛。其次,BASIC语言具备会话式交互特性。
BASIC是什么?
BASIC是一种高级语言,它的英文含义是“初学者通用符号指令代码”,是在1965年5月,由美车科学家托马斯·库尔兹研制出来的。10多年后,(现微软公司的总裁)比尔·盖茨把它移植到微型机上。三十多年来,BASIC语言一直是初学计算机语言者使用最广泛的一种高级语言。它能进行数值计算、画图、演奏音乐,功能...
qbasic详细资料大全
QBASIC是BASIC(Beginner's All-purpose Symbolic Instruction Code,初学者通用指令代码)语言的一个变种,由美国微软公司开发,1991年随MS-DOS 5.0推出。它不能被编译成独立的执行档,原始码在集成开发环境(IDE)中先被编译成中间代码,然后中间代码在IDE中被解释执行。它被设计用来代替GW-BASIC,并被集成在MS-DOS 5.0及...
波音717-200basic基本资料
波音717-200基本型号的详细规格如下:机长:37.8米,翼展达到28.4米,机身高度为8.9米,展现出其独特的设计和紧凑的机身布局。飞机可容纳106名乘客,通常采用两级客舱设计,为乘客提供了舒适的旅行体验。货舱容积为26.5立方米,能满足一定的货物运输需求。空重方面,波音717-200的基本型号重达31,674...
笪苛康赛: 这个"狠"麻烦 这是介绍:BASIC(Beginner's All-purpose Symbolic Instruction Code 的缩写,意为初学者通用符号指令代码)语言是在1964年由美国的两位教授Thomas 和John G.Kemeny在Fortran语言的基础上设计的语言系统,这个简单、...
福州市17065508009: 请问qbasic软件下载后怎样才能使用? 麻烦详细点 我给最佳答案 - ?
笪苛康赛: 一个RAR文件,解压后,打开QBX.EXE.
福州市17065508009: QBASIC语言教程下载 - ?
笪苛康赛: 电子书一般都要付钱的.我这里有个网页阅读.蛮好的.可以在线阅读也可下载网页:http://www.zbyz.net/school/qbasic/qbjx.htm
福州市17065508009: 学会基本的Qbasic后怎用运用??
笪苛康赛: 基本没用,因为操作系统环境的原因,学了QB学VB只是几天的事,VB会了那就想干什么都行了.
福州市17065508009: 求一份MATLAB语言详细简介 - ?
笪苛康赛: MATLAB 语言是当今国际上科学界 (尤其是自动控制领域) 最具影响力、也是最有活力的软件.它起源于矩阵运算,并已经发展成一种高度集成的计算机语言.它提供了强大的科学运算、灵活的程序设...
福州市17065508009: 有关华为网络工程师的尽可能详细的资料?
笪苛康赛: 石家庄 一级分为DOS版和Windows版,考核应试者计算机基本知识和使用微机系统的初步能力. 二级考核应试者软、硬件基础知识和使用一种高级计算机程序设计语言(QBASIC、FORTRAN、Pascal、C、FoxBASE)编制程序、上机调试的...
福州市17065508009: dos命令大全 - ?
笪苛康赛: 常用的命令 cd 改变当前目录 cls 清屏 copy 拷贝文件 del 删除文件 deltree 删除目录树 dir 列文件名 diskcopy 复制磁盘 edit 文本编辑 format 格式化磁盘 md 建立子目录 mem 查看内存状况 more 分屏显示 move 移动文件、改目录名 rd 删除目录 ren ...
福州市17065508009: 某暗挖隧道工程中标签订施工合同后,施工公司组建项目部进场,首先在...?
笪苛康赛: 永远的7日之都宝具资料汇总,最全最详细的宝具攻略小编已经为大家整理好了,想必大家对这款游戏的玩法攻略非常感兴趣.现在第一时间将这篇攻略分享给玩家们,小...
福州市17065508009: 波音全系列飞机具体数据 - ?
笪苛康赛: 展开全部 波音737系列飞机技术数据 波音737-600 波音737-700 波音737-800 波音737-900ER 载客量 典型的两级客舱布局 典型的单级客舱布局 110人 132人 126人 149人 162人 189人 180人 220人 载货量 720立方米 (20.4立方米) 966立方英...