实验一至十

软件技术实验指导实验一：名称：VB的感性认识实验要求：1）在屏幕上开辟一个窗口（文本框），窗口的上部放置一个标签，标签中显示：“欢迎使用Visual Basic6.0中文版”。

窗口的下部有三个按钮，左边按钮中标有“开始显示”，中间按钮中标有“清屏”，右边按钮中标有“结束”。

当鼠标单击左边按钮时，文本框中显示“欲穷千里目，更上一层楼！”如果单击中间按钮，则清除文本框中显示的内容，单击右边按钮则程序结束。

2）单击“清屏”后，让光标出现在文本框中，此时往文本框中输入若干文字，例如“您好”，然后单击窗体，使得在窗体的指定位置上显示在文本框中输入的文字。

3）如果将1）中单击左边按钮后文本框中显示的“欲穷千里目，更上一层楼！”改为“白日依山尽，黄河入海流，欲穷千里目，更上一层楼！”此时文本框在一行中将显示不下所有文本，请试调整该文本框的“Multiline”属性，并将文本框纵向距离调整到可容纳两行以上文字。

此时再次执行程序，观察执行结果所发生的变化。

实验设计知识点：文本框的双向作用（即输入与输出）；窗体的双重作用（容器与输出）；事件过程的编写；输入输出的简单实现；窗体、文本框、标签、命令按钮等基本控件的常用属性的动、静态设置等。

附加内容：建立我的工具箱：该程序用于对Windows中的常用工具例如记事本、画图板等等进行方便的管理。

程序使用者只需单击界面上的相应图标按钮，就可以启动相应的Windows程序。

实验步骤：1）在窗体中央放入四个命令按钮，并选中4个按钮控件令其全部处于激活状态，单击“格式”菜单，选择“统一尺寸”子菜单下的“两者都相同”选项，可使所有被选中的按钮的外观尺寸统一；2）分别修改4个按钮的Caption属性分别为：记事本，画图板、写字板和媒体播放，并且将四个按钮的Style属性值取为Graphical属性以便在按钮控件上可以添加小图标和设置背景颜色。

在图标库中给四个按钮选择放入合适的小图标。

（图标库位于VB安装目录下有一个“Common\Graphics”文件夹中有大量windows的图像和图标可选。

）3）使用函数Shell来调用Windows中相应的可执行程序，该函数完整形式如下：Shell(pathname[,windowstyle])其中：Pathname——欲调用的可执行程序路径名；Windowstyle——指明被调用函数的窗口显示方式参考程序代码：•Private Sub Command1_Click()•Shell "C:\windows\system32\notepad.exe", 1•End Sub•Private Sub Command2_Click()•Shell "C:\windows\System32\mspaint.exe", 1•End Sub•Private Sub Command3_Click()•Shell "C:\Program Files\Windows NT\ Accessories\•wordpad.exe", 1•End Sub•Private Sub Command4_Click()•Shell "C:\Program Files\Windows Media Player\ wmplayer.exe", 1•End Sub实验二：界面辅助工具的应用实验要求：运用VB中提供的界面辅助工具生成一个应用程序界面，要求该界面带有顶行下拉菜单和工具栏按钮。

实验步骤：1）实验中要求采用两个外部控件即Toolbar和ImageList,这两个控件都是ActiveX 控件，都被包含于VB中携带的“Microsoft Windows Common Control 6.0”控件组中，需要在“工程”下拉菜单中找到“部件”并单击之，随后在弹出的控件目录中点选“Microsoft Windows Common Control 6.0”，使之“应用”并“确定”，这样，该组控件便被全部添加到了工具箱中。

2）预先准备好要用于窗体的素材，例如图片和若干小图标。

然后分别点击工具箱中的Toolbar和ImageList,控件并将这两个控件画到窗体上。

3）向 ImageList 控件中置入合适的图象，即把未来要用于界面中按钮上的小图标预先置入ImageList 控件，具体做法：①用鼠标右键单击 ImageList 控件，然后单击“属性”以打开“属性页”对话框。

②在“通用”选项卡中点选图标预设大小，这里采用32×32；然后单击“图像”选项卡；③填入索引号1，然后单击“插入图片”按钮，在随后弹出的选择图片对话框中找到希望出现在 Toolbar 控件中的图象。

重复该操作（每次重复，索引号加1）直到得到了所需的所有图象后，单击“确定”按钮。

4）将 ImageList 控件与Toolbar控件相关联，具体做法：①用鼠标右键单击 Toolbar 控件，然后单击“属性”以打开“属性页”对话框。

②在“通用”选项卡中，单击“图象列表”框，并选择刚才置入的 ImageList 控件，然后单击“应用”。

5）向 Toolbar 控件中添加按钮，具体做法：①用鼠标右键单击 Toolbar 控件，然后单击“属性”。

②在“属性页”对话框中，单击“按钮”选项卡。

③单击“插入按钮”。

④单击“样式”框，并选择“分隔符”。

⑤再次单击“插入按钮”，样式将自动被设置为“缺省”。

⑥在“标题”框中，键入你希望出现在按钮上的文字（中文显示）。

⑦在“关键字”框中，键入程序中将用到的代表该按钮的名称标识符（英文）⑧在“图象”框中键入你想作为该按钮上图标且已经置入ImageList 控件中的图片索引号。

⑨如果需要连续生成若干按钮则重复上述过程，直至生成所有的按钮后，单击“确定”按钮，从而完成所有按钮的添加。

6）打开菜单编辑器，可在VB的顶行菜单下面的工具栏点击快捷按钮或在顶行菜单中找到“工具”菜单并下拉选择单击“菜单编辑器”，然后逐一填写标题框中的标题（即你希望出现在顶行菜单中的标题文字和名称框中的名称（即你将要在程序中使用的有关于该菜单操作时的英文标识符），注意，最左边一列菜单项即为顶行菜单显示项，如果需要生成下拉，则每级级联都向右缩进一格。

7）最后，选择你喜欢的界面图片设置为该窗体的picture属性即可。

8）状态栏控件的使用：在工具箱中点选“StatusBar”然后在窗体的底部画上该控件，设置状态栏的属性操作如下：①用鼠标右键单击 StatusBar 控件，然后单击“属性”以打开“属性页”对话框。

②选择“窗格”选项卡，在“文本”框中输入你想显示在状态栏中的状态信息。

③然后可根据需要添加窗格，只需单击“添加窗格”按钮，并在相应的“文本”框中输入所需的提示信息，例如版权等等，亦可根据需要选择显示日期或时间，具体做法是在“样式”组合框中选择“5-sbrtime”即为显示时间，选择“6-sbrdate”即为显示日期。

9）在该工程中添加若干窗体（与Toolbar生成的按钮数相同），并且在每个窗体上放一个命令按钮，以便实现窗体间的切换。

实验知识点：掌握Toolbar、Imagelist、StatusBar等控件的加载、设置和使用，窗体间的切换方法。

参考程序代码：Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)'依据按下按钮的不同，调出不同的窗体Select Case Button.CaptionCase "TOOLBAR举例1"Form2.Showform1.HideCase "TOOLBAR举例2"Form3.Showform1.HideCase "TOOLBAR举例3"Form4.Showform1.HideCase "TOOLBAR举例4"Form5.Showform1.HideCase "退出系统"If MsgBox("确定退出系统吗？", vbYesNo + vbQuestion) = vbYes Then Unload MeEndEnd IfEnd SelectEnd Sub实验三、VB程序设计技巧实验知识点：练习VB程序设计的技巧。

如：RGB函数的用法，控件数组的应用，select case分支结构的掌握等实验要求：1）设计一个可以进行四则运算的简单计算器。

该计算机除了可以进行加、减、乘、除、求模（取余）等简单的四则运算外，还要求可以进行四则混合连算，并具有符合计算器日常使用习惯的容错纠错功能。

具体步骤如下：①在界面上建立按钮控件数组：首先在窗体中置入一个命令按钮控件后，将其激活并点击右键通过“复制”、“粘贴”的方法依次产生19个一样的命令按钮控件，其中在创建第一个“粘贴”控件时VB会询问“是否要创建控件数组？”回答“是”即可开始依次创建该数组。

②按钮属性的设置：将各按钮的caption属性分别设置为0，1，2……9，＋、－、×，/，Mod，＝，cls,Exit，注意在设置这些属性时其值与按钮控件的Index属性的对应性。

③其它控件的属性设置：文本框作为显示操作数和结果的控件，应遵循一般计算器的显示习惯，将其Alignment即对齐属性设置为“Right”，此外，将各控件相关的字体、字号等设置为统一风格。

④在程序的通用区定义四个窗体层变量：num1、num2、sum、act、前三个为双精度、act为整型变量。

⑤编写进行四则运算所需的程序作为命令按钮的单击事件过程。

2）设计一个趣味调色板。

通过改变红、绿、蓝三种基本颜色的比例，显示调色结果。

具体步骤如下：①在界面上放置3个滚动条控件（HScrollBar水平滚动条），8个标签（label）控件，1个形状（shape）控件和2个命令按钮，其中形状控件是用来显示调出的颜色结果的，标签控件则分别用来静态显示“红”、“绿”、“蓝”和动态显示红绿蓝三色配比读数以及其它提示性信息，三个滚动条则用来在程序执行时调整三原色的配比比例。

②形状控件shape的初始设置：Shape属性设置值为“oval”这样所显示的形状就是椭圆形的；Backstyle属性设置值为“opaque”;Fillcolor属性设置初始值为白色；③程序中使用RGB函数。

该函数的完整格式：RGB（red，green，blue）其中的red、green、blue分别代表红、绿、蓝的三个整型数据，其值在0～255之间（如果超过255，则当作255处理）。

合理搭配这三个整型数据，就可以得到全部色彩。