VB电子教材01

第1章 Visual Basic 6.0概述1.1 Visual Basic简介1.1.1 Visual Basic的发展过程Basic是英文Beginner's All-Purpose Symbolic Instruction Code（初学者通用符号指令代码）的缩写，是专门为初学者设计的计算机语言。

它诞生于1964年，最初问世时只有几十条语句，由于简单易学而受到了用户的欢迎，很快就应用于各个领域。

近几年来，Basic语言有了很大发展，各种版本应运而生，功能得到进一步增强，因而成为最常用和最具活力的计算机程序设计语言之一。

随着计算机技术的飞速发展，美国微软公司的Microsoft Windows以其具有多任务性、图形用户界面等强大功能，而成为当今微型计算机操作系统的主流产品。

众多的软件开发者已从原来的DOS软件开发转向Windows。

许多商用软件公司为适应这一趋势，推出了不少Windows 环境下的软件开发工具，Visual Basic就是在这样的形势下诞生的。

早在1991年，为了简化Windows应用程序的开发，微软公司推出了Visual Basic 1.0，它极大地改变了人们对Windows的看法以及使用W indows的方式。

Visual Basic（简称为VB）是Microsoft公司为开发Windows应用程序而提供的强有力的开发环境和工具，是具有很好的图形用户界面（Graphic User Interface，简写为GUI）的程序设计语言。

VB应用程序的开发以对象为基础，并运用事件驱动机制实现对Windows操作系统的事件响应。

VB提供了大量控件，可用于设计界面和实现各种功能，用户可以通过拖放操作完成界面设计，不仅大大减轻了工作量、简化了界面设计过程，而且有效地提高了应用程序的运行效率与可靠性。

VB提供了各种常用功能，如界面设计、计算与绘图、网络通信、数据访问和Internet访问等。

使用VB不仅可以感受到Windows带来的新技术、新概念和新的开发方法，还可以感受到VB是众多W indows软件开发工具中效率最高的一个，是开发Windows应用程序的理想工具。

在随后的几年中，VB几经修改完善，版本不断升级，于1998年推出了VB 6.0。

它是微软推出的VB家族中的最新成员，是一个运行在Windows 95或Windows NT操作系统下、32位应用程序的开发工具。

VB 6.0（以下简称为VB）在VB 5.0的基础上，在Internet应用和远程数据访问等方面进行了较大改进，增加了一些新控件并增强了已有功能。

1.1.2 编制VB应用程序的基本步骤启动VB后，编制应用程序的三个基本步骤依次为：界面设计，过程设计，调试运行。

下面通过一个求解一元二次方程实根的具体实例加以说明，使读者建立对这一过程的感性认识，并会用其他简例模仿这一过程。

本节中所涉及的“工程”、“控件”、“属性”等名词，2 Visual Basic 6.0程序设计教程将在1.3节中介绍。

⒈启动VB安装VB后，“开始”菜单的“程序”组中将多出一个“Microsoft Visual Basic 6.0 中文版”菜单选项，这时就可以启动VB了，步骤如下：⑴单击Windows 任务栏的“开始”按钮，从“程序”组中选择其中的“Microsoft Visual Basic6.0 中文版”启动VB后，显示如图1-1所示的“新建工程”窗口，提示用户选择应用程序类型。

图1-1“新建工程”窗口⑵在“新建”标签中选择“标准EXE”，VB显示集成开发环境主窗口，如图1-2所示。

在集成开发环境中集中了许多不同的功能，如程序设计、编辑、编译和调试等，所有的任务正是在这一环境中完成的。

图1-2 集成开发环境主窗口第1章Visual Basic 6.0概述 3⒉界面设计⑴添加控件在窗口左边的工具箱中，选中（标签控件Label），在窗体上用鼠标拖动，画出这一控件。

用同样的方法画出其他三个标签、四个文本框（TextBox，在工具箱中图标为）和两个命令按钮（CommandButton，在工具箱中图标为）。

若在窗体Form1上绘出了程序所需的控件，同类型的控件序号将依次自动增加。

添加控件后的程序界面如图1-3所示。

图1-3 示例界面设计之一向窗体中添加控件的方法有两种：①单击工具箱中的控件图标，鼠标指针变成一个十字指针，在窗体的工作区按住鼠标左键拖动鼠标，即可在窗体上画出对应的控件。

②双击工具箱中的控件图标，即可在窗体的中央画出控件。

第二种方法与第一种方法的不同之处是，第一种方法画出的控件大小和位置可随意确定，而第二种方法画出的控件的大小和位置是暂时固定的。

当然，控件的大小和位置都可以根据需要进行修改。

在界面设计时，在窗体上画出控件后，控件的边框上出现8个蓝色小方块，这表明该控件是“活动”的，通常称为“当前控件”。

用鼠标单击控件，可以使之成为当前控件。

对于选中的控件（即当前控件），可以用两种方法进行缩放和移动：①直接使用鼠标拖动控件到需要的地方。

利用鼠标指针对准控件的选中标志（8个小方块）当出现双向箭头时，可以改变控件的大小（即高度和宽度）。

②在属性窗口修改某些属性来改变控件的大小和位置。

与窗体和控件大小及位置有关的控件属性有Left、Top、Width及Height。

其中，（Left，Top）是窗体或控件左上角的坐标，W idth是其宽度，Height是其高度。

在属性窗口中可以找到这些属性，修改其值即可改变控件的大小和位置。

按照前面介绍的方法确定所需控件的位置、大小等属性后，可以继续设置各对象的其他属性，从而完成应用程序的界面设计。

⑵设置属性设置对象属性可以在属性窗口中进行，一般采用的操作方法是：用鼠标单击选中该对象，在随后出现的该对象的属性窗口中对属性值作修改。

设置属性实际上是对原有属性的修改，对4 Visual Basic 6.0程序设计教程象的任何属性用户不作设置则该属性值取VB的缺省值。

①设置窗体的属性设置窗体如Form1的属性的方法是：单击窗体的空白区域（不是任何其他控件），在属性窗口中找到标题属性Caption，其缺省值为Form1，可以将其值改为“简单示例”。

当然，窗体的其他属性也可根据程序的需要进行设置，如窗体的名称属性Name、运行时窗体的背景颜色、边框风格、窗体的大小等。

②设置窗体中其他控件的属性单击选中某个控件，在该控件的属性窗口中根据需要逐一设置控件的各属性。

若选中标签控件“Label1”，将其边框风格属性（BorderStyle）改为“1-Fixed”。

然后用鼠标单击字体属性（Font）右边的“...”按钮，从弹出的“字体”对话框（如图1-4所示）中设置字体类型为“隶书”、字体大小为“三号”。

图1-4 “字体”对话框选中标签控件Label2，将其Caption设置为“A=”，AutoSize设置为“True”，设置字体大小为“二号”。

用同样的方法设置标签控件Label3、Label4。

图1-5 示例界面设计之二第1章Visual Basic 6.0概述 5选中文本框控件Text1，将其Text属性值设置为空字符串，设置字体类型为“黑体”、字体大小为“四号”。

用同样的方法设置其他文本框控件。

将两个命令按钮的标题（Caption）分别设置为“计算”和“结束”。

所有控件的其他属性均采用缺省值。

属性设置后的窗体如图1-5所示。

⒊过程设计在菜单栏中“视图”各选项中选择“代码窗口”（打开后的代码窗口如图1-14、1-15所示），单击“对象”下拉列表框右边的箭头按钮，从中选择Form对象。

在“过程”的事件下拉列表框中选择Load事件，在代码窗口中输入下列代码。

窗体的Load 事件在运行中加载窗体时被自动执行，通常在该过程中动态设置一些对象的属性。

Private Sub Form_Load()Label1.Caption = "解一元二次方程的根"End Sub用同样的方法，输入命令按钮Command1和Command2的单击（Click）事件过程代码：Private Sub Command1_Click()Dim A As Single, B As Single, C As SingleDim X1 As Single, X2 As SingleA = Val(Text1.Text)B = Val(Text2.Text)C = Text3.Text 'VB6.0 自动转换输入字符串为数值变量C赋值。

If B * B - 4 * A * C > = 0 ThenX1 = (-B + Sqr(B * B - 4 * A * C )) / (2 * A)X2 = (-B - Sqr(B * B - 4 * A * C )) / (2 * A)Text4.Text = "X1=" & Str(X1) & Space(2) & "X2=" & Str(X2) ElseText4.Text = "方程无实根"End IFEnd SubPrivate Sub Command2_Click()EndEnd Sub事件过程的首尾两行“Private Sub Command1_Click()”、“End Sub”由系统自动给出。

程序中的逗号、引号等符号都必须是英文符号，中文标点符号只能出现在字符串中。

如执行语句Print "“走好，您哪！”"，窗体上显示“走好，您哪！”。

由单引号或关键字Rem开始的一行文字，是程序中的注释语句，在程序运行时，注释部分将被忽略，程序员为提高程序的易读性，在程序中插入适量的注释是较好的编程风格之一。

⒋调试运行单击工具栏上的“启动”按钮或按F5键，即运行工程。

在文本框中输入一元二次方程的三个系数，用鼠标单击“计算”按钮，窗体显示如图1-6所示，单击“结束”按钮，则程序结束。

6 Visual Basic 6.0程序设计教程图1-6 示例之运行结果单击工具栏上的“结束”按钮也可结束程序运行，返回“窗体设计器”窗口。

在程序运行时，可以反复输入系数值，然后单击“计算”，得到多个方程的根。

如果应用程序的运行结果不符合设计的要求，则需要修改程序。

修改程序包括修改对象的属性和代码，也可以添加新的对象和代码，或者调整控件的大小等，直到满足设计需要为止。

注意：在本例中，如果不输入系数而直接单击“计算”，则程序出错。

如何限定必须先输入文本框中数据后才能单击“计算”按钮的呢（即限定各控件的事件过程响应的先后顺序）？可以将示例程序作如下修改：⑴界面设计，在窗体上添加命令按钮Command3，将其Caption属性值设置为“开始”。