VB编程学习怎么入门

VB 6.0的编程环境

• 01

  VB6.0采用可视化的编程环境，它好学易用，运行VB6.0后，会出现如下图所示的窗口。先来解决一个小问题，怎么新建一个VB的工程？方法是这样的，在程序启动时出现的“新建工程”对话框中选择“标准EXE”并点击确定，就能直接新建一个工程，如果你跳过了这个对话框则也可从“文件”菜单中选择“新建工程”重新调出此对话框。

• 02

  VB的编程环境虽然看起来复杂，但可以把它分为几个部分，每个部分都有自己特定的功能，这样我们就清楚多了。其实VB这是通过这样一个界面把相近或同类的功能组合在一起的，它使我们在设计程序时能方便的控制程序的方方面面。

  

• 03

  窗体的最上层是“VB 6.0的菜单”和“便捷工具按钮”，菜单中包含了所有的VB提供的功能的选项，而其中一些常用的功能或操作选项则被提取出来放在了“便捷工具按钮”中，通过点击这些快捷按钮可以加快程序开发的速度，下图标出了常见的工具按钮的作用，记着使用它们。

  

• 04

  接着看看“VB的组件面板”和“窗体设计区域”，VB提供了方便的窗体设计区域，它位于整个编程窗口的中间。我们可以在这个区域中搭建出美观实用的程序界面，试着从“VB的组件面板”中找到“按钮CommandButton”,点击选中后，再到“窗体设计区域”的窗体上点一下，这时，窗体上会出现一个按钮，这样我们就把按钮添加到我们程序的界面中了。“VB的组件面板”在最左边的那一条包含许多看起来眼熟的小东西的区域里，它是VB提供给我们的标准的编程组件(控件)，它把程序设计中常常用到的诸如按钮、图片框、列表框等等东西作好了放在那里，我们如果要使用只须添加到窗体中即可。

  

• 05

  屏幕的右边有三个从上到下排列的小窗口，它们分别是：    【VB工程管理器】 用来管理开发一个VB程序所需要的各种类型的窗体和模块，如左图是一个工程所包含的东西，窗体是一个程序表现在外面的界面、模块是程序内部使用的代码。 当我们点击“添加窗体”便捷工具按钮后，左图的“VB工程管理器”中就会显示出新添加的窗体，这也就是“VB工程管理器”的功能，它使我们从总体上把握程序开发的各个部分。

  

• 06

  【组件属性窗口】 用来显示组件的属性，并允许我们修改，设定这些属性的值，我们在窗体设计区域的窗体上选中一个组件，以按钮为例，则在“属性窗口”中会列出它的属性，我们可以看到常用的“Name”、“Capition”、“Font”等等属性，试着把“Capition”属性改为“这是一个按钮”，然后看看“窗体设计区域”的按钮上显示的文字是不是改变了。

  

• 07

  【窗体布局窗口】 调整程序运行时，程序窗体在屏幕中的初始位置，把鼠标移到左图屏幕中的窗体上，这时鼠标会变成移动形状，拖动窗体，就设置好了运行时此窗体的位置。    

  

• 08

  还差一个区域没讲，那就是“代码编辑区域”，当我们在“窗体设计区域”双击鼠标，就能弹出这个区域，可以看到一行行的VB程序显示在其中，我们可以修改，写入程序代码，来让程序实现一定的功能，它是整个程序设计的关键，如果你对VB语言的语法还不是十分了解，可以继续下一节专门对“VB语法”的讲解，别着急，慢慢来，很快就能入门的。

VB的简单语法

• 01

  VB语言的语法和QBASIC基本一致，可以说如果你能读懂QBASIC程序，那你读VB的程序是没有问题的，这里我们只是简单的讲一讲VB的语法，因为在今后的各个实例中我们会不断接触到新的语法知识，这也是一个积累的过程。

• 02

  我们提到过如果在“窗体设计区域”的某个组件(控件)上双击鼠标，会出现“代码编辑窗口”，也就是如下图的窗口，我们可以在其中输入或是修改程序的代码。在我们双击控件到写入代码的这个过程中，我们涉及到了一个很重要的概念，这是VB与QBASIC的主要差别之一，大家知道在QBASIC包括Tubro C，TubroPascal等语言中程序从一开始就需要我们一点点的写代码来实现所有的功能，比如程序运行的界面，输入输出，键盘控制等，它们在程序中体现为一个个的过程或者是函数及子程序，它们都是完全面向过程的编程语言；但是现在的VB、VC、DELPHI等编程语言，都提供了可视化的编程环境，备有一整套常见的组件(控件)供我们使用，这些控件可以看作是对象(VB严格的说不是完全面向对象的编程语言)，我们写程序时会直接与这些对象打交道，而不象原来。所以在VB中大部分的代码是与这些相关的，例如下图所示的一段代码，它是我们在一个按钮 (Command)上双击鼠标而由VB自动产 生的一个子过程，Private Sub Command1_Click()是子过程的开始，End Sub表示子过程的结束。然后我们可以在子过程中添加程序代码，也就是由我们自己来写当按钮被点击时，程序所做出的响应。

  

• 03

  下面我们便来分析一下这段代码。B中声明一个变量使用“Dim 变量名 As 变量类型”的方法，一般在程序中使用的到的变量都应该有变量声明，如上例中的a、b、i分别被定义为整型和字符串型变量，VB中的变量类型有以下几种。

  

• 04

  控制结构和循环结构是程序设计中常见的两种结构。计算机在运行程序的时候，执行语句顺序是从上向下的。有些简单程序可以只用单向流程来编写，但稍微复杂的程序就要靠控制语句来控制程序执行的流程。控制结构主要有两种，分支结构和循环结构。

• 05

  【分支结构】 分支结构事实上是一种选择，在不同的条件下选择执行不同的程序段。实现分支结构的语句有很多，最常用的是if„„then„„else„„。 例如：         „„      if 条件 then         {程序段一}         else         {程序段二}         end if        „„      如果条件满足了，电脑将执行程序段一中的语句，然后跳过程序段二，执行下面的语句。如果条件不满足，电脑将跳过程序段一种的语句，执行程序段二，然后继续执行下面的语句。

• 06

  【循环结构】 循环结构就是让电脑反复的执行某一程序段落干次。 用Do„„Loop可以循环重复执行一语句块，且重复次数不定。 在已知循环次数的条件下，用For„„next可以反复执行统一语句块。

简单的文本框TEXTBOX例子

• 01

  文本框控件（TextBox)是VB中最常用的控件。它是显示和输入文本的容器，相当于一个文字编辑器，提供了所有基本的文字处理功能，例如文本的编辑等。在下面这个小程序中，我们能看到文本框控件（TextBox)的最基本的属性。为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码。

  

• 02

  【主窗体窗体（FormBack）】 我们首先新建一个标准的EXE工程。添加两个窗体，并把TextBox、Button、Label控件放置在窗体上。各文本框的名称如下表。

  

• 03

  在属性窗口中将TextPassWord的PassWordChar属性设为*；TextResume的Multiline属性设为Ture,ScrollBars属性设为2 -Vertical；TextAll文本框的Multiline属性设为为Ture, ScrollBars属性设为2 -Vertical，Appearance属性设为为0 - Flat。

• 04

  下一步我们为FormTxtBox窗体中“确定”(CmdOK)和“清除”(CmdClear)按钮的Click事件中添加相应的程序。 其中：     TextID.Text = "" 是把会员编号文本框中的内容清空，其它语句与此类似。   FormBack.TextAll.Text = LblID.Caption & " " & TextID.Text _ & vbNewLine & 该语句设置FormBack窗体中TextAll文本框的文本。vbNewLine是换行显示标志。“ _”是续行标志，当语句一行写不下时使用此标志，但要注意：前面要加空格。 代码写好之后，我们就可以保存工程，然后按“Ctrl+F5”键，测试检验一下我们的程序了。

简单的列表框ListBox例子

• 01

  列表框（ListBox）控件表示一个选项清单，用户可能用鼠标选择其中一个或者几个选项。列表框的特点是：列表框中的项目是通过程序插入到其中的，用户无法向清单中输入数据，当选择其中的项目，并在用户单击一个按钮或者执行某个操作时，由应用程序完成对指定项目的具体操作。下面这个例子充分说明了列表框的这个特点，并介绍了列表框（ListBox）的常用属性。

• 02

  为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码。

  

• 03

  这个例子包含一个窗体，窗体中有两个列表框（List1、List2）和八个按钮，界面如下。

  

• 04

  【窗体（FormListBox）】 我们首先新建一个标准的EXE工程，添加一个窗体，并把列表框和按钮控件添加到窗体上。各按钮控件的名称如下表。

  

• 05

  List1列表框 Sorted属性设为“False” ' List2列表框 Sorted属性设为“True” ' MultiSelect属性设置为2 ' 即List2控件中的项目总是排序的。 在属性窗口中，将List1列表框 Sorted属性设为“False”；List2列表框 Sorted属性设为“True”，MultiSelect属性设 置为2，即List2控件中的项目总是排序的。

• 06

  下一步我们为各控件添加相应的程序。 其中： List1.AddItem "China" 是将“China”添加到列表框中。     List1.ListIndex 返回的是列表框List1中当前选择项目的索引号码。     List1.ListCount 返回的是列表框List1中项目总数。List1.ListCount - 1 返回列表框List1中最后一个项目的索引号。    List1.Selected() 返回的是一个项目的选择状态，返回的是布尔值。     代码写好之后，我们就可以保存工程，然后按“Ctrl+F5”键，测试检验一下我们的程序了。在这个小程序中，包含了列表框中的一般常用属性和方法。

在状态栏中显示帮助信息

• 01

  状态栏是VB中的一个很有用的控件，但是默认状态下它不在控件面板中，在我们使用它之前必须先添加，方法是按下Ctrl+T快捷键，在弹出的“Components”对话框中选中MS Windows Common Controls。这时在控件面板中会出现状态栏的小图标，双击此图标就能把它添加到窗体中。

  

• 02

  接下来我们根据自己的需要来编辑状态栏，选中窗体上的状态栏，在鼠标右键菜单中选择“属性Properties”，这时会弹出如上图所示的对话框，我们选择“Panels窗格”。其中“Insert Panel”按钮用来添加状态栏中的窗格数目，当我们添加一个窗格后“Index”的值也会自动加一，在程序中我们通过窗格的索引值来引用窗格。下面的一些项目都是窗格的属性，我们可以在此设置也可在程序中控制它。比较常用的属性有：    “Text”--在各个窗格中显示的文字；    “Alignment”--窗格中文本的对齐方式；     “Style”窗格的样式(选择0-sbrText为显示文本，选择6-sbrDate为显示日期等等)；    “Bevel”--窗格的凹凸状态。     另外我们还可以在窗格中加入图片，方法是点击“Browse”然后选中图片文件。

• 03

  在本程序中我们在第一个窗格中动态显示帮助信息，在第二、三个窗格中分别显示日期和时间。那么怎样在程序中控制状态栏中显示的文本呢？ 例如我们希望鼠标移动到不同的按钮上时状态栏的第一个窗格中显示不同的帮助，则我们在按钮的OnMouseOver事件中加入如下语句即可： Private Sub CmdNew_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)      staSample.Panels(1).Text = ""       staSample.Panels(1).Text = "清空文本框"    End Sub      同样的我们能为其它按钮等控件添加帮助信息。

• 04

  为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码，这样状态栏中就能动态显示帮助信息了。

  

使用右键菜单的例子

• 01

  右键菜单能让软件的使用者快捷的完成操作，那么如何把右键菜单用在自己写的程序中呢？在这个小程序中我们能看到编辑并使用右键菜单的方法。为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码。

  

• 02

  我们先打开菜单编辑器(在工具菜单中)，然后添加一个一级菜单Popmenu，将它的Visible属性设为“False”，这代表菜单在程序运行时是看不到的，由于一级菜单是二级菜单的上级菜单，所以二级菜单也是看不到的。然后我们来添加几个二级菜单，注意每个菜单都有Caption属性和Name属性，这两个属性是必须写的，Caption属性是显示在菜单项上的内容，而Name属性则是我们要在程序中引用菜单项的代号，类似与其它控件的Name属性。而菜单中分隔线是通过把Caption属性设为“-”来实现的。

  

• 03

  我们先打开菜单编辑器(在工具菜单中)，然后添加一个一级菜单Popmenu，将它的Visible属性设为“False”，这代表菜单在程序运行时是看不到的，由于一级菜单是二级菜单的上级菜单，所以二级菜单也是看不到的。然后我们来添加几个二级菜单，注意每个菜单都有Caption属性和Name属性，这两个属性是必须写的，Caption属性是显示在菜单项上的内容，而Name属性则是我们要在程序中引用菜单项的代号，类似与其它控件的Name属性。而菜单中分隔线是通过把Caption属性设为“-”来实现的。 菜单编辑好后，就能在程序中引用并控制它，在本例中我们希望在文本框上点击鼠标右键时弹出这个右键菜单，则需要在文本框的MouseDown事件中加入控制语句：    Private Sub RichTextBox1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)    If Button = 2 Then          '如果是鼠标右键按下时    Form1.PopupMenu mnufile, 0, X, Y  '弹出右键菜单   End If   End Sub

• 04

  其中MouseDown事件各个参数意义如下：    button返回一个整数，用来标识该事件的产生是按下哪个按键，其中左键为0，右键为2，中间键为4； shift 返回一个整数，标示是否同时有Shift,Ctrl,Alt键按下； x, y 返回一个指定鼠标指针当前位置的数。

• 05

  Popupmenu是一个方法： PopupMenu方法用来弹出一个菜单，语法是：object.PopupMenu menuname, flags, X, Y；mnufile是我们在菜单编辑器中设计好的菜单的名称； X,Y是弹出菜单的位置，可以为数字，如果直接写为X,Y则是在当前鼠标位置弹出菜单。 这样就能调出右键菜单，然后我们根据自己的需要，为每个菜单项的Click事件编写代码，完成一些特定的操作，右键菜单就可以使用了。