XI`AN TECHNOLOGICAL UNIVERSITY
实验报告
实验课程名称    可视化程序设计                 
专    业: 信息管理与信息系统           
成    绩:                           
                                 
  2015  4 20

西安工业大学实验报告
专业
信息管理与信息系统
班级
130513
姓名
贾丹丹
学号
130513117
实验课程
可视化程序设计
指导教师
姬浩
实验日期
2015年3月22日
同实验者
实验项目
熟悉VB的开发环境,程序设计的基本步骤
实验设备及器材
硬件:IBM PC 及其兼容机,要求CPU为Pentium166以上,内存在32MB以上,硬盘有200MB以上的自由空间。
软件:操作系统为中文Windows 95/98或Windows 2000 Professional,开发环境为Visual Basic 6.0 中文企业版。
一、实验目的
    (1)熟悉Visual Basic 6.0集成开发环境。
    (2)学习怎样启动和退出VB
    (3)掌握开发一个简单程序的基本步骤。
    (4)掌握简单代码的编写。
二、实验内容
    (1)启动和退出VB
    (2)开发一个简单程序。
    (3)将Visual Basic工程编译生成可执行文件。
三、实验步骤、数据记录及处理
1、启动和退出VB
<1>进入VB集成开发环境
    要进入VB应用程序,首先要运行VB的集成开发环境。启动VB的方法如下:
[方法1]
◇单击任务栏上的“开始”按钮;
◇选择“程序”文件夹,接着选取“Microsoft Visual Basic 6.0中文版”文件夹,再选取“Microsoft            Visual Basic 6.0中文版”项,如图1-1所示
图1-1 启动VB的方法1
单击鼠标左键。
[方法2]
单击任务栏上的“开始”按钮;
选择“程序”文件夹;
使用“Windows 资源按理器”查VB可执行文件 ;
双击图标。
[方法3]
在桌面创建一个VB快捷键;
双击该快捷键。
VB启动后,出现VB6.0的“新建工程”对话框(图1-2)单击“打开”按钮,带有一个窗体的新工程将被创建,并可以看到VB集成开发环境的界面,如图1-3所示。有的系统启动后可直接进
入图1-3所示的界面。
图1-2  VB6.0的“新建工程”对话框
       
图1-3  VB的集成开发环境窗口
<2>大学vb实验教程答案退出VB方法:
(1) 单击主窗口右上角的“关闭”按钮。
(2) 执行“文件”菜单中的“退出”命令。
(3) 按Alt+Q键。
2、开发一个简单程序
要求:新建一工程,在窗体(Form)上添加一个标签(Label),当单击窗体时标签(Label)显示“床前明月光”。
实验步骤:
(1)新建工程
在桌面上双击Microsoft Visual Basic 6.0快捷方式图标,系统进入Visual Basic6.0集成开发环
境,并显示“新建工程”对话框,默认选择是建立“标准EXE”(即标准工程)。单击“打开”按钮,Visual Basic 6.0进入设计模式。如图1-4所示。
1-4“新建工程”对话框
单击“文件”菜单,选择“新建工程”菜单项,也可进入设计模式。
(2)设计界面
在系统提供的名为Form1的窗体上进行界面设计。单击工具箱上的标签(Label)控件,在窗体上添加标签的位置处按下鼠标左键,并拖动,调整虚框的大小,松开鼠标,就将标签控件添加到窗体上。初始界面如图1-5所示
1-5初始界面
(3)设置属性
如表1-1所示。
1-1 属性设置
对象
属性
属性值
Form1
Caption
我的第一个VB程序
Label1
Caption
 
设置属性后的界面如图1-6所示。
       
图16设置属性后的界面          图1-7第一个程序
(4)编写程序代码
Private Sub Form_Click( )
Label1.Caption = "床前明月光"
End Sub
(5)运行程序
运行VB程序有三种方法:①单击工具栏上的“启动”按钮;②从“运行”菜单中选择“启动”菜单项;③按F5键。
例如,单击工具栏上的“启动”按钮运行程序后,单击窗体,程序运行效果如图17所示。
(6)保存程序
单击工具栏中的“保存”按钮或单击“文件”菜单中的“保存工程”菜单项,选择合适的保存路径,先保存窗体文件(例如窗体文件名为“实验一.frm”),然后保存工程文件(例如工程文件名为“实验一.vbp”)。

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。