1.4 一个简单的Visval Basic应用程序示例

创建一个VB应用程序一般有以下几个步骤。

(1)新建工程。创建一个VB应用程序首先要创建一个新的标准EXE工程。

(2)创建应用程序界面。使用工具箱在窗体上放置所需控件。其中,窗体是创建应用程序界面的基础,程序中的所有信息都要通过窗体显示出来。

(3)设置属性值。通过这一步骤来改变窗体和控件的外观和行为。属性值可以通过“属性”窗口设置,也可通过程序代码设置。

(4)编写代码。通过“代码编辑器”窗口为一些对象相关的事件过程编写程序代码。

(5)保存文件。运行调试程序之前,一般要先保存所有程序文件,以防程序运行出错导致文件丢失或其他问题。VB中需要保存的文件有工程文件、窗体文件、模块文件及其他相关文件。

(6)程序运行与调试。测试程序,直到运行结果正确,达到设计需求为止,再次保存修改后的程序。

下面,通过设计一个简单的用户登录窗体,来说明VB开发应用程序的一般步骤,以及每一步的具体做法。

【例1-1】 设计一个简单的用户登录窗体,要求能通过文本框输入用户名和密码,并通过命令按钮进行登录验证。

根据创建一个VB应用程序的步骤,完成例题中的用户登录窗体设计与编程。

1.新建VB工程

打开Windows“开始”菜单中的“Microsoft Visual Basic 6.0中文版”,启动后,在出现的“新建工程”对话框中选择“新建”选项卡中默认的“标准EXE”,单击“打开”按钮,新建一个VB工程。

2.设计程序界面

在窗体上添加控件的方法是:单击工具箱中的某个控件按钮,该按钮将反相显示,移动鼠标光标到窗体上,光标变成“+”,把光标“+”移到窗体中的适当位置,按下鼠标左键,拖动鼠标,即可在窗体上画出该控件。

本例中,首先,在窗体“Form1”上画两个“Label”控件——“Label1”和“Label2”;然后,分别在两个“Label”控件右边各画一个“Textbox”控件——“Text1”和“Text2”;接着,在窗体的下部合适的位置画两个“CommandButton”控件——“Command1”和“Command2”。

3.设置对象属性

把Label1的Caption属性设为“用户名”,Label2的Caption属性设为“密码”。把Text2的PasswordChar属性设为“*”,同时把两个Textbox的Text属性设为空。分别设置两个CommandButton的Caption属性为“登录”和“取消”。适当调整各控件的大小,并设置各对象的属性,如表1-1所示。

表1-1 例1-1中各对象的属性设置

利用鼠标可以粗略地调整控件的大小及其在窗体中的位置。利用“格式”菜单中的命令,则可以精确地调整多个控件的对齐、尺寸、间距和顺序,也可以实现锁定控件的功能。本例中各组相同类型的控件,都可以设置其“统一尺寸”——宽度和高度“两者都相同”(或采用复制控件的方法),如Label1和Label2、Text1和Text2、Command1和Command2;设置水平方向“中间对齐”或垂直方向“居中对齐”,如位于同一水平线的 Label1和 Text1,位于同一垂直线的 Label1和Label2等。有些控件还可以设置“在窗体中居中对齐”→“水平对齐”,如Command1和Command2作为一个整体,需要在窗体上水平居中。设置好的窗体布局如图1-13所示。

图1-13 例1-1设计界面

为避免因操作失误而修改已完成的窗体布局,可以执行菜单“格式”→“锁定控件”命令来锁定设计界面。

4.编写事件代码

完成界面设计之后,就需要编写程序代码了。本例中,需要对“Command1”和“Command2”两个按钮编写事件代码,分别实现“登录”和“取消”功能。

打开代码编辑器,在对象列表框中选择“Command1”,在事件列表框中选择“Click”,在生成的Command1_Click事件过程中输入如下代码。

Private Sub Command1_Click()

If Text1.Text = "admin" And Text2.Text = "pwd" Then

MsgBox "登录成功"

Else

MsgBox "登录失败,请重新输入用户名或密码"

End If

End Sub

类似地,在Command2_Click事件过程中输入如下代码。

Private Sub Command2_Click()

End

End Sub

5.保存应用程序

单击工具栏上的“保存”按钮,连续两次弹出“保存文件”对话框,分别用于保存窗体文件和工程文件。在本例中,需要保存窗体文件为“Form1.frm”,保存工程文件为“工程1.vbp”。

6.运行调试程序

执行菜单“运行”→“启动”命令来运行应用程序。如果运行没有错误,则输入正确的信息:用户名输入“admin”,密码输入“pwd”。单击“登录”按钮,得到图1-14所示结果。

如果程序运行出错,则根据弹出的信息提示来修改和调试应用程序,并再次保存和运行应用程序。

VB程序的执行步骤如下。

图1-14 例1-1运行结果

(1)启动应用程序,装载和显示窗体。

(2)窗体或窗体上的控件等待事件的发生。

(3)事件发生时,执行对应的事件过程。

(4)重复执行步骤(2)和(3)。

(5)直到遇到“End”结束语句结束程序的运行,或单击“结束”按钮强行停止程序的运行。

例1-1中,程序运行后,如果单击“取消”按钮,则直接结束程序的运行。