vb程序设计简单小游戏

1设计内容

有2、3、4、5、6、7、8、9、10、J、Q、K、A共13张牌，编一程序，判断对任意给定的4张牌，能否在进行加、减、乘、除运算后，其运算结果等于24。其中J按11计算，Q按12计算，K按13计算，A按1计算。如果能得到结果24，则输出可得到该结果的计算表达式。

若输入数据符合要求，且经过加、减、乘、除运算后，运行结果能得到24，如输入5，5，5，1，则显示可得到该结果的计算表达式，如5*(5-(1/5))。

若输入数据小于1或者大于13或者不是整数时，提示输入错误。 若输入不能运算出24的数据，如1，1，1，1，则显示经过加、减、乘、除运算后，运行结果不能得到24。

2程序设计

2.1存储结构设计

由于要储存的数据不多，主要是储存所输入的4个整数，所以采用一维数组(a[4])储存。而计算过程会出现小数，所以数据类型采用浮点型(float)。

2．2主要程序设计

程序采用穷举法，对输入的4个数进行排列，有 4！=24种。用for来循环，if来判断，算法如下。 for (i=0;i<4;i++) for (j=0;j<4;j++) if (j!=i)

for (k=0;k<4;k++) if (k!=j && k!=i) for (l=0;l<4;l++)

if (l!=i && l!=j && l!=k)

{ calculate

第二章 简单的VB程序设计习题

一、选择题

1. 假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中

设置窗体的属性，预先执行的操作是（ a ）。

（A）单击窗体上没有控件的地方 （B）单击任一个控件 （C）不执行任何操作 （D）双击窗体的标题栏 2. 在VB中最基本的对象是（c），它是应用程序的基石，是其它控件的容器。

（A）文本框 (B)命令按钮 （C)窗体 (D)标签

3. 有程序代码如下：text1.text=“visual basic” 则：text1、text和“visual basic”

分别代表（ c ）。

（A）对象，值，属性 (B) 对象，方法，属性 （C） 对象，属性，值 (D) 属性，对象，值 4. VB是一种面向对象的程序设计语言，（ a ）不是面向对象系统所包含的三要素。

（A）变量

软件设计基础

课

程 设 计 报 告

学院：矿业工程学院 学号201214410608 班级：采矿5班 姓名：李某某

河北联合大学 2012-2013第2学期

《软件设计基础》

课程设计报告

设计名称： 数字炸弹小游戏 姓 名： 学

专业班级： 12级采矿5班 学 院： 矿业工程学院 设计时间： 2013/6/10

设计地点： 河北联合大学计算机机房

目 录

1.课程设计目的 ··································

北京航空航天大学vb程序设计

摘要

VisualBasic 6.0 是一款可视化的，面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发windows 环境下的种类应用程序。它简单易学，效率高，且功能强大，可以与Windows专业开发工具相媲美。在VisualBasic环境下，利用事出有因件驱动的编程机制，新颖易用的可视化工具，使用Windows内部的广泛应用程序接口(API)函数，运用动态链接库（DLL），对象的链接与嵌入（OLE）,开放式数据连接（ODBC）等技术，可以高效，可以快速地开发Windows环境不功能强大，图形界面丰富的程序。

为了适应信息化时代的需求，各高校对大多数专业都开设了一定的计算机语言课程，有的讲授VisualBasic语言。VisualBasic以其语法简单，可视化设计，功能强大，为许多学校计算机语言课程的首选语言。

目前国内各出版了大量的VisualBasic语言教程，它们都具有同样的特点：介绍语言的语法等基本知识，再辅助一些简单的示例。学生通过学习，可能能够考一个不错的成绩，但所掌握的仍然是一些支离破碎的知识，不能将所有的知识融会贯通，遇到具体的程序设计，还是无从下手。

这次我要做的是计算器，通过这样

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

VB程序设计部分 重点程序

08管理VB程序设计部分1.

几里德算法）求两个自然数的最大公约数的算法。

（欧Private Sub Form_Click() Dim n%, m%, g%

n = InputBox("输入N") m = InputBox("输入M") g = gcd(n, m)

Print n; "和"; m; "的最大公约数是："; g Private Function gcd(ByVal a%, ByVal b%) End Sub

Dim r As Integer r = a Mod b Do While r <> 0 a = b b = r

gcd = b

Loop r = a Mod b End Function

2. 存放在数组编写一个数组，随机产生compare中，并从中找出一个最12个两位数，大数和一个最小数

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

VB科期中试卷

班级： 姓名： 座号： 成绩：

一、选择题（每题1分，共35分）

1．以下4个选项中，属性窗口未包含的是（ ）。

A、对象列表 B、工具箱 C、属性列表 D、信息栏 2．事件的名称（ ）。

A、都是由系统预先定义 B、都要由用户定义 C、有的由用户定义，有的由系统定义 D、是不固定的 3．窗体的caption属性值是（ ）类型的数据。 A、整型 B、字符型 C、逻辑型 D、实型

4．．改变控件在窗体中的左右位置应修改该控件的（ ）属性。 A、Top B、Left C、Width D、Right 5．为了装入一个VB应用程序，应当（ ）。 A、分别装入工程文件和标准模块文件 B、只装入窗体模块文件

C、只装入工程文件

D、分别工程文件、窗体文件和标准模块文件 6．以下进入代码窗口的方法中错误的是（ ）