实验一：设计简单的VB应用程序
一、实验目的
1．掌握Visual Basic启动和退出的方法。
2．熟悉Visual Basic的集成开发环境。
3．掌握Visual Basic程序设计的基本步骤，了解VB程序的编写、保存和编译的方法过程。
4．初步了解几个常用基本控件控件（标签、命令按钮和文本框）的使用方法。
二、实验类型
综合
三、实验时间：20##-3-8
四、实验任务
1、启动Visual Basic，然后创建一个“标准 EXE”工程（保存在D盘以自己学号命名的文件夹中，文件名和窗体名均为SJT），并了解Visual Basic集成开发环境下各组成部分及其作用。
2、编一程序，计算任意输入的正整数的平方根。
3、编写一个应用程序，界面如图1-1所示。窗体中文字“VB应用程序！”为一标签控件，单击标题为“放大”的命令按钮，则“VB应用程序！”的字号放大一号，单击“缩小”按钮则反之；同时，窗体中还有4个含某种指向图案的按钮，若单击某个按钮，则使“VB应用程序！”向该按钮所指向的方向移动50Twip。（提示：四种指向的图案可以在Visual Basic安装目录中的“…graphics\icon\Arrows”子目录中找到，名称分别为arw07dn.ico 、arw07lt.ico、arw07rt.ico和arw07up.ico）
五、实验要求
写出实验报告，内容是：
1、第1小题的操作步骤
2、第2、3题
1).程序的界面设计。
2).程序主要代码。
3).运行结果（输入与输出）。
4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)
实验二：数据的输入和输出
一、实验目的
1．掌握常量和变量、表达式的基本概念和正确书写格式。
2．掌握基本语句（Print语句、赋值语句、Dim语句等）的使用；
3、掌握常用函数的正确使用方法；
4、掌握数据的动态输入InputBox和信息提示MsgBox的基本使用方法。；
二、实验类型
综合
三、实验时间：20##-3-22。
四、实验任务
1、运算符与表达式实验：在立即窗口显示下列表达式的值（先定义Amt变量为字符型，值为"a"；Bmt变量为整型，其值为3）。（要写出打开立即窗口的步骤及运行结果）
① Bmt3 ② Bmt+23 ③ - Bmt ④ Bmt-12
⑤ Bmt*Bmt ⑥ 10/Bmt ⑦ 10\Bmt ⑧ 9 Mod Bmt
⑨ Amt & Bmt ⑩ Amt > Bmt
2、常用内部函数实验：在立即窗口显示下列函数的运行结果（要写出函数及运行结果）
① cos45° ② e3 ③ |-5|④ 字符"b"对应的ASCII码值 ⑤ 系统日期和系统时间
3、思考如下程序的输出结果
Private Sub Form_Click()
Dim str As String, i As Integer
str = "hello"
i = 100
Print 2 & 3
Print 2 + 3
Print 2 + "3"
Print str & "nihao"
Print str + "nihao"
Print str & i
Print str + i
Print i & "nihao"
Print i + "nihao"
End Sub
先思考，然后可以在计算机中测试，查看自己的思考结果与计算机输出的结果是否相同
4、编程：输入圆的半径，计算并输出圆的面积和球体积，按下列要求实现。
（1）界面设计尽可能美观、大方。
（2）单击命令按钮，调用InputBox函数输入数据，通过MsgBox显示计算结果。
五、实验要求
写出实验报告，内容是：
1).程序的界面设计。2).程序主要代码。3).运行结果。
4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)
实验三：选择结构程序设计
一、实验目的
1、掌握逻辑表达式及关系表达式的正确书写形式。
2、掌握单行IF语句和块IF书写格式及其正确使用（尤其注意ELSE 和ELSE IF）。
3、掌握多分支情况的控制（使用Select CASE语句）的使用及与多分支条件语句的区别。
二、实验类型
综合
三、实验时间：20##-4-7
四、实验任务
1、设计一个猜数字游戏软件，点击出题按钮，产生一个10到99的随机数，然后在文本框中由用户输入数字，如果结果不对，应提示是大了，还是小了，否则提示正确。运行界面如图3-1所示。（思考：如何限制用户猜数字的次数？）
2、有函数：
写一个程序，输入x值后，则输出相应y值。要求用“If…ElseIf…EndIf”和用“Select Case”两种方法完成该题目。
3、输入一年份，判断它是否为闰年，并显示相关信息
五、实验要求
写出实验报告，内容是：
1).程序的界面设计。
2).程序主要代码。
3).运行结果。
4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)
实验四：循环结构程序设计
一、实验目的
1、掌握For语句的使用。
2、掌握Do{While|Until}…Loop与Do…Loop{While|Until}两种形式的使用。
3、掌握如何控制循环条件，防止死循环或不循环。
4、熟练掌握循环条件设置及循环的控制方法。
二、实验类型
综合
三、实验时间：20##-4-19
四、实验任务
1、编一程序，显示出所有的水仙花数。所谓水仙花数是指：一个三位数的各位数字立方和等于该数字本身。如：153=
，因此153是一个水仙花数。
2、编写程序，求1+2+3+...+100的和，将结果打印在窗体上。
思考：用Do ... Loop While循环和Do While ... Loop循环应该怎样实现？进一步地，要用Do ... Loop Until循环或Do Until ... Loop循环又该如何实现？（写在实验报告中）
3、计算
的值，当第i项
时结束。
4、求整数m、n的最大公约数、最小公倍数
五、实验要求
1、做好实验预习，提前设计程序。
2、写出实验报告，内容是：
1). 程序主要代码
2).运行结果。
3).实验总结。
实验五：常用控件
一、实验目的
1、掌握常用控件的重要属性、方法和事件，熟悉它们的使用。
2、熟悉面向对象的可视化编程的框架。
3、掌握Visual Basic 容器坐标系的设计方法。
二、实验类型
综合
三、实验时间：20##-5-5
四、实验任务
1、如图5-1所示，用列表框、框架、单选按钮、复选框等控件实现对文本框中文字的字体、字号和粗斜体属性的设置。
2、 在实验5-1的基础上，用计时器控件实现在窗体的标题栏上显示当前系统的日期和时间信息，刷新周期为1秒种。
3、 使用滚动条实现如图5-2所示的程序，要求在拉动任意滚动条时，立即就能体现色块的颜色变化，且在窗口标题栏中标示出当前的RGB颜色分量。其中色块的颜色由3个滚动条的值做为参数用RGB（）函数合成。【提示】滚动条的Value值应该介于0～255之间。
4、 如果用LoadPicture（）函数装载一幅图像，并且要求图片大小要自动适应给定的矩形区域，应该怎样实现？反之，如果要让图片按照其原始尺寸显示，又有几种控件可以适用，怎样使用？请用实例说明
五、实验要求
写出实验报告，内容是：
1、第1、2、3题的程序主要代码；4题的回答及验证情况
2、实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)
实验六：数 组
一、实验目的
1、掌握数组的声明、数组元素的引用。
2、掌握静态数组和动态数组的使用差别。
3、掌握如何利用数组解决与数组相关的常用算法（特别是排序算法）。
二、实验类型
综合
三、实验时间：20##-5-17
四、实验任务
1、用数组保存随机产生的10个介于20到50之间的整数，求其中的最大数、最小数和平均值，然后将10个随机数和其最大数、最小数以及平均值显示在窗体上。
2、随机产生10个介于0到100之间的整数，分别用选择法和冒泡法对其进行排序。
3、 生成5×5矩阵Mat，计算并输出（1）最大值与最小值，以及它们所在的行号和列号；（2）。每一行的和；（3）总和；（4）输出交换1、3列后的矩阵
4、已知数组A＝Array(7,6,5,1,8,5,3,9,4)，编写一程序，删除数组中值为x（例如为3）的第一个元素。要求用户可以输入x。
【提示】
（1）首先要查找待删除的元素，没有则返回。
（2）如果找到待删除的元素，则从下一个元素到最后元素依次往前移位。
（3）最后利用ReDim Preserve语句将数组大小减1。
五、实验要求
1、做好实验预习，掌握，并熟悉本实验中所使用的VB6.0企业版环境及相应的控件。
2、写出实验报告，内容是：
1).程序的界面设计。
2).程序主要代码。
3).运行结果。
4).实验总结。
六、注意事项
1、注意VB集成开发环境各部分的应用和控件的使用。
2、注意VB程序编码方式及书写习惯。
实验七：过程与函数
一、实验目的
1、掌握函数、过程的定义和调用方法。
2、掌握形参与实参的对应关系。
3、掌握值传递和地址传递的传递方式。
4、掌握变量、函数和过程的作用域。
5、熟悉程序设计中的常用算法。
二、实验类型
综合
三、实验时间：20##-5-31
四、实验任务
1、编写一个求三个数最大值的函数max(x，y，z)，然后调用此函数求下列表达式的值，首先在文本框中输入a,b,c三个数，然后单击“计算”按钮，在文本框中输出表达式的值m。表达式为：
。运行界面如图7-1所示。
图7-1
2、 分别编写一个判断素数的子过程以及函数过程。要求输入一个整数，就能够通过该子过程或函数过程求得该整数是否为素数。
3 、编写一个求任意正整数n!的函数过程（两种方法，其中一种为递归法求n!。），并利用该函数过程分别求5的阶乘、8的阶乘、10的阶乘，将结果打印在窗体上。
【提示】考虑能保存较大的整数，函数的返回值类型应定为Long
五、实验要求
1、实验后写出实验报告，内容是：
第1题的程序代码（Max函数与命令按钮Click事件）、两组数据的输入和输出结果。
第2题的界面设计、两种方法的程序代码。
第3题的界面设计、程序代码、运行结果，并对两种实现函数进行比较。
实验总结。
六、注意事项
1、注意VB集成开发环境中过程与函数的建立方法。
2、注意VB集成开发环境中模块程序的创建与保存。
实验八：文件的操作
一、实验目的
1、掌握文件的概念及其使用方法，注意顺序、随机和二进制文件各自的特点和区别；熟练掌握顺序文件的基本操作。
2、掌握驱动器列表框、目录列表框和文件列表框等三个文件系统控件的使用。
3、掌握文件与目录的相关函数和语句的使用
二、实验类型
综合
三、实验时间：20##-6-14
四、实验任务
1、编写一图片浏览器，如图8-1所示，要求当单击某图形或图像文件后在图像框中显示该图形或图像，文件列表框中应只显示.bmp、.jpg、.wmf、.ico、.gif等几种常见类型的图形或图像文件。
2、设计一个运行界面如图8-2所示的应用程序，单击“Write”可以将3个文本框中的信息用“Write”语句写入“D:\aaa.txt”；单击“Print”可以将3个文本框中的信息用“Print”语句写入“D:\bbb.txt”。要求3个信息写在同一行，至少写入四条记录。
程序运行后，用“记事本”同时打开“D:\aaa.txt”和“D:\bbb.txt”，比较它们结构有何不同？为什么？试说明“Write”和“Print”语句的相同和不同
3、建立一个简易学生管理系统，如图8-3所示，用于输入、显示和修改学生的相关信息。数据按随机访问模式存放。【提示】随机文件的记录利用Type定义，字符串定长。
五、实验要求
实验后写出实验报告，内容是：程序主要代码、运行结果、实验总结。
六、注意事项
实验九 用户界面设计
一、实验目的
1、掌握下拉菜单和弹出式菜单的设计和使用方法。
2、掌握对话框的使用。
3、掌握多窗口和多文档界面的概念及其区别，学会选用适当的架构来编写程序。
4、熟悉鼠标和键盘的事件
二、实验类型
综合
三、实验时间：20##-6-28
四、实验任务
1、建立窗口菜单，实现一个简易文本编辑器，如图9-1所示。文本框中的文本属性由菜单“设置”中来指定，当单击“退出”时，结束程序。在设计菜单时，试给“设置”、
“字体”、“字号”子菜单分别加上热键“C”、“N”和“S”。 “退出”菜单项加上热键“Q”。
2、 将实验9-1的源程序拷贝一份，且对它做如下修改，使得运行界面如图9-2所示。将“字体”和“字号”两项合为“字体”一项，增加菜单项“前景色”、“背景色” ，并分别加上热键“F”和“B”。增加“文件”菜单，含有“打开”和“保存”两个菜单项，并分别加上热键“O”和“S”。再对若干菜单项加上快捷键。
当单击“字体”菜单项后，弹出“字体”对话框；单击“前景色”、“背景色”菜单项后弹出“颜色”对话框；单击“打开”菜单项，则弹出“打开”文件对话框，且只显示“*.txt”文件，选定文件后，点击对话框上的“打开”按钮后，则打开相应文件，将其内容读出，按前面设置的属性显示在文本框中；单击“保存”菜单项后，弹出“保存”或“另存为”文件对话框，输入文件名后，点击对话框上的“保存”按钮，则将当前文本框中内容写入相应文件。
3、 在实验9-2的基础上，在“设置”菜单后再增加“关于”菜单，热键为“A”，单击弹出一窗体（由用户自行设计），如图9-3所示，显示一些作者和版权等相关作者想要声明的信息。进一步，还可以在文本框中单击鼠标右键，弹出一个只含有“关于”菜单项的弹出式菜单，点击“关于”有与上述相同的响应。
4、 编写一程序，要求响应键盘的4个方向键，如图9-4所示，当按一次某方向键，就使图片向相应的方向移动50单位距离。
第二篇：VB实验报告9
台州学院
《VB程序设计》实验报告
实验九：文 件
班级：
学号：
姓名：
实验日期：
一、实验目的和要求
1．熟练掌握顺序文件的基本操作；
2．熟练掌握驱动器列表框、目录列表框和文件列表框等三个文件操作控件的功能和建立。
二、实验主要仪器和设备
计算机一台，Windows XP操作系统，Visual Basic环境。
三、实验内容
实验9.1 编程，设计如图9-1所示的图片欣赏程序，其中窗体上放置驱动列表框、目录列表框和文件列表框三个控件，设置属性使得三个控件能够联运；设置文件列表框只显示*.bmp和*.jpg类型的图片文件；当单击文件列表框上的某图片文件名时，图片显示在图片框中。
图9-1 图片欣赏运行界面
实验9.2 某文本文件以下列格式存储若干学生的学号和两门课成绩，编写单击窗体的事件过程：
（1）用通用对话框控件Commondialog1选择该文件；
（2）在Label1(0)～Label1(1)显示总分最高的学生之学号、总分。
文本文件格式
“05010101”,78,89
“05010102”,83,79
……
四、实验原始纪录
实验9.1
程序的界面设计。
程序代码。
实验9.2
程序的界面设计。
程序代码。
五、实验结果及分析
实验9.1运行结果。
实验9.2运行结果。
六、实验总结与思考（主要写一些在实验过程中，遇到的问题、所犯的错误，以及是如何发现纠正的。大约100至200字左右。）