1、【案例案例1-1】第一个应用程序第一个应用程序【案例案例1-2】【本章小结本章小结】一、案例效果一、案例效果案例运行时的界面如图1-1所示，单击“请点击我”按钮，在窗体上显示文字“这是我用VB设计的第一个应用程序”。【案例案例1-1】第一个应用程序第一个应用程序图1-1 二、技术分析二、技术分析 开发Visual Basic 程序包括创建用户界面、设置对象属性、程序编辑、调试和运行等过程。Visual Basic 集成开发环境把整个开发中所需的工具集成在一起，使整个开发过程可在可视化的窗口中进行，使程序设计过程既方便又快捷。1启动启动Visual Basic 6.0在“开始”菜单中选择“程序”
2、“Microsoft Visual Basic 6.0中文版”菜单项，如图1-2所示，则Visual Basic 6.0 应用程序自动启动，然后会出现如图1-3所示的窗口，点击其中的“打开”按钮，会出现如图1-4所示的集成开发环境。图1-2图1-3图1-42Visual Basic 6.0的集成开的集成开发环境发环境Visual Basic的集成开发环境的界面是一个标准的Windows应用程序界面，它具有标题栏、菜单栏和工具栏等部件。(1)标题栏。标题栏如图1-5所示，除显示正在使用的工程和Microsoft Visual Basic 字样外，还显示开发环境所处的工作模式。Visual Bas
3、ic 6.0有以下三种工作模式：设计模式：正在进行应用程序的开发、程序界面的设计和代码的编辑。运行模式：正在运行应用程序，此时既不可编辑界面和代码，也不能设计程序。中断模式：在调试程序时暂时中断应用程序的运行，此时可以编辑代码。(2)菜单栏。菜单栏如图1-6所示，其上显示Visual Basic 6.0开发环境的命令。图1-5 图1-6(3)工具栏。工具栏如图1-7所示，它由多个图标按钮组成，用于对常用命令的快速访问。(4)窗体。窗体是用来设计应用程序的界面。用户可以通过向窗体添加控件、图形和图片来创建应用程序的界面，如图1-8所示。图1-7图1-8(5)工具箱。工具箱提供了一组工具，用于设计
4、时在窗体中放置控件。可以通过选择“视图”“工具箱”菜单命令打开或关闭工具箱。图1-9所示是Visual Basic 6.0 提供的通用工具箱。(6)“属性”窗口。“属性”窗口列出了选定窗体或控件属性的设置值，可以通过选择“视图”“属性窗口”菜单命令打开或关闭“属性”窗口。图1-10所示是窗体Form1的“属性”窗口。图1-9图1-10(7)工程资源管理器窗口。工程资源管理器窗口如图1-11所示，其中列出了当前工程中的窗体和模块等。当创建或删除窗体和模块文件时，工程资源的变化都会在该窗口中反映出来。(8)“窗体布局”窗口。“窗体布局”窗口让用户使用一个表示屏幕的小图像来布置应用程序中各个窗体在屏
5、幕上的位置，如图1-12所示。图1-11 图1-12(9)代码编辑器窗口。代码编辑器窗口是应用程序代码的编辑区域，应用程序的每一个窗体或模块都有一个单独的代码编辑器窗口。单击工程资源管理器窗口左上角的按钮，即打开窗体的代码编辑器窗口。图1-13所示为本章案例的代码编辑器窗口。3退出退出Visual Basic 6.0选择“文件”菜单中的“退出”命令即可退出Visual Basic，如图1-14所示。图1-13 图1-14三、操作步骤三、操作步骤1创建用户界面创建用户界面(1)启动Visual Basic 6.0。在“开始”菜单中选择“程序”“Microsoft Visual Basic 6.0
6、中文版”命令，如图1-2所示。在弹出的“新建工程”对话框中选择“新建”选项卡中的“标准EXE”选项，然后单击“打开”按钮，如图1-15所示，成功后出现窗体设计界面，如图1-4所示。图1-15(2)向窗体添加命令按钮控件。单击“工具箱”中的命令按钮(Command Button)控件，如图1-16所示，然后在窗体上拖曳鼠标，把命令按钮控件添加到窗体上，并将命令按钮控件调整到适当位置，如图1-17所示。图1-16 图1-17(3)向窗体添加标签控件。在“工具箱”中单击标签(Label1)控件，然后在窗体中拖曳鼠标，把标签控件添加到窗体上，将标签控件调整到适当位置，如图1-18所示。图1-182设置
7、对象的属性设置对象的属性(1)改变窗体标题。在窗体的“属性”窗口中将窗体的Caption属性的值改为“第一个应用程序”，如图1-19所示。(2)设置命令按钮的属性。在命令按钮的“属性”窗口中，将其Caption属性值改为“请点击我”，如图1-20所示。再在命令按钮的“属性”窗口中，单击Font属性值右边的按钮，如图1-21所示，出现“字体”对话框，如图1-22所示。在“字体”对话框中的“大小”选项栏中选择“四号”，然后单击“确定”按钮。图1-19 图1-20 图1-21 图1-22(3)设置标签的属性。在标签控件的“属性”窗口中，将Caption属性的值设为空，ForeColor属性设为“&H
8、000000FF&”，如图1-23所示。再在标签控件的“属性”窗口中单击Font属性值右边的按钮，出现“字体”对话框，在“大小”选项栏将字号设置为“一号”，如图1-24所示。图1-23 图1-243程序代码编辑程序代码编辑双击窗体上的“请点击我”命令按钮控件，弹出Form1的代码编辑器窗口，在代码编辑器窗口中添加代码：Label1.caption=“这是我用VB设计的第一个应用程序”，如图1-25所示。4运行程序运行程序在工具栏中单击启动按钮，如图1-26所示，或选择“运行”“启动”菜单命令，都可以运行程序。图1-25图1-26本案例运行后的界面如图1-27所示。单击“请点击我”按钮，标签控件
9、显示文字“这是我用VB设计的第一个应用程序”，如图1-1所示。图 1-275保存文件保存文件单击工具栏中的图标或选择“文件”“保存工程”菜单命令，弹出“文件另存为”对话框，如图1-28所示。选择所需要的文件夹，并输入窗体文件名，单击“保存”按钮，保存窗体文件。然后又出现“工程另存为”对话框，如图1-29所示，同样选择所需要的文件夹，并输入工程文件名，单击“保存”按钮，保存工程文件。图1-28 图1-29 6编译生成可执行文件编译生成可执行文件在集成开发环境中，调试完成后，用户可以编译生成可执行文件，编译后的可执行文件可以脱离集成开发环境，在Windows中运行。生成可执行文件的方法是：选择“文
10、件”菜单中的“生成工程1.exe”命令，屏幕上将出现如图1-30所示的“生成工程”对话框，按下“确定”按钮，即可按照对话框中显示的路径和文件名生成可执行文件。图1-307案例链接案例链接Visual Basic 6.0应用程序主要有4种类型的文件。第一类是单独的窗体文件，扩展名为.frm；第二类是公用的标准模块文件，扩展名为.bas；第三类是模块文件，扩展名为.cls；第四类是工程文件，这种文件由若干个窗体和模块组成，扩展名为.vbp。除上述4类文件外，还有其他一些文件类型，例如工程组文件(.vbp)、资源文件(.rc)等。四、探索与思考四、探索与思考把窗体的标题和命令按钮的标题分别修改成“一
11、个简单的应用程序”、“这是什么？”。五、学生自主设计五、学生自主设计请点请点击我击我1设计要求设计要求1)基本部分模仿设计一个应用程序，运行界面如图1-31所示，点击命令按钮“请点击我”后，出现如图1-32所示的界面。图1-31 图1-322)拓展部分创意设计在按下“请点击我”后，除了在窗体上显示“这是第一个VB应用程序”外，窗体的标题也要发生变化，试试看。2知识准备知识准备要完成自主设计内容，需掌握以下知识：(1)标签的Caption属性的修改。(2)命令按钮的Caption属性的修改。(3)简单代码的编写。3效果评价标准效果评价标准请对照表1-1完成自主设计的效果评价。表表1-1 效效果果
12、评评价价表表 4设计小结设计小结请将你的设计过程、设计体会、在设计过程中遇到的问题以及解决方法写在下面。_一、案例效果一、案例效果Visual Basic 6.0的安装步骤如下：(1)插入Visual Basic 6.0光盘后，系统自动启动安装程序并显示“安装向导”对话框，如图1-33所示。【案例案例1-2】Visual Basic 6.0的安装的安装图1-33(2)单击“下一步”按钮，显示“最终用户许可协议”对话框，如图1-34所示。(3)选择“接受协议”单选按钮后单击“下一步”按钮，将显示“产品号和用户ID”对话框，如图1-35所示。(4)输入正确的产品ID号、用户姓名、公司名称等注册信息
13、后，单击“下一步”按钮，显示“Visual Basic 6.0中文企业版”安装向导对话框，如图1-36所示。图1-34图1-35图1-36(5)单击“下一步”按钮，在出现的“选择公用安装文件夹”对话框中选择合适的文件夹，单击“下一步”按钮，显示欢迎使用Visual Basic 6.0中文企业版安装程序窗口，如图1-37所示。(6)单击“继续”按钮，出现确认产品ID号的窗口，如图1-38所示，单击“确定”按钮。图1-37图1-38(7)如图1-39所示，在选择安装类型窗口中，安装的缺省路径为“C:Program Files Microsoft Visual StudioVB98”。如果要自定义文
14、件夹，则单击“更改文件夹”按钮后选定文件夹，然后单击“典型安装”左边的图标，确定好所需格式，系统开始安装Visual Basic 6.0应用组件。(8)安装程序安装完毕时，显示如图1-40所示的重新启动Windows窗口。单击“重新启动Windows”按钮，以更新系统的配置。图1-39图1-40二、技术分析二、技术分析Microsoft 公司于1991年推出Visual Basic 1.0版本，1998年推出Visual Basic 6.0版本。随着版本的改进，Visual Basic已逐渐成为简单易学、功能强大的编程工具。从1.0版本到4.0版本，Visual Basic只有英文版；而5.0
15、之后的Visual Basic在推出英文版的同时，又推出了中文版，大大方便了中国用户。Visual Basic 6.0共有以下3个版本，各自满足不同的开发需要。(1)Visual Basic 6.0学习版：这是一个入门版本，主要面向初学编程人员。该版本包含所有的内部控件(标准控件)、网络(Grid)控件、Tab对象以及数据绑定控件。(2)Visual Basic 6.0专业版：该版本为专业的编程人员提供了一套功能完备的用于软件开发的工具。它包括学习版本的全部功能，还包括ActiveX控件、Internet控件、Crystal Report Writer报表控件。(3)Visual Basic
16、6.0 企业版：可供专业编程人员开发功能强大的组内分工应用程序。该版本包括专业版本的全部功能，同时具有自动化管理器、部件管理器、数据库管理工具、Microsoft Visual Sourcesafe面向工程版的控制系统等。根据安装版本的不同，Visual Basic 6.0的程序界面也有一些变化，本书以Visual Basic 6.0企业版为操作环境平台，但其内容同时适用于专业版和学习版。三、学生自主设计三、学生自主设计安装安装Visual Basic 6.0学习安装Visual Basic 6.0。本章通过几个简单的案例制作，介绍了Visual Basic 6.0的集成开发环境、安装以及应用
17、程序的设计步骤。学好本章对后面章节的学习有很大的帮助。【本本 章章 小小 结结】【案例案例2-1】窗体变化窗体变化【案例案例2-2】窗体的几种事件窗体的几种事件【案例案例2-3】几何图形的面积计算几何图形的面积计算【本章小结本章小结】一、案例效果一、案例效果程序运行后的界面如图2-1所示。窗体在屏幕的中央，窗体背景是一幅图像。单击窗体中的“最小化”按钮，可使窗体最小化，如图2-2所示。在Windows的状态栏中显示程序最小化后的按钮(按钮上有最小化图标)；单击“最大化”按钮，可使窗体最大化，此时窗体没有边框；单击“正常”按钮，可使窗体恢复原状，窗体有边框；单击“退出”按钮，可关闭窗体，退出程序
18、的运行。【案例案例2-1】窗窗 体体 变变 化化图2-1 图2-2 二、技术分析二、技术分析1对象对象面向对象是Visual Basic程序设计的基础，Visual Basic程序的设计在很大程度上来说就是设计如何控制对象，如何通过改变对象的属性来达到程序设计的要求。对象(Object)是Visual Basic应用程序的基本单元，是代码和数据的集合，用Visual Basic编程的实质就是用对象组装程序。在Visual Basic 程序设计中，整个应用程序就是一个对象，应用程序中还包含着窗体(Form)、命令按钮(CommandButton)、文本框(TextBox)、菜单等对象，以及对这些
19、对象进行操作的程序代码。对象都具有属性(数据)和方法(作用于对象的操作)。对象的属性和方法被封装成一个整体，供程序设计者使用。通过向对象发出的命令修改对象的属性，或使用对象的方法，就可以对对象进行操作。向对象发出的命令通过消息传送(事件驱动)来实现。2属性属性属性(Property)用于描述对象的名称、位置、大小、颜色、字体等特性。Visual Basic中的窗体对象具有Caption(标题)、Name(名称)、Width(宽度)、Height(高度)、Font(字体)等属性，这些属性决定了Visual Basic窗体对象的相应内容。可以通过改变对象的属性值来改变对象的属性特性。对象属性的设置
20、有两种方法，一种是在程序设计时使用“属性”窗口修改其属性值，另一种是在程序中使用代码，在程序运行时改变属性值。有的属性必须通过编写的代码在运行程序时进行设置；有的属性必须使用“属性”窗口在程序设计时完成设置；有的属性既可在程序设计时通过“属性”窗口修改其属性值，又可在程序运行中通过程序代码来设置。可以在运行程序时读取和设置值的属性称为可读写属性，例如对象的高度(Height)、背景颜色(BackColor)、文字(Text)等属性，既可以在程序设计时指定，又可以在程序中以代码方式改变。只能在程序设计时进行设置，而在程序运行时只能读取的属性称为只读属性，例如对象的名称(Name)，只能在程序设计
21、时设置，在运行中只能引用而不能改变。在程序中使用代码进行属性设置的语句格式如下：Object.属性=属性值这里的Object指的是需要改变属性的对象，符号“.”用于引用该对象的属性、方法等。例如：Form1.Caption=“学习Visual Basic 语言”Form1.Height=1000语句中的Form1即为一个名称为Form1的窗体对象，Caption为窗体的标题属性，Height为窗体的高度属性。因此，执行上述语句后，窗体的标题将被设置为“学习Visual Basic 语言”，高度被设置为1000。窗体是一个最基本的对象，其他控件对象的使用与窗体多有相似之处，因此学习好窗体的使用是
22、学习Visual Basic 6.0 的基础。以下是窗体的常用属性：(1)Name 属性，窗体的名字，在编写代码时通过窗体的名称来标识这个对象。本节案例中的窗体名字均为Form1。(2)Caption属性，窗体的标题。本案例中窗体的标题为“窗体变化”。(3)Appearance属性，窗体的外观效果，取值为0(平面)或1(立体)。(4)BackColor属性，窗体的背景颜色，可在弹出的调色板中选择。(5)ForeColor属性，窗体的前景颜色，可在弹出的调色板中选择。(6)BorderStyle属性，窗体的边界类型，取值为05，可从弹出的下拉列表中选择。(7)ControlBox属性，窗体是否有
23、控制框，取值为True或False。(8)Font属性，通过弹出的对话框选择窗体上输出字符的字体、大小和风格。(9)Height属性，窗体的高度。(10)Width属性，窗体的宽度。(11)Left属性，窗体距左边界的距离。(12)Top属性，窗体距顶部边界的距离。(13)MaxButton属性，窗体右上角最大化按钮是否显示，取值为True或False，运行时为只读。(14)MinButton属性，窗体右上角最小化按钮是否显示，取值为True或False，运行时为只读。(15)Picture属性，窗体背景图片。(16)FontName属性，窗体输出文字的字体。(17)FontSize属性，窗体
24、输出文字的大小。(18)FontItalic属性，窗体输出文字是否设置为斜体。(19)FontBold属性，窗体输出文字是否设置为粗体。(20)FontUnderline属性，窗体输出文字是否带下划线。(21)WindowsState，设置和获取窗体对象的可视状态。如该属性值为0或Normal，窗体以正常状态显示，此值为默认值；如该属性值为1或vbMinimized，窗体以最小化显示，显示为一个图标；如该属性值为2或vbMaximized，窗体以最大化显示，窗体放大到最大尺寸。(22)StartUpPosition，设置窗体首次显示时所处的位置，其值是一个整数。当值为0时，手动指定取值，窗体初
25、次显示时其位置由Left和Top属性的值确定；当值为1时，窗体处于所隶属对象的中间；当值为2时，窗体显示位置为屏幕中间；当值为3时，窗体显示位置为屏幕左上角。三、操作步骤三、操作步骤1创建程序界面创建程序界面首先，创建一个“标准EXE”工程，然后为窗体Form1添加有关对象，如图2-3所示。图2-32设置对象的属性设置对象的属性本案例中共用到6个对象：窗体的名称为Form1，标签的名称为Label1，4个按钮的名称分别是Command1、Command2、Command3和Command4。按表2-1所示设置各对象的属性值。表表2-1 设置对象的属性值设置对象的属性值3程序代码编辑程序代码编辑
26、在程序代码窗口中输入下面的代码：Private Sub Command1_Click()Form1.WindowState=vbMinimized 最小化End SubPrivate Sub Command2_Click()Form1.WindowState=vbMaximized 最大化End SubPrivate Sub Command3_Click()Form1.WindowState=Normal 正常End SubPrivate Sub Command4_Click()End 退出End Sub4程序代码调试程序代码调试在程序代码窗口中输入程序代码后，完成程序代码的调试和修改。四、探
27、索与思考(1)当点击不同的命令按钮时，窗体的标题也要跟着变化，如点击“正常”命令按钮时，窗体标题变为“窗体大小为正常大小”。(2)当点击不同的命令按钮时，窗体的背景和窗体上的文字也会跟着发生变化。五、学生自主设计五、学生自主设计窗体窗体属性的变化属性的变化1设计要求设计要求1)基本部分模仿设计一个窗体，窗体上有4个命令按钮，名称分别为Command1、Command2、Command3和Command4，它们对应的Caption属性值分别是字体、背景、恢复原状和关闭窗口，程序运行后出现如图2-4所示窗体，单击“字体”命令按钮又出现如图2-5所示窗体。图2-4图2-5要求单击“背景”命令按钮时，
28、改变窗体的背景颜色；单击“恢复原状”命令按钮时，窗体的颜色恢复为设计窗体时默认的背景颜色；单击“关闭”按钮时，关闭窗体。请完成代码的编写。2)拓展部分创意设计在窗体上再增加相关的命令按钮，使得所增加的命令按钮对应窗体中的其他属性，试试看。2知识准备知识准备要完成自主设计内容，需掌握以下知识：(1)窗体的属性。(2)命令按钮的属性设置。(3)简单代码的编写。3效果评价标准效果评价标准请对照表2-2完成自主设计的效果评价。表表2-2 效效果果评评价价表表4设计小结设计小结请将你的设计过程、设计体会、在设计过程中遇到的问题以及解决方法写在下面。一、案例效果一、案例效果本程序实现的功能是当不同动作发生
29、时，程序响应不同的事件。在这个程序中可以响应的事件有：窗口大小改变(Resize)事件，键盘按键被按下(KeyPress)事件，鼠标在窗体上单击(Click)事件和窗体被卸载(UnLoad)事件。程序运行效果如图2-6图2-9所示。【案例案例2-2】窗体的几种事件窗体的几种事件图2-6 图2-7 图2-8 图2-9 二、技术分析二、技术分析1事件事件Visual Basic 6.0中的事件是指由系统事先设定的，能为对象识别和响应的动作。或者说，事件是在对象上发生的一件事，如单击、拖曳、按键等。每一种对象能识别的事件是不同的，在设计阶段，可以从该对象代码窗口右边的下拉列表中确认其所能识别的事件。
30、以下是窗体的常用事件。(1)Load，窗体被加载。(2)Active，窗体变为活动窗口。(3)Click，在窗体上单击鼠标。(4)DblClick，在窗体上双击鼠标。(5)KeyDown，按下键盘上某个键。(6)KeyPress，敲击键盘。(7)KeyUp，按下键盘上某个键后释放。(8)MouseDown，按下鼠标键。(9)MouseUP，释放鼠标键。(10)MouseMove，鼠标移动。(11)Resize，改变窗体尺寸。(12)Unload，关闭(卸载)窗体。2MsgBox的应用的应用关于MsgBox函数和过程的应用，具体可以参见本书第5章【案例5-1】的技术分析的第4条。三、操作步骤三、
31、操作步骤1创建程序界面创建程序界面启动中文Visual Basic 6.0，选择“标准EXE”工程，进入中文Visual Basic 6.0的集成开发环境，如图2-10所示。图2-102设置对象的属性设置对象的属性该案例中只有一个窗体对象，重点学习使用窗体的事件，所以属性采用默认设置即可。3程序代码编辑程序代码编辑在窗体上双击，打开代码编辑器窗口，在该窗口右边的过程下拉列表中选择相应的事件，并输入以下代码：Private Sub Form_Click()MsgBox 鼠标在窗体上单击，发生Click事件。End SubPrivate Sub Form_KeyPress(KeyAscii As
32、Integer)MsgBox 键盘按钮被按下，发生KeyPress事件。End SubPrivate Sub Form_Resize()MsgBox“窗体大小被改变，发生Resize事件。”End SubPrivate Sub Form_Unload(Cancel As Integer)MsgBox“窗体被卸载，发生UnLoad事件。”End Sub4程序代码调试程序代码调试 输入程序代码后，完成程序代码的调试和修改。四、探索与思考四、探索与思考改变每个事件的响应方式，或者增加相应的内容。五、学生自主设计五、学生自主设计事件事件窗体窗体1设计要求设计要求1)基本部分模仿用Click、Dblcl
33、ick、MouseDown、unload事件设计一个Visual Basic应用程序。要求程序运行后，在屏幕的中央显示一个窗体，窗体的画面如图2-11所示。图2-112)拓展部分创意设计请给每个事件设计一个响应，试试看。2知识准备知识准备要完成自主设计内容，需要掌握以下知识。(1)窗体的属性设置。(2)窗体的常用事件。(3)简单代码的编写。3效果评价标准效果评价标准请对照表2-3完成自主设计的效果评价。表表2-3 效效果果评评价价表表4设计小结设计小结请将你的设计过程、设计体会、在设计过程中遇到的问题以及解决方法写在下面。一、案例效果一、案例效果本案例可以帮助我们完成简单几何图形的面积计算，程
34、序效果如图2-12所示。程序运行后首先显示图2-12所示画面，然后单击窗体中的各个图形按钮，即可进入对应图形的面积计算窗口，输入相应的数据之后，再点击“计算”按钮，就可以输出该图形的面积。图2-13图2-16分别为三角形、圆形、矩形和平行四边形的面积计算窗口。【案例案例2-3】几何图形的面积计算几何图形的面积计算图2-12 图2-13图2-14 图2-15图2-16二、技术分析二、技术分析1方法方法方法是指控件的动作，实质是Visual Basic 6.0提供的一种专门用来完成一定操作的子程序或函数。下面是常用的窗体的方法。(1)Print，在窗体上显示文字，也可以在打印机上输出。格式：窗体名
35、.Print例如使用代码Form1.Print“Visual Basic 程序设计”可在窗体上显示文字“Visual Basic 程序设计”。(2)Cls，清除由其他方法在窗体中显示的文本和图形。格式：窗体名.Cls(3)Hide，隐去窗体。格式：窗体名.Hide(4)Show，显示窗体。格式：窗体名.Show(5)Move，使对象移动，同时也可以改变被移动对象的尺寸。格式：窗体名.Move Left,Top,Width,Height其中，Left是指窗体距屏幕左边界的距离，Top是指窗体距离屏幕顶部的距离，Width是指窗体改变后的宽度，Height是指窗体改变后的高度。例如将窗体移到屏幕左
36、上角，并最大化显示，实现语句为Form1.Move 0,0,Screen.Width,Screen.Height2Val(C)函数函数说明：具体参见第5章案例5-1的技术分析第6条中有关VB标准函数。三、操作步骤三、操作步骤1创建几何图形面积计算创建几何图形面积计算主界面主界面新建一个“标准EXE”工程，按照图2-17所示在Form1窗体上添加1个标签控件和5个命令按钮控件，并按表2-4设置各对象属性。图2-17表表2-4 设置对象属性设置对象属性(一一)2创建三角形面积计算界创建三角形面积计算界面面使用添加新窗体的方法为程序添加一个新窗体Form2，按照图2-18所示在该窗体上添加4个标签控
37、件、3个文本框控件和2个命令按钮控件，并按表2-5设置对象属性。图2-18表表2-5 设置对象属性设置对象属性(二二)3创建矩形面积计算界面创建矩形面积计算界面使用添加新窗体的方法为程序添加一个新窗体Form3，按照图2-19所示在该窗体上添加3个标签控件、2个文本框控件和2个命令按钮控件，并按表2-6设置对象属性。图2-19 表表2-6 设置对象属性设置对象属性(三三)4创建平行四边形面积计创建平行四边形面积计算界面算界面使用添加新窗体的方法为程序添加一个新窗体Form4,按照图2-20所示在该窗体上添加4个标签控件、3个文本框控件和2个命令按钮控件，并按表2-7设置对象属性。图2-20表表
38、2-7 设置对象属性设置对象属性(四四)5创建圆形面积计算界面创建圆形面积计算界面使用添加新窗体的方法为程序添加一个新窗体Form5,按照图2-21所示在该窗体上添加2个标签控件、1个文本框控件和2个命令按钮控件，并按表2-8设置对象属性。图2-21表表2-8 设置对象属性设置对象属性(五五)6程序代码编辑程序代码编辑在窗体的代码编辑窗口中输入以下程序代码。为Form1中的5个命令按钮分别编写如下代码：Private Sub Command1_Click()进入三角形面积计算窗口 Form2.ShowEnd SubPrivate Sub Command2_Click()进入矩形面积计算窗口 F
39、orm3.ShowEnd SubPrivate Sub Command3_Click()进入平行四边形面积计算窗口 Form4.ShowEnd SubPrivate Sub Command4_Click()进入圆形面积计算窗口 Form5.ShowEnd SubPrivate Sub Command5_Click()退出程序 EndEnd Sub为Form5编写如下代码：Private Sub Command1_Click()计算并输出圆的面积 r=Val(Text1.Text)s=3.1415926*r*r Form5.Print Form5.Print sEnd Sub7程序代码调试输入程
40、序代码后，完成程序代码的调试和修改。四、探索与思考四、探索与思考(1)完成Form2、Form3、Form4中的代码的编写。(2)完善Form1、Form2、Form3、Form4和Form5的界面设计。五、学生自主设计五、学生自主设计多窗多窗体的设计体的设计1设计要求设计要求1)基本部分模仿要求程序运行后，在屏幕的中央显示一个窗体，窗体的画面如图2-22所示。图2-22这个程序共有Form1、Form2、Form3和Form4 4个窗体，主窗体Form1(多窗体的变化)上有4个命令按钮，名称分别为Command1、Command2、Command3和Command4。点击Command1后弹
41、出Form2、Form3和Form4，点击Command2后隐藏Form2和Form3，点击Command3后卸载Form4，点击Command4后卸载Form2和Form3，同时关闭Form1。2)拓展部分创意设计把分别点击Command1、Command2、Command3和Command4后的变化用一个消息框显示出来。提示：提示：MsgBox的使用具体参见第5章【案例5-1】中的技术分析第4条。2知识准备知识准备要完成自主设计内容，需要掌握以下知识：(1)窗体属性的设置。(2)命令按钮的有关属性的设置。(3)窗体方法和事件的应用。3效果评价标准效果评价标准请对照表2-9所示的评价标准完成
42、自主设计的效果评价。表表2-9 效效果果评评价价表表 4设计小结设计小结请将你的设计过程、设计体会、在设计过程中遇到的问题以及解决方法写在下面。本章通过几个简单的案例，介绍了窗体的属性、事件和方法，同时还引入了对象等概念，为学习设计界面和程序编写打下了基础。【本本 章章 小小 结结】【案例案例3-1】算术四则运算器算术四则运算器【案例案例3-2】三角面积的计算三角面积的计算【本章小结本章小结】一、案例效果一、案例效果本案例是一个可以进行四则算术运算的程序，程序运行效果如图3-1所示，对输入文本框的数据可以进行加、减、乘、除等数学运算。【案例案例3-1】算术四则运算器算术四则运算器图3-1二、技
43、术分析二、技术分析1数据的类型数据的类型数据类型决定了具有这种类型的常量、变量、字符串、数组等数据对象的存储形式、取值范围及能进行的运算。Visual Basic的数据类型可分为标准数据类型和用户自定义数据类型两大类。标准数据类型又称为基本数据类型，它是由Visual Basic直接提供给用户的数据类型，用户不用定义就可以直接使用；用户自定义数据类型是由用户在程序中以标准数据类型为基础，并按照一定的语法规则创建的数据类型，它必须先定义，然后才能在程序中使用。Visual Basic 6.0的标准数据类型见表3-1。表表3-1 Visual Basic 6.0的标准数据类型的标准数据类型上述基本
44、数据类型中，Byte、Integer、Long、Single、Double和Currency等6种都是用来保存数值的数据类型，使用时应根据需要选择适当的数据类型，以节约存储空间和提高程序运行速度。若用户事先知道要保存的数据为整型，则应将变量声明为Integer(整型)或Long(长整型)。整型的运算速度较快，而且比其他数据类型占用的内存要少。若变量要保存的数据包含小数，则将其声明为Single(单精度浮点型)、Double(双精度浮点型)或Currency(货币型)。其中Currency类型支持小数点右边4位和小数点左边15位的精度，适用于货币的精确计算。Single类型和Double类型比C
45、urrency类型的有效范围大得多，但在进位时易产生小的误差，故不适合于货币的精确计算。单精度浮点数的运算速度优于双精度浮点数。如果变量要保存的是二进制数，则可将它声明为Byte类型的数据来保存。该类型的变量不能表达负数。所有数值型变量均可相互赋值。在将浮点数赋予整数之前，Visual Basic要将浮点数的小数部分四舍五入。2常量与变量常量与变量在Visual Basic 中进行运算的对象有两大类：常量与变量。1)常量常量是在程序运行过程中，其值保持不变的量，如数值、字符串等。在Visual Basic中，常量可分为直接常量和符号常量。直接常量就是在程序中，以直接明显的形式给出数据本身的数值
46、。根据常量的数据类型，直接常量有数值常量、字符串常量、逻辑常量和日期常量，如：12、12.89、“中文Visual Basic 6.0”、False、#1999-10-23 3:10:25#等。符号常量就是用一串字符来代替一个常数。在程序中凡是需要用到这个常数的地方，都可以用这个符号来代替。符号常量又可分为系统定义的符号常量和自定义符号常量。系统定义的符号常量是Visual Basic系统提供的预定义常量，这些常量可与对象、属性和方法一起在应用程序中使用。例如：窗体对象的WindowsState属性可接受的系统定义符号常量有vbNormal(正常)、vbMinimized(最小化)和vbMax
47、imized(最大化)。自定义符号常量是由程序设计人员按照规定的语法规则在编写程序时命名的。它必须先定义，然后才能在程序的代码中使用。在定义自定义符号常量时，常量的名称最好应具有一定的含义，以便于理解和记忆。自定义符号常量的定义格式如下：Public|Private Const 常量名 数据类型符|As数据类型关键字=表达式其中，Const 为必须的定义关键字，说明该符号为常量；“=表达式”部分也是必须的，该表达式说明了常量的取值；“”内的关键字是可选的，Public 表示该常量为公用常量，Private表示该常量为私有常量，“|”符号表示其左右的关键字可任选其一。例如：编程求一个半径为5的圆
48、的周长和面积，就需要用这个常数，而计算机并不知道的值是多少，如果写成 A=2*3.141592*5 B=3.141592*5*5就需要重复地输入3.14159 这个数，既费事又很容易出错。于是我们就用一个符号pai来代替3.14159，在程序中凡是用到3.14159的地方，都用pai来代替。例如：Private Sub Form_Activate()Const pai as Single=3.14159 A=2*pai*5 B=pai*5*5 Print A Print BEnd Sub2)变量变量是在程序执行过程中其值可以变化的量。在应用程序的执行过程中，变量用来存储程序执行中的临时数据。变
49、量随程序调入内存，并被分配一定的存储空间。所以，在使用变量之前，要考虑变量的名称和数据类型，即声明变量。Visual Basic 语言中，提供了两种声明变量的方法。(1)Dim 语句显式声明变量。格式如下：Dim 变量名 As New 变量数据类型 变量数据类型可以是标准数据类型，也可以是用户自定义类型或一个对象类型，如果变量没有规定类型，则使用其默认值Variant，这说明变量可以用作任意类型。例如：Dim n As IntegerDim str As StringDim str As String*30在一行中，可声明多个变量，正确的语法格式是用逗号将各变量分隔。例如：Dim x As I
50、nteger，y As String，z As DoubleDim m1 As Integer，m2 As Integer，m3 As Integer前句变量的数据类型不同，后句变量的数据类型相同，都需要用逗号分开，不能合写。例如，第二句不能写成：Dim m1,m2,m3 As Integer 这行语句表示m1和m2是变体数据，m3是整型数据。因此，这行语句与上面的语句不是等同的，不能表达原设计的用意。New关键字可以创建一个对象。例如声明对象变量，加New选择项指定一个指向对象的对象句柄即可创建该对象。例如：Dim a_object As New form 声明a_object为窗体对象变量
