Qbasic语言程序设计 V4.5绿色汉化版

Tags：

kkx小编为大家分享的Qbasic语言程序设计是微软公司开发的，可以帮助初学者熟悉计算机编程语言的一些基本概念。它是BASIC语言变化而来，这款软件能够很好的代替GW-BASIC，虽然不能够编译成各种独立的可执行文件，但是源代码可以在集成开发魂晶中先被编译成中间代码，中间代码在IDE中被解释执行。qbasic被设计成用来替代GW-BASIC，并被集成在MS-DOS 5.0及其更高版本。Qbasic语言程序设计拥有简单、易学、好用，被广大计算机用户所青睐。

qbasic使用说明

qbasic是32位的程序，不过小编也准备了64位的环境内容，用户根据自身系统选择使用。

Qbasic语言程序设计的语法

扩充了变量和常量的类型
变量名长度：40个字符
增加了长整型、定长字符型变量
可定义数值常量、字符串常量
提供了新的选择结构
条件语句
IF <条件> THEN <语句组1> ELSE <语句组2>
多分支语句SELECT
改进了循环结构
增加以下两个循环语句:
【WHILE循环】
WHILE <条件>
<循环体>
WEND
【DO循环】
DO
WHILE <条件> <循环体>
LOOP
子程序和函数作为单独的模块
不需要行号
代码示例（赋值,求和运算,并显示结果）
LET A=10
LET B=20
LET C=A+B
PRINT C
在编写程序时为了节省时间，可以不用写LET；并且，PRINT在编写程序时直接用“？”代替。有一点非常重要，在参加竞赛时，程序第一行必须是CLS！

Qbasic语言程序设计的快捷键

F5：运行程序及继续运行被中断的程序；
Ctrl+Break：中断正在运行的程序；
Shift+F5：从第一条语句开始重新运行程序；
F4：当程序中断运行时，查看运行结果屏幕，再按一次F4则切换回代码屏幕；
F1：获得帮助。
F2：切换主程序或SUB、FUNCTION。
F9：增加断点。
Alt+Enter：全屏。
Shift+F5：在程序终止时重新从头执行。
Ctrl+Insert：选定文字后复制到剪切板（Ctrl+C无效）
Shift+Insert：将剪贴板中的文字粘贴。（Ctrl+V无效）

Qbasic语言程序设计实例介绍

小编带来了一些有关于qbasic的实例，用户可以查看学习一下。
范例1：
菜场上一公斤香菇是7.5元，编一个程序，从键盘上输入重量，计算机自动算出其总价
INPUT X
SUM=7.5*X
PRINT SUM
END

范例2：
卖西瓜，10千克以下每千克1.4元，10千克以上每千克0.7元，输入要买多少千克（必须为自然数），输出需要多少钱。    
INPUT X
IF X<>FIX(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$NEXT I
PRINT B$
END

范例4：
一个游戏：
CLS "清屏
LOCATE 5, 38 "定位到5,38
PRINT "Game" "显示
LOCATE 16, 34 "定位到16,34
PRINT "Press Enter" "显示
DO
LOOP 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 TIMER
HP1 = INT(RND * 50) + 50 "随机决定玩家1的HP
HP2 = INT(RND * 50) + 50 "随机决定玩家2的HP
PRINT STRING$(12, " ") + Name1$ + ""s HP is " + STR$(HP1) "显示玩家1的HP
PRINT STRING$(12, " ") + Name2$ + ""s HP is " + STR$(HP2) "显示玩家2的HP
PRINT " Press any key to contiune"
DO
LOOP WHILE INKEY$ = "" "暂停
DIM Row, Text$, Attack, I
Text$ = "n"
Row = 0
CLS
DO "循环
    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$ = "" "暂停
    CLS
LOOP
IF 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!"

Qbasic语言程序设计特点

BASIC是BASIC（Beginner'sAll-purposeSymbolicInstructionCode，新手通用性指令代码）语言的表达一个变异，由美国微软公司开发设计，1991年随MS-DOS5.0发布。无法被编译成单独的可执行程序，源码在集成开发环境（IDE）中先被编译成标记语言，随后标记语言在IDE里被解释执行。QuickBASIC相近又很有别于微软别的BASIC的初期完成版本号是指，QBASIC是一种结构化的计算机语言。和GW-BASIC对比，QBASIC的重要改善是：扩大了自变量和变量定义的类型变量名长短：40字符增强了长整型、定长字符型变量可定义标值变量定义、字符串常量提供了新的选择结构if语句IF<标准>THEN<句子组1>ELSE<句子组2>多分支语句SELECT优化了循环结构
Basic知识是电子计算机程序设计语言的一种，它简易、易懂、实用，被众多电脑管理员所青睐。Basic语言的运用式与数学里的关系式类似，句子与自然语言理解差不多，很容易被新手了解，而Basic语言表达最新发布的发展趋势VisualBasic6.0、7.0，其友善的可视化编程页面、强悍的面向对象设计水平以及网上发行和网络查询的功效，不但可以使客户便捷而快速地编写出具备所有作用的应用程序，并且更好地适应了互联网时代的到来。

以上便是kkx小编给大家分享介绍的Qbasic语言程序设计软件的相关结介绍，有需要的用户下方地址自取！