VB60程序设计上机实验指导.doc

实验一认识VB6.0
VB6.0程序设计上机实验指导

VB6.0程序设计上机实验指导
认识VB6.0
实验目的]
1.掌握VB集成开发环境的启动和退出
2.了解VB集成开发环境的基本组成
3.学会在VB集成开发环境中建立应用程序
实验内容]
VB集成开发环境的启动和退出
启动VB集成开发环境
想一想：可以通过哪些方法启动VB集成开发环境。
在“新建工程”对话框中选择“标准EXE”
注意：在“新建工程”对话框中有几个选项卡？它们各有什么作用？在“新建”选项卡中有哪些选项？
熟悉VB集成开发环境
退出VB集成开发环境
想一想：可以通过哪些方法退出VB集成开发环境。
VB集成开发环境的基本组成
指出VB集成环境中各组成部分的名称。
找到并熟悉VB集成环境中的工具箱、工程管理器窗口、属性窗口、窗体设计器窗口、代码窗口；掌握打开和关闭这些窗口的方法。
想一想：可以通过哪些方法打开代码窗口。
掌握在窗体设计器窗口中添加控件。
学会设置窗体、命令按钮、文本框的最常用属性。
在代码窗口中找到窗体、命令按钮、文本框的主要事件，学会在对象事件过程中输入代码。
想一想：窗体、命令按钮、文本框的缺省事件是什么。
建立第一个VB应用程序
HYPERLINK"Ex01.exe"程序功能：程序界面见下图，要求当按“显示内容”按钮时，文本框中出现红色的“Hello,VisualBasic！”的文字，按“清屏”按钮时，文本框中文字消失，按“结束”按钮后，程序结束。

程序中有一个窗体，一个文本框和三个按钮，其属性如下：
对象名称属性属性值窗体（名称）
CaptionForm1
VB，你好！文本框（名称）
Text
Alignment
Font
ForeColorText1

2
粗体、14号
红色命令按钮（名称）
CaptionCommand1
显示内容命令按钮（名称）
CaptionCommand2
清屏命令按钮（名称）
CaptionCommand3
结束事件代码：
PrivateSubCommand1_Click()
Text1.Text="Hello，VisualBasic！"
EndSub

PrivateSubCommand2_Click()
Text1.Text=""
EndSub

PrivateSubCommand3_Click()
End
EndSub
想一想：
怎样在窗体中添加控件，怎样改变窗体和控件的大小，怎样改变控件的位置。如果要使窗体的高度为4000，宽度为5000，可以用什么方法设置？如果要使文本框的位置为：左边405，上边405，可以使用什么方法设置？
怎样在属性窗口中为窗体和控件设置属性，试试在属性窗口中设置窗体的大小属性和文本框的位置属性。看一下其他控件的大小、位置属性怎样设置？
如何在窗体或控件的事件过程中加入程序段，本实验在哪些对象（指出对象名称）的哪些事件（指出事件名称）中加入了程序段（指出Sub过程名称），这些程序段分别有什么功能。
怎样在程序中使用命令设置对象的属性，本实验对哪些对象的哪些属性进行了设置。试试在窗体的Load事件中设置窗体的大小和文本框的位置。
怎样保存程序，需要保存哪些文件；怎样运行程序。
如果将文本框的名称改为“Texthy”，将第一个命令按钮的名称改为“Cmdhy”，将第二个命令按钮的名称改为“Cmdqk”，将第三个命令按钮的名称改为“Cmdtc”，则上述程序要作哪些改动？
选做实验]
建立程序，功能如下：
程序中有一个窗体，一个文本框和四个按钮，三个按钮分别显示“红色”、“绿色”、“蓝色”字样，一个按钮显示“退出”字样。当按“红色”按钮时，文本框中出现红色的文字“红色”；当按“绿色”按钮时，文本框中出现绿色的文字“绿色”；当按“蓝色”按钮时，文本框中出现蓝色的文字“蓝色”。当按“退出”按钮时，结束程序。程序界面如下图所示。

提示:
可使用RGB()函数设置颜色。
附：RGB()函数的使用
功能：
返回一个Long整数，用来表示一个RGB颜色值。
语法:
RGB(red,green,blue)
参数：
red 必要参数；Variant(Integer)。数值范围从0到255，表示颜色的红色成份。
green必要参数；Variant(Integer)。数值范围从0到255，表示颜色的绿色成份。
blue必要参数；Variant(Integer)。数值范围从0到255，表示颜色的蓝色成份。
说明:
一个RGB颜色值指定红、绿、蓝三原色的相对亮度，生成一个用于显示的特定颜色。RGB函数可以产生256＊256＊256种不同的颜色。任何需要得到颜色的属性都可以通过RGB函数设置。
传给RGB的任何参数的值，如果超过255，会被当作255。
下面的表格显