vb程序设计实验指导

VB程序设计实验指导书

实验项目名称：数组(一) 实验环境（硬件）： 普通PC机房 软件：VB6.0 序号：_7

实验时数：2学时 实验地点：计科系实验室

一、实验目的：

1、掌握静态数组和动态数组的概念及定义方法。

2、掌握一维和二维数组元素的引用、赋值、输入、输出方法。

3、掌握使用一重或二重循环结构控制数组元素的下标，按一定规律变化来处理一维数组元素和二维数组元素的程序设计方法。

二、实验类型：（验证性、演示性、综合性、设计性、操作性） 验证性

三、实验内容及基本要求：

1、 随机产生20个1~100的正整数放入数组中，显示产生的数，并求平均值以及高于平均

值的数有多少个。运行界面如图所示：

【要求】在窗体上单击，即产生如图所示结果，编写出程序代码，正确运行程序。并以文件名sy7-1.frm和sy7-1.vbp保存在F：盘或D：盘自己的姓名文件夹中。 2、编程：（程序存盘文件名sy7-2.vbp、sy7-2.frm） 程序运行界面如下图所示：

在窗口中有两个文本框和两个按钮。当单击“随机产生”

《Visual Basic程序设计》实验指导书

《Visual Basic程序设计》

指导

信息技术学院

实验书

《Visual Basic程序设计》实验指导书

《Visual Basic程序设计》

实验指导书

实验1 Visual Basic基础

一、实验目的

（1）掌握VB的启动方法； （2）熟悉VB的开发环境；

（3）掌握在属性窗口中设置控件属性的方法；

（4）学会建立简单的VB应用程序的方法；（5）掌握基本控件的特性及应用； （6）掌握创建下拉菜单和弹出式菜单 二、实验要求

（1）编写程序要规范、正确，上机调试过程和结果要有记录 （2）做完实验后给出本实验的实验报告。 三、实验设备、环境

586以上的计算机，安装有Visual Basic 6 软件。 四、实验步骤

1、分析题意，重点是分析并给出与题目相应的数学方程或编程算法。 2、新建工程

3、根据题目要求，设计窗体界面。 4、编写并输入相关事件的程序代码。 5、运行与调试工程。

6、保存工程（请将每个程序的工程与窗体文件存放在一个单独的文件夹中）。 7、生成可执行程序。 五、实验内容

1. 编写一个求两个数相加的程序。界面设计如下图a所示。运行时，当按下“求和(S)”按钮时，求数

《Visual Basic程序设计》实验指导书

《Visual Basic程序设计》

指导

信息技术学院

实验书

《Visual Basic程序设计》实验指导书

《Visual Basic程序设计》

实验指导书

实验1 Visual Basic基础

一、实验目的

（1）掌握VB的启动方法； （2）熟悉VB的开发环境；

（3）掌握在属性窗口中设置控件属性的方法；

（4）学会建立简单的VB应用程序的方法；（5）掌握基本控件的特性及应用； （6）掌握创建下拉菜单和弹出式菜单 二、实验要求

（1）编写程序要规范、正确，上机调试过程和结果要有记录 （2）做完实验后给出本实验的实验报告。 三、实验设备、环境

586以上的计算机，安装有Visual Basic 6 软件。 四、实验步骤

1、分析题意，重点是分析并给出与题目相应的数学方程或编程算法。 2、新建工程

3、根据题目要求，设计窗体界面。 4、编写并输入相关事件的程序代码。 5、运行与调试工程。

6、保存工程（请将每个程序的工程与窗体文件存放在一个单独的文件夹中）。 7、生成可执行程序。 五、实验内容

1. 编写一个求两个数相加的程序。界面设计如下图a所示。运行时，当按下“求和(S)”按钮时，求数

实验六 子过程程序设计

一、实验目的

1、掌握子过程的声明和调用。

2、掌握子过程的形参类型和传值和传址方式。 3、应用子过程实现多个数的求值和无值的操作。 4、掌握子过程的特点以及与其他过程的区别。 二、实验环境

1、操作系统：Windows 7 2、VB.NET应用软件 三、实验内容与步骤

1、编写三个子过程：子过程一以每行5列显示数组结果；子过程二求数组中的最大值和最小值；子过程三数组元素由大到小排序输出；主调程序有10个元素，分别调用三个子过程。

提示：

（1）子过程1使用形参BYRef obtext As Control，

（2）主调程序先调用子过程printa(),后调用子过程fmaxmin()， （3）数组大小由主调程序设置，

（4）子过程三可以采用选择排序法或冒泡排序法。

2、编写一子过程：MaxLength(s,MaxWord),在已知的字符串S中，找出最长的单词MaxWord。假定字符串S内只含有字母和空格，空格分隔不同的单词。

提示：

（1）首先利用InStr函数从S中从左开始找第一个出现的空格，利用Left函数分理出空格左边的单词，与MaxWord最长单词比较（MaxWord状态为空）。

Visual Basic 程序设计学习与实验指导答案

上篇 学习指导

第1章 Visual Basic 概述

1. 事件 2. 查看对象 3. 工程

4. 视图 属性窗口 5. 窗体编辑器

第2章 面向对象程序设计初步

1. 控件 2. 事件 3. 类 属性 4. 属性 5. 略 6. Name

第3章 Visual Basic 语言基础

1. (a*sin(30/180*3.14)+c*(log(b)/log(10)))/((Abs(d)+1)*(e+f))+1

2. mod

3. X=Int(X) And Y=Int(Y) And X*Y>0

4. 4.Y Mod 4=0 And Y Mod 100<>0 Or Y Mod 400=0 5. x=Int((99-10+1)*Rnd+10) 6. 0 “” 7. 空格

8. 6，845.30 9. （1）8 （2）1 （3）abcd

（4）出错，类型不匹配 （5）False

（6）2008-6-29 （7）I likeVB （8）4 （9）4 4 （10）3 4 （11）10 -10 （12）-1 （13）aa （14）3 （15）0 （16）1 （17）C （18）5 （19）

课 程 号：10010402

适用专业：全校非计算机专业 制 定 人：

教 研 室：计算机公共基础教研室

计算机科学与信息工程学院 2007 年5 月 前言

VB语言是一种被广泛学习、普遍使用的计算机程序设计语言。它的高级语言行式、低级语言功能具有特殊的魅力。由于VB语言具有完整的编程语言特点，因而被大多数高等院校作为典型的计算机教学语言。在计算机等级、全国计算机应用证书考试等多种计算机知识考试中都有VB语言。此外，VB语言作为一门实用的、功能强大的程序语言，被程序设计人员广泛使用。因此，VB语言是一门十分重要的程序设计语言。

《VB语言程序设计》课程，面向全校非计算机专业的本科生开设计算机基础课。以VB语言为平台，介绍程序设计的思想和方法。通过学习，不仅使学生掌握高级编程语言的知识、编程技术和基本算法，更重要的是掌握程序设计的思想和方法，具备利用计算机求解实际问题的基本能力，能灵活应用高级语言进行程序设计。

本实验指导书中详细介绍了每个实验的目的、实验内容，并在方法上给出了指导，希望对同学们的学习能够有所

(此文档为word格式，下载后您可任意编辑修改！)

台州学院

《VB程序设计》实验报告

实验1.1 设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。 Private Sub Command1_Click() Text1.Text = \欢迎使用VB！\End Sub

Private Sub Command2_Click() Text1.Text = \End Sub

Private Sub Command3_Click() End End Sub

实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求：

（1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不

1 可用（图1-4）；

（2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）；

（3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”

Privat

湖北文理学院

VB程序设计课程

实验报告

学 院 物电学院 专 业 自动化 班 级 1211 学 号 姓 名 王亮 任课教师 王福林

实验一、VB控制结构

一、实验目的

1.掌握选择语句的使用 2.掌握循环语句的使用

二、实验内容

1、选择语句

程序1：创建应用程序。要求：单击窗体可弹出输入框，任意输入三个数，然后按从小到大的顺序输出到窗体上。

程序2：创建应用程序。要求：单击窗体可弹出一输入框，任意输入一个正整数，在窗体上显示该整数是否为素数的字样。

2、循环语句

程序3：创建应用程序。要求：单击窗体可显示一个由“*”组成的平行四边形图案。

程序4：创建应用程序，其功能是显示所有的水仙花数。

三、实验记录

程序1如下：

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer, t As Integer '定义a,b,c,t为整形变量

Cls

《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、 随机访问模式

（八）数据库

VB学习与实验指导测试题

参考答案

第一章

一、选择题 1 6 11 16 1 4 A B A A 2 7 12 17 事件 视图 属性窗口 B C C B 2 5 3 8 13 18 D A C D 对象按钮 窗体编辑器 4 9 14 3 D C D 5 10 15 工程 B A C 二、填空题 第二章

一、选择题 1 6 1 4 A D 类 2 7 C A 2 5 3 C 事件 4 3 6 D 5 Name（名称） C 二、填空题 第三章

一、选择题 1 6 11 16 21 26 1 2 3 4 5 6 7 A C C A B C 2 7 12 17 22 27 A C C C D B 3 8 13 18 23 28 CD A A B A D 4 9 14 19 24 29 C D D B B B 5 10 15 20 25 A D D D C 二、填空题 (a*sin(30*3.14/180)+c*log(b))/((abs(d)+1)*(e+f))+1 mod x*y>0 and x=fix(x) and y=fix(y) y mod 4=0 and y mod 100<>0 or y mod 40