vb60教程.docx

vb60教程.docx

《vb60教程.docx》由会员分享，可在线阅读，更多相关《vb60教程.docx（76页珍藏版）》请在冰点文库上搜索。

vb60教程

VB教程：

序言-不再游戏

我们需要什么

　　我们需要什么？

当我们在一个精彩的游戏世界中游历了一番之后，或是惊叹于某一工具软件的小巧精致之余，多少总会产生些许编程的冲动。

编程吗，在以前如果你对电脑还是一个门外汉，那实在是一件可望而不可及的事情。

如果运用基于DOS下的编程语言，譬如C、Qbasic、Pascal等等，真不知何年何月才能有所成就。

　　编程是需要天赋的，你必须在大脑中对整个程序有一个清晰的轮廓，一个高效的流程，这并不是每个人都能做到的，你必须思之慎之，这也使编程变成一件最枯燥无味的事情。

但在第四代计算机语言（可视化编程）出现后，可以确切的说它开发了人们的更多天赋，并不局限于那些头脑异常清晰的人，每一个人都可以发现自己也可以编出一些从前不敢问津的程序，想象力的充分发挥才是第四代语言的精粹。

　　VisualBasic（以下简称VB）可以说是可视化语言的先驱了，而且它也是可视化程度最高的一个，从几年前VB诞生之日起到现在，它已经经历了五个版本，而且现在微软正在紧张的进行着VB6.0的研制、测试，这么高的更新率，不外乎说明两个问题：

用户对VB的热衷，微软对VB的重视。

不可否认微软对市场的预测能力是极为高明的，而它强大的技术、财力支持也使它在许多以前未进入的领域，在不长的时间内有成为最有力的竞争对手，如IE之于浏览器领域，《帝国时代》之于游戏都是最好的例证。

对于VB现在也有一个很强的竞争对手――Delphi，有人把它称作VB杀手，这显然有偏激之处，VB的确有它的不足之处，但Delphi又何尝不是呢，而且以微软对VB的倾心，VB的功能必然会越来越强大。

　　VB的诞生

　　VB的出现可以说是MicrosoftWindows的日渐成熟的必然产物。

MicrosoftWindows为程序员和最终用户提供了一个共同的人机界面。

对用户，Windows提供了一个图形鼠标的操作环境，该环境对所有的应用程序都一样；对于程序员，Windows提供了一组预定义工具----称之为MicrosoftWindows的软件开发工具箱（SDK），该工具能使程序员建立一个与Windows界面相同的应用程序，而且，程序员不必关心最终用户的硬件配置情况。

在这一开发环境中，程序员唯一困难的是MicrosoftSDK提供了六百多个函数和与其一致的事件驱动（event-driven）编程技术。

两种新方法的交叉使众多的程序员重新陷入困境，程序员不仅要掌握程序驱动编程技术和六百多个函数的功能，而且还得用C语言描述这些问题。

因此一般情况下，程序员首先要掌握C程序设计技术，而后再开始学习SDK。

这样的条件下就要求在Microsoft多任务环境下出现一种操作方便，使用简单的新工具－－－－VisualBasic由此诞生。

　　何为可视

　　英文Visual的意思是“视觉的”，“可视的Baisc”这个名字可能抽象了点，但实际上它却是最直观的编程方法，之所以叫做“可视”，你只要看到VB的界面就会明白，实际上你无需编程，就可以完成许多步骤。

在VB中引入了控件的概念，在Windows中控件的身影无处不在，各种各样的按钮、文本框、无线钮，都是控件的种类，VB把这些控件模式化，并且每个控件都有若干属性用来控制控件的外观，工作方法。

这样你就可以象在画板上一样，随意点几下鼠标，一个按钮就完成了，这些在以前的编程语言下是要经过相当复杂的工作的。

　　我的希望：

　　我在学习VB的过程中也曾遇到了许多困难，而且用的参考书大都来自译文，毕竟美国人和中国人的表达方式有所不同。

这也造成了理解上的困难，所以我想为什么我不能写一个给中国人看到VB教程呢，于是我这么做了。

也曾经在杂志上发表过几篇用VB制作小程序的文章，但受杂志的限制（篇幅、内容等等）（我得听小编的），总没有一个机会系统的介绍一下VB，造成了小小的遗憾。

不过，我自己的主页建好后，终于这个愿望可以实现了，利用HTML可以方便的把文字与图片结合起来，不失为一个教学良所，也希望能够得到大家的支持。

希望“VB教程”能给你我一个互相学习的机会，如果你能从中获益那将是我最大的快乐，那时你一定会发现编程比游戏有趣得多。

:

）

VB教程：

第一章-HelloWorld!

文章来源：

vb大世界

　　没学过编程的人常常会问，编程难不难，这个问题很难回答。

难，的确很难，要编一个好的程序尤其是这样，并且有些程序还要用到一些其他专业的知识，比如说一个图形处理程序，就要对图像的格式有所了解，甚至一些美术知识；但编程也很容易，就拿VB来说，编一个自娱自乐的小工具还是一件相当惬意的事情呢，当然它没法完全代替人工，譬如说完成你的家庭作业、向学校发射导弹……

　　作为第四代计算机语言，VB的特点是显而易见的。

因为是“可视的”所以我们不妨先看看VB的界面（图1_1）（我用的是VB4.032位版），很容易可以看到，屏幕上有五个窗口，

（1）是菜单栏；

（2）是工具箱（ToolsBox），里面是VB所需的控件；（3）是VB程序要设计的窗体（Form）；（4）控件及窗体的属性（Properties），在VB中每一个控件都有其自己的属性，比如文本框有Text属性，而任何一个控件都有一个自己唯一的名字，这使得我们无需编程就可以完成部分编程的工作；（5）是VB的文件控制窗口，VB的每一个程序称为一个项目（Project），一个项目文件里往往包括以下两种文件，窗体（Form）文件和模块（Bas）文件，当然还有Class文件，这些文件组成一个完整的程序，而项目文件（Vbp）则用来描述程序所包含的内容。

　　实际上，我一直认为学习的最好方法就是实际操作一下，好，下面我们就来看一个最简单的程序，和所有的编程教科书一样，我们把第一个程序称为“Hello，world！

”。

　　首先，我们先来熟悉一下窗体。

如果你用过Win95附件所带的画图板的话，那么你一定会很快熟悉VB的窗体设计方法，用鼠标单击一下工具箱中的任何一个控件，然后在窗体上任意拖动鼠标，你就会得到一个所需的控件；当然还有其他的方法得到控件，你可以在工具箱上双击得到一个控件；或是按住Ctrl键，再单击所需控件，重复第一次的步骤，你会发现，不用再回去点击工具箱了，点右键可以恢复鼠标指针，这样对于重复画同一个控件尤其有用。

　　对于我们的第一个小程序，知道这些就已经足够了。

现在你可以在我们的窗体上画如下控件一个图片框（PictureBox），用来显示图画，每一个控件建立的时候，系统都会给它设一个默认的名字（Name），这个PictureBox的名字就叫做Picture1，为了方便起见，我们以后的控件都使用缺省的名称。

选定Picture1，在左边的属性窗口中找到Picture属性，单击会出现，点击为Picture1选一个图像文件，VB支持的图像文件有BitMap、WMF、ICO三种，微软为用户提供了一套图标文件，存放在VB目录的Icons目录下，选择Icons\misc\face01.ico文件，这样图标就被装入了Picture1。

再选择Pictrue1的Autosize属性，设为1-True，则会发现Picture1以变成和图像一样大了；把BorderStyle定为0-None，去掉图片边框。

用同样的方法再添加两个图片框：

Picture2（Picture：

face02.ico），Picture3（Picture：

face03.ico）。

　　图片框完成了，第二步，建立三个无线钮（OptionButton），由于它象收音机的无线电按钮而得名），把它们的标签名属性（Caption）分别定为“悲哀”，“高兴”，“没治了”，放置成图1_2的样子。

　　最后我们还需要三个文本框（TextBox），分别把它们的Text属性设为””（空字符串），程序的最后界面如图1_3，这样按下菜单窗口的运行按钮，运行一下程序，还可以吧，不过现在程序还无法工作，就算是VB也不能免俗，还必须输入代码才能使程序运作。

　　VB是一门典型的面向对象编程的语言，它的整个程序都是由事件驱动的。

那么，什么是事件呢？

其实，我们的生活中充满了各式各样的事件，比如说“闯红灯”这个事件的发生会导致被警察追杀、走路撞到电线杆时会痛。

上面的例子虽然有些滑稽，但它可以清楚的解释事件的含义，就象你马上就能体会到的在什么地方单击鼠标时会发生什么，按下键盘时会发生什么，这就是事件，而事件就是这么容易。

　　要进入VB的代码设计区，只需在需要的控件或窗体上双击鼠标即可得到这样的窗口。

如图1_4，每一个VB程序都由若干小程序组成，这使得用VB编程更加容易，这些小程序，分为“过程”（Procedure）和“函数”（Function），二者都可以传递参数，所不同的是函数有一个返回值，而过程没有，仅此而已。

　　双击窗体的任何一个部分，将出现一个空的过程：

“Form_Load（）”，这是一个非常重要的过程，它所驱动的事件就是该窗体被加载的事件，打个比方，就象计算机启动时的批处理程序（Autoexec.bat）。

这个程序里我们要对控件进行一些设置。

我们刚才也曾对控件进行设置，但那是在程序设置中进行的，有时我们也需要在程序中改变某些控件的属性，通过程序代码。

VB中规定，一个控件属性的访问方法：

名称.属性，于是我们对本程序的控件进行如下设置：

PrivateSubForm_Load（）

Picture1.Visible=False

Picture2.Visible=False

Picture3.Visible=False

Text1.Visible=False

Text2.Visible=False

Text3.Visible=False

EndSub

　　Private表示此过程是局部的，Sub表示子过程的开始，与之相对的是EndSub表示过程的结束，Visible属性表示控件的可见性，这个属性的值有两个True和False。

注意：

VB里对大小写是不加区分的，而且，已定义的名称，以后再用到时，系统会自动把它变成相应的大写或小写。

小知识：

1.VB里的对变量及常量的规矩。

　　变量一般为Abc的格式，常量为ABC，另外这些变量和常量名不得同VB内的关键字相同，也不可以使用一些特殊符号，这些我们将在以后介绍，注意在学习中养成好习惯，使程序便于自己和别人的浏览。

2.程序书写的窍门：

　　不要真的一句一句把程序打完，利用快捷键：

拷贝Ctrl+C，剪切Ctrl+T，粘贴Ctrl+P。

按下F5，运行一下程序，现在发现只剩下无线钮了。

如图1_5。

PrivateSubForm_Load（）

Picture1.Visible=False

Picture2.Visible=False

Picture3.Visible=False

Text1.Visible=False

Text2.Visible=False

Text3.Visible=False

Option4.Left=-2000

Option4.Value=True

EndSub

Left属性表示控件离窗体左边框的距离，设置为－2000，则在窗体内不会看到这个控件，并使之Value=True。

再运行程序，一切如愿，如图1_6.

注意：

为什么不用Option4.Visible=False？

因为，一旦设置无线钮为不可见，那么再使它的Value为真是没有意义的，不信自己试试。

下面我们可以继续进行了。

在刚才的代码窗口里，将Object选择为Option1，Proc选择为Click，即得到一个Option1_Click的过程。

代码如下：

PrivateSubOption1_Click（）

Picture1.Visible=True

Picture2.Visible=False

Picture3.Visible=False

Text1.Visible=True

Text2.Visible=False

Text3.Visible=False

Text1.Text="再见，残酷的世界。

"

EndSub

相同的建立Option2_Click和Option2_Click：

PrivateSubOption2_Click（）

Picture2.Visible=True

Picture1.Visible=False

Picture3.Visible=False

Text2.Visible=True

Text1.Visible=False

Text3.Visible=False

Text2.Text="今天心情不错。

"

EndSub

PrivateSubOption3_Click（）

Picture3.Visible=True

Picture2.Visible=False

Picture1.Visible=False

Text3.Visible=True

Text2.Visible=False

Text1.Visible=False

Text3.Text="Hello,World。

"

EndSub

好，我们的开山之作完成了！

按下F5，玩一下吧。

这个程序虽然简单，但也用到了许多基本知识，你开始感兴趣了吗？

^_^

VB教程：

第二章-事件、属性及数据类型

文章来源：

vb大世界

　　以后两章可能会比较枯燥，但不可否认也很重要，所以为了学好VB，我们一定要打好基础才行。

一、事件

　　通过上一章的例子，你可能对“面向对象的编程”已经有了一定了解，它是由事件驱动的，对于不同的对象，所能感应到的事件也会不同，譬如说当你把鼠标移进某一区域时就会触发MouseMove事件，这很直观，也容易理解，但也有些事件比较抽象，下面我来对一般的事件进行一下解释。

1.窗体和图象框类事件

Paint事件：

当某一对象在屏幕中被移动，改变尺寸或清除后，程序会自动调用Paint事件。

注意：

当对象的AutoDraw属性为True（－1）时，程序不会调用Paint事件。

Resize事件：

当对象的大小改变时触发Resize事件。

Load事件：

仅适用于窗体对象，当窗体被装载时运行。

Unload事件：

仅适用于窗体对象，当窗体被卸载时运行。

2.当前光标（Focus）事件

GotFocus事件：

当光标聚焦于该对象时发生事件。

LostFocus事件：

当光标离开该对象时发生事件。

注意：

Focus英文为“焦点”、“聚焦”之意，最直观的例子是，比如有两个窗体，互相有一部分遮盖，当你点下面的窗体时，它就会全部显示出来，这时它处在被激活的状态，并且标题条变成蓝色，这就是GotFocus事件，而相反，另外一个窗体被遮盖，并且标题条变灰，称为LostFocus事件。

上面所说的“光标”并非指鼠标指针。

3.鼠标操作事件

Click事件：

鼠标单击对象。

DbClick事件：

鼠标双击事件。

MouseDown、MouseUp属性：

按下/放开鼠标键事件。

MouseMove事件：

鼠标移动事件。

DragDrop事件：

拖放事件，相当于MouseDown、MouseMove和MouseUp的组合。

DragOver事件：

鼠标在拖放过程中就会产生DragOver事件。

4.键盘操作属性

KeyDown、KeyUp事件：

按键的按下/放开事件。

KeyPress事件：

按键事件。

5.改变控制项事件

Change事件：

当对象的内容发生改变时，触发Change事件。

最典型的例子是文本框（TextBox）。

DropDown事件：

下弹事件，仅用于组合框（ComboBox）对象。

PathChange事件：

路径改变事件，仅用于文件列表框（FileBox）对象。

6.其他事件

Timer事件：

仅用于计时器，每隔一段时间被触发一次。

二、属性

每个对象都有它的属性，并且“Name”属性是共有的，有了“Name”属性才可以在程序中进行调用。

对于属性，可以在窗体的布局操作中完成，也可以在程序运行中改变，这取决你的需要，但有些属性是只读的，它只能在控件布局时改变。

我将在以后的实例中具体介绍各个属性的作用。

三、数据类型

学过编程的人都知道大多数的计算机语言都规定了各自的数据类型，VB也不例外。

其实，在一个最简单的程序中数据类型是可以不作规定的，也就是说，变量可以使用各种类型，但是在一个复杂的程序里，这样做就很危险，因为很可能给同一个变量赋予了不同的类型，而导致程序出错。

所以，为了程序的严谨和便于查看，正确的定义数据类型是必要的。

定义数据的另一个原因是，不同的数据占用不同的内存数量，譬如整型（Interger）数据占2字节，而长整型数据占4个字节，定义合适的数据类型，不管你相信不相信，它可以节省内存！

1.VB常用的数据类型有：

整型（Integer，表示-32768至32767之间的整数）、长整型（Long，表示-2,147,483,648至2,147,483,647之间的整数）、实型（Single，表示-3.37E+38至3.37E+38之间的实数）、双精度实型（Double，表示-1.67E+308至1.67E+308之间的实数），字符（String，每个字符占一字节，可以储存0～65,535个字符），布尔（Boolean，只有两个值True/-1，或False/0）。

2.数据类型的定义方法：

定义变量最简单的方法是用“Dim”关键字，它的语法：

Dim【变量名】As【数据类型】

如：

DimIndexAsInteger

也可以在一行中定义多个变量，如：

DimIndexAsInteger,DimNumberAsLong

把多个变量定义成同一类型可以写成：

DimIndex,NumberAsInteger

有时为了简便，也以符号进行简单的定义，作用是和上面一样的。

整型可以用“%”代替，长整型可以用“&”代替，实型可以用“!

”，双精度实型可以用“#”定义，如刚才的第一个例子可以写成：

DimIndex%等价于DimIndexAsInteger

对于常量的定义用Const定义，如：

ConstCOLOR=255。

为了在程序中便于查阅，我们对变量和常量的写法进行规定，变量一般用小写方式，常量则全部大写。

注意：

使用常量的好处，对于程序中经常出现的数值，应设常量等于它，这样一是书写方便，其二，如果要改变该数值，只需改变定义常量的语句值，而不需改变每个语句，提高了效率。

数组的定义类似于变量定义，所不同的是数组需要指定数组中的元素个数，例如：

DimIntegerArray（99）AsInteger

这个数组中包含100个元素，脚标从0到99。

也可以指定脚标的起始值，例如：

DimIntegerArray（2to10）AsInteger

这个数组含有九个元素，脚标从2到10。

还可以定义多维数组：

DimThreeD（4,2to5,3to6）AsInteger

上例定义了一个三维数组（4×4×4）。

记录的定义

记录定义是把控制权交给用户的方法，它让用户可以定义自己的数据类型，它使用关键字“Type”，方法是：

Type【数据类型标识符】

<域名>As<数据类型>

<域名>As<数据类型>

<域名>As<数据类型>

…………………………

EndType

例如，定义一个地址数据：

TypeAddress

StreetAsString

ZipCodeAsString

PhoneAsString

EndType

这个地址数据里包括三个属性，街区、邮政编码和电话，可以把某数据定义成此类型：

DimMyHomeAsAddress

要调用或改变“MyHome”的值时，类似于对对象的属性的操作：

变量名.域名＝“……”

为了简化书写重复的部分,可以用关键字“With”：

WithMyHome

.Street=”阜成路”

.ZipCode=”100037”

.Phone=”12345678”

EndWith

VB教程：

第三章-VB语言

文章来源：

vb大世界

一、VB与Basic

VB之所以叫做“VisualBasic”就是因为它使用了Basic语言作为代码，所以它们之间有着千丝万缕的关系，如果学过Basic的话，看到VB的程序结构会感到很亲切。

但VB作为新生物，也超越了Basic的限制，有了许多自己的特点：

VB建立了一种新的变量类型――货币型变量，通过使用仅带有二位小数的货币变量，就能避免因使用实型变量而带来的数值积累误差问题。

VB在调用函数（Function）时，必须在函数名后跟一对括号。

VB对白兰地使用范围重新做了规范，在Basic里把隐含变量都当作全局变量，而在VB里对隐含变量都当作局部变量。

VB里的说明语句（Declare），仅支持动态链结库（DLL）的子程序和无变量函数。

使用数组，必须事先用Dim或Redim进行定义。

二、注释语句

在使用注释语句之前必须先了解注释的作用，注释不仅仅是对程序的解释，有时它对于程序的调试也非常有用，譬如说可以利用注释屏蔽一条语句以观察变化，发现问题和错误。

以后注释语句将是我们在编程里最经常用到的语句之一。

在VB里，注释语句有两种，一种是用“Rem”关键字，这跟DOS里的批处理文件的用法一样，还有一种是利用单引号“’”，例如：

‘DimaAsString与

RemDimaAsString的作用是一致的。

三、长语句的分行

在比较早的版本中，因为没有象C等语言用“；”隔开语句与语句，VB的语句是必须写在一行里的，不过后来版本的VB里如许用分行符“_”把一个长语句分成若干行来存放。

四、条件语句

如果你学过任何一种编程的话，都会知道在程序里控制其流程的有两种语句，条件与循环，VB自然也不例外，其实不管哪种语言，条件和循环的样子都差不多，只不过各有各的规矩罢了。

在条件语句里，我们先来学习“If……Then……”语句。

它的一般语法是：

If<条件>Then

<语句>

<语句>

………

EndIf

与C语言不同，VB的条件语句更符合英语的语法，如果Then后面所跟的语句只有一条，可以写成：

If<条件>Then<语句>

而不用EndIf。

有时我们还会用到

If<条件>Then

<语句>

Else

<语句>

EndIf

更可以在Else里在嵌套If语句，如：

If<条件>Then

<语句>

ElseIf

<语句>

Else

<语句>

EndIf

所有这些可以用一个表格表示：

条件1

TrueFalse

语

句

1条件2

TrueFalse

语

句

2条件3

TrueFalse

…

…

…………………………

条件N

TrueFalse

语句N语句N＋1

用了过多的Else后你会感到很不方便，而且程序结构也不清晰，所以大多数的语言还有Select语句帮助解决这个问题。

VB里的Select语句的格式是这样的：