1.VisualBasic数据类型 2.变量的声明
3.Option Explicit 关键字 4.变量的作用域
5.Static 关键字 6.常量
7.数据类型转换
VisualBasic数据类型 数据类型 举例

字节型 56
布尔型 True False
整型 5367
长整型 4364574
单精度型 4362.34
双精度型 4652.65735745
货币型 $234.34
日期型 4/7/2000
对象型 Label1
字符串型 "My homepage"
变体型 任意值
变量的声明

Dim var As Type
Public var As Type
Private var As Type
其中：
Public 定义公有变量
Dim、Private 定义私有变量
Option Explicit 关键字

在VisualBasic中用户可以不声明而直接使用变量，但容易产生错误。可以使用Option Explicit关键字强制声明变量，必需先声明再引用。
Option Explicit关键字放在窗体或模块的通用声明(GenneralDeclarations)处。
也可以通过设置将Option Explicit自动加到每个模块中。
变量的作用域

局部(Local)：在过程级定义的变量，仅在声明它的过程中可见。
模块/窗体(Modudule/Form)：在模块或窗体级声明的变量，在声明它的模块或窗体中的所有过程中可见。
公有(Public)：在模块或窗体级声明的变量，在所有项目的任何过程中都可见。
Static 关键字

普通的局部变量在过程结束后被释放，在下次执行过程时从新初始化为0。
用Static声明的局部变量在过程结束后不被释放，仍保留变量的值。
例如：
Sub P()
Static I As Integer
I=I+1
MsgBox "A=" & I
End Sub
常量

常量是程序中不发生变化的值。它和变量一样有三种作用域：
它的定义语法如下：
[Public]Const con[As Type]=expression
[Private]Const con[As Type]=expression
[]内为可以缺省项
数据类型转换

VisualBasic自动完成某些数据转换，为提高运行速度，我们通常使用CType() 函数显示地转换。
VisualBasic转换函数包括：
CBool 转换为Boolean类型
CByte 转换为Byte类型
CCur 转换为Currency类型
CDate 转换为Date类型
CDbl 转换为Double类型
CInt 转换为Integer类型
CLng 转换为Long类型
CSng 转换为Single类型
CStr 转换为String类型
CVar 转换为Variant类型
CVErr 转换为Error类型

]]> 6567731@http://cncok.bokee.com/ Visual Basic 6.0 2007-12-14T23:03:12Z http://cncok.bokee.com/6567726.html 〖VisualBasic基础知识〗

是微软公司推出的Basic语言编程工具，它比标准Basic语言增加了许多功能。它支持面对对象的编程，由于它是为Window这样的图形用户界面的操作系统开发的，所以它使用事件驱动的方式控制程序流程。
VisualBasic新概念：
1.VisualBasic术语 2.VB项目文件

VisualBasic术语

设计时：设计时是指在VB环境中建立应用程序时的时间。
运行时：运行时是指在应用程序运行期间，用户与应用程序进行交互的时间。
通常我们在设计时初始化窗体和控件的属性，在运行时响应窗体和控件的事件修改它们的属性或调用它们的方法。
对象：将数据和处理该数据的过程（函数和子程序）打包在一起而生成的新的数据类型称之为对象。
在VisualBasic中，所有窗体和控件都是对象。要访问对象的属性和方法，必须在对象和属性方法之间加入一个句点。
如：
Label1.Caption="VB编程乐园"
Text1.SetFocus
属性：对象中的数据。 方法：对象中的过程。
窗体：窗体是可用作定制应用程序界面的窗口，或用作从用户处收集信息的对话框。
你可向窗体增加控件、图形或图片来创建你的应用程序界面。
窗体可单独存在，也可是多文档界(MDI)中的一个文档，即一个子窗体。
控件：控件是用户操作对象的图形表示，以便向应用程序提供信息。例如：按钮、列表框或编辑框等。有的控件没有图形表示。
如：计时器、WinSocket等。
事件（Event）：事件是指窗体或控件识别的活动。事件发生在用户与应用程序交互时。
如：单击控件、键盘输入、移动鼠标等。
也有部分事件由系统产生，不需要用户输入。如：计时器事件。
事件驱动程序设计：当程序是事件驱动的时，应编写执行来响应由用户或系统激活的事件的代码。与过程程序设计不同，后者的程序起始于代码的第一行，并遵循定义好的路径调用所需的过程。
事件驱动设计是图形用户界面的本质，即：由用户控制而代码做出响应。
VB项目文件

包括在VisualBasic应用程序开发中包括的所有的窗体、代码模块和定制控件的一个文件列表，以及在开发中选择的环境选项。

项目由下列文件组成：

文件类型 扩展名

项目文件 *.vbp
窗体文件 *.frm
模块文件 *.bas
定制控件 *.ocx
类模块 *.cls
资源文件 *.res

　　一、事件

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

窗体和图象框类事件
 
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个字节，定义合适的数据类型，不管你相信不相信，它可以节省内存！

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）。
数据类型的定义方法：
 
定义变量最简单的方法是用“Dim”关键字，它的语法：
Dim 【变量名】As 【数据类型】

如：Dim Index As Integer

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

Dim Index As Integer , Dim Number As Long

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

Dim Index , Number As Integer

更可以在定义时进行初赋值：

Dim Index=3

有时为了简便，也以符号进行简单的定义，作用是和上面一样的。整型可以用“%”代替，长整型可以用“&”代替，实型可以用“!”，双精度实型可以用“#”定义，如刚才的第一个例子可以写成：

Dim Index% 等价于 Dim Index As Integer

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

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

 
数组的定义类似于变量定义，所不同的是数组需要指定数组中的元素个数，例如：
Dim IntegerArray(99) As Integer

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

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

Dim IntegerArray(2 to 10) As Integer

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

还可以定义多维数组：

Dim ThreeD(4,2 to 5,3 to 6) As Integer

上例定义了一个三维数组(4×4×4)。

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

Type 【数据类型标识符】

<域名> As <数据类型>
<域名> As <数据类型>
<域名> As <数据类型>
…………………………

End Type

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

Type Address

Street As String
ZipCode As String
Phone As String

End Type

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

Dim MyHome As Address

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

变量名.域名＝“……”

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

With MyHome

.Street=”阜成路”
.ZipCode=”100037”
.Phone=”12345678”

End With
 

　　一、事件

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

窗体和图象框类事件
 
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个字节，定义合适的数据类型，不管你相信不相信，它可以节省内存！

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）。
数据类型的定义方法：
 
定义变量最简单的方法是用“Dim”关键字，它的语法：
Dim 【变量名】As 【数据类型】

如：Dim Index As Integer

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

Dim Index As Integer , Dim Number As Long

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

Dim Index , Number As Integer

更可以在定义时进行初赋值：

Dim Index=3

有时为了简便，也以符号进行简单的定义，作用是和上面一样的。整型可以用“%”代替，长整型可以用“&”代替，实型可以用“!”，双精度实型可以用“#”定义，如刚才的第一个例子可以写成：

Dim Index% 等价于 Dim Index As Integer

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

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

 
数组的定义类似于变量定义，所不同的是数组需要指定数组中的元素个数，例如：
Dim IntegerArray(99) As Integer

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

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

Dim IntegerArray(2 to 10) As Integer

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

还可以定义多维数组：

Dim ThreeD(4,2 to 5,3 to 6) As Integer

上例定义了一个三维数组(4×4×4)。

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

Type 【数据类型标识符】

<域名> As <数据类型>
<域名> As <数据类型>
<域名> As <数据类型>
…………………………

End Type

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

Type Address

Street As String
ZipCode As String
Phone As String

End Type

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

Dim MyHome As Address

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

变量名.名＝“……”

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

With MyHome

.Street=”阜成路”
.ZipCode=”100037”
.Phone=”12345678”

End With