Visual Basic 实验指导书.doc

Visual Basic6.0 实验指导书 2013 实验1：Visual Basic 的基本操作 实验目的 掌握基本的Visual Basic集成开发环境的使用 掌握基本的Visual Basic窗体程序开发流程 掌握窗体属性的修改和设置 掌握标签（Label）、按钮（CommandButton）、滚动条（ScrollBar）、时间计时器控件（Timer）的使用。 实验内容 打开Visual Basic 6.0的集成开发环境，创建一个新的项目（project），然后保存到以自己的学号为目录名的文件夹中； 创建如下的窗体程序：程序运行时，鼠标拖动6滚动条来调整移动速度，速度越大移动越快，速度显示在4标签上；按7“开始”按钮开始运动，运动时2标签左右移动，当到达边界的时候则反向运动，同时标签上显示当前的系统时间，同时按钮的文字变为“暂停”。 图1-1 UI规划 图1-2 运行时的界面 实验指导 打开VB集成开发环境，选择菜单“文件”--“新建工程”，创建一个新的“标准EXE”项目，然后选择“文件”--“保存工程”，在硬盘上创建一个以自己学号为名字的目录，然后保存所有的文件在那个目录中。 按照图1-1所示添加相应的控件，并修改相关的属性，如下表所示： 序号 窗口/控件类型 属性名 属性值 说明 1 窗体（Form） 名称 Form1 caption 实验1：运动的时间 窗体的标题 2 标签（Label） 名称 LbMoveTime caption (空) 初始值为空，等到时间时就设置为当前时间 3 标签（Label） 名称 Lable2 Caption 移动速度： 标签 4 标签（Label） 名称 lbMoveSpeed Caption 10 速度值，10是初始值 5 计时器（Timer） 名称 Timer1 Enabled False 设置计时器初始不打开 Interval 1000 设置计时器时间间隔（1000为1000毫秒ms，即为1秒） 6 水平滚动条（HScroll） 名称 hsMoveSpeed Min 10 最小值（滚动条最左端） Max 1000 最大值（滚动条最右端） SmallChange 1 最小递增（减）值（按最左最右的箭头按钮） LargeChange 100 最大递增（减）值（按滚动条的空白区域） Value 10 当前滚动条滑块的数值 7 命令按钮（CommandButton） 名称 cbStart Caption 开始 编写下面的事件处理程序：（注意，写下面的程序时，先转到代码窗口，在左上角下拉列表中先选择控件变量，然后在右上角下拉列表中选择对应事件，在生成的代码块中编写代码，注意行号不用写） 思考题 上面的第14行为什么要用static？ 上面的第11行为什么不直接Timer1.Interval = hsMoveSpeed.Value ？ 简单说明如何实现按钮的文字变化。 实验2：窗体综合设计 实验目的 掌握 框架（Frame）、文本框（TextBox）、复选框（CheckBox）、选项按钮（OptionButton）、列表框（ListBox）、下拉列表框（ComboBox），图像框（Image）、图形框（PictureBox）的使用； 掌握 驱动器列表框（DriveListBox）、目录列表框（DirListBox）、文件列表框（FileListBox）的使用； 掌握鼠标事件处理的一般方法。 掌握多窗口的相互调用。 掌握VB中绘图的方式。 实验内容 创建如图2-1的画图板应用程序，完成图中所示功能 图2-1 画图板主窗体 标准色包括：白色, 黑色, 红色, 绿色, 黄色, 蓝色, 品红 读取图片是打开图2-2窗体，右上角是图片预览： 图2-2 读取图像文件窗体 图2-3 保存文件对话框 保存图片时打开图2-3对话框。 实验指导 打开VB6.0集成开发环境，选择菜单“文件”---“新建工程”，再选择“文件”---“保存工程”，新建一个以自己学号为名字的文件夹，把所有文件保存在这个文件夹中； 对缺省的窗体，作为主窗体，添加控件并设置其相关属性，如图2-4和表2-1所示： 图2-4 主窗体及其控件安排 表2-1 主窗体及其控件属性设置 序号 窗体或 控件类型 属性 属性值 说明 1 窗体（Form） 名称 mainForm BorderStyle 1 设置窗体不能自由改变大小 Caption 画图板 标题 2 框架（Frame） 名称 Frame1 Caption 画图工具箱