杭州师范学院 信息工程学院--《计算机技术基础》（VB程序设计）
序号 实验项目名称 时项目项目项目每台（套）实验耗材目的要求 用 数 要求 类型 性质 仪器人数 定额（按自然班） 验证11 常用控件（三） 2 必修 操作 设计 图形控件和VB坐12 标系的使用 图形方法和图形13 操作 2 必修 操作 2 必修 操作 验证设计 验证设计 验证2 必修 操作 设计 验证2 必修 操作 设计 验证2 必修 操作 设计 验证2 必修 操作 设计 1 1 1 1 1 1 1 掌握滚动条、定时器的使用 掌握图形控件、VB坐标系的使用 掌握使用颜色以及图形方法 掌握通用对话框的设计和应用 掌握菜单的设计和应用 掌握文件管理控件和文件操作语句的应用 掌握数据文件的操作 14 通用对话框 15 菜单设计 文件管理控件和16 文件操作语句 17 文件操作 注：1、项目要求：必修、选修、其他；2、项目类型：演示、操作、模拟；3、项目性质：验证、综合、设计、研究。
- 5 -
杭州师范学院 信息工程学院--《计算机技术基础》（VB程序设计）
第二部分 实验说明
实验一 Visual Basic集成开发环境及基本操作
实验目的：
通过本实验，要求学生着重掌握Visual Basic 6.0的基本知识，熟悉编写VB程序的基本步骤，掌握在VB集成开发环境的使用，能在VB集成开发环境下编写、调试、运行简单VB程序的方法。
实验内容：
1、设计一个程序，当用户单击窗体时，在标题栏显示\鼠标单击窗体\，在窗体显示\你好，欢迎使用VB\；当用户双击窗体时，在标题栏显示\鼠标双击窗体\，在窗体显示\再见，谢谢使用VB\。程序运行界面如图1- 1所示。
图1- 1
2、设计一个程序，当输入圆的半径时，计算并输出圆的周长及面积。
在窗体上建立3个标签控件、3个文本框控件和2个命令按钮。标签用于显示半径、周长和面积的标题，文本框用于显示相应数值，命令按钮分别用于计算和退出。界面如图1- 2所示。
图1- 2
实验主要步骤：
题目1操作步骤：
1） 启动“Microsoft Visual Basic 6.0中文版‖，并设置界面及属性。
⑴启动VB：“开始”→“程序” →“Microsoft Visual Basic 6.0中文版‖ →―Microsoft Visual Basic 6.0中文版‖
⑵出现“新建工程”对话框中→选“新建”项→选“标准EXE” →单击“打开”命令按钮，进入VB集成开发环境窗体
⑶创建应用程序界面
本题应用程序界面初始不需要添加剂任何对象。只包含一个默认的也是任何一个工程都必需的窗体对象（Form） ⑸对象属性设置
对本工程中的唯一一个对象---窗体（From1）的属性值保持默认。 2） 过程设计
- 6 -
杭州师范学院 信息工程学院--《计算机技术基础》（VB程序设计）
[分析]
本题目涉及到对象From1有两个事件：一是Click；二是DbClick。事件过程的编写要在代码窗口中进行，
进入代码窗口的方法是：双击窗体或窗体中的控件对象；或在“视图”菜单中选择“代码窗口”选项；或单击“工程窗口”中的“查看代码”图标。 [程序代码]
Private Sub Form_Click()
Form1.Caption = \鼠标单击窗体\Form1.FontSize = 20
Form1.Cls
Form1.Print \你好!欢迎使用VB\End Sub
Private Sub Form_DblClick()
Form1.Caption = \鼠标双击窗体\Form1.FontSize = 20
Form1.Cls
Form1.Print \再见!谢谢使用VB\End Sub
3） 保存工程、运行调试
运行调试程序之前一般需保存工程，保存工程的方法有两种：一是单击“文件”菜单中的“保存工程”命令，或单击工具栏上的“保存工程”的按钮图标，如该工程还未保存过，则打开“文件另存为”对话框，如图1- 3所示。
图1- 3
由于一个VB应用程序包括多个文件，应将一个工程的所有文件保存在同一个文件夹中，保存工程时，窗体文件和工程文件需要分别保存。窗体文件保存类型为“*.frm”，默认为“From1.frm”；工程文件保存类型为“*.vbp”,默认工程文件名为“工程1.vbp”。
运行调试，单击工具栏上的“运行”按钮，或按F5键或选择“运行”菜单中的“启动”命令，即可运行工程，通过单击和双击窗体可以看到如图1- 1所示的运行结果。 检查
当程序运行出错，可从常见的一些错误入手，进行检查。比如控件名称输入错误，对象属性的拼写错误，程序代码中对象与对象属性之间的没有在半角英文状态下输入导致错误，程序代码的对象名与窗体控件中的对象名不符等。
题目2操作步骤：
1） 根据图1- 2所示，设计窗体界面，窗体中各控件对象的主要属性设置如下表。 控件 窗体 标签1 标签2 标签3 文本框1 文本框2 对象名 Form1 Label1 Label2 Label3 Text1 Text2 属性名 Caption Caption Caption Caption Text Text - 7 -
属性值 ―圆的周长及面积计算‖ ―圆半径：‖ ―圆周长：‖ ―圆面积：‖ ―‖ ―‖ 杭州师范学院 信息工程学院--《计算机技术基础》（VB程序设计）
文本框3 命令按钮1 命令按钮2 2） 过程设计
Text3 Command1 Command2 Text Caption Caption ―‖ ―计算‖ ―退出‖ [分析]
（1）本题目涉及到对象Command1和Command2的Click事件。事件过程的编写要在代码窗口中进行，进入代码窗口的方法是：双击窗体或窗体中的控件对象；或在“视图”菜单中选择“代码窗口”选项；或单击“工程窗口”中的“查看代码”图标。 （2）控件添加方法：
在窗体上添加一个命令按钮，如图1- 4所示，先单击图左工具箱中的“命令按钮”图标，此后移动到窗体上的鼠标为一个“+”字形，在窗体上适当位置拖动鼠标，建立一个命令按钮控件。（其余相同方法添加）
图1- 4
（3）注意表达式书写，求圆的周长不能写成2πR或2*π*R，求圆的面积的公式不能写成π*R [程序代码]
Private Sub Command1_Click()
Dim r As Single, c As Single, s As Single r = Val(Text1.Text) c = r * 2 * 3.141593 s = r * r * 3.141593 Text2.Text = c Text3.Text = s End Sub
Private Sub Command2_Click() End End Sub
3） 运行调试
保存工程后进行运行调试，保存工程的方法同题目1所介绍。
运行时，在文本框1中输入圆的半径值，然后单击命令按钮Command1，圆的周长和面积就在文本框2（Text2）和文本框3（Text3）中显示。单击命令按钮Command2，结束程序运行，返回到VB的编辑环境。 检查
当程序运行出错，可从常见的一些错误入手，进行检查。如程序中需写代码Text2.Text = c就绝不能写
成c = Text2.Text ，因为Text2.Text = c与c = Text2.Text 的意义是完全不同的。
2
实验二 程序设计基础
实验目的：
通过本次实验，掌握VB6.0的数据类型、常量、变量、运算符和表达式知识，掌握常用内部函数、赋
- 8 -
相关推荐：
loading