Visual Basic变量、常数和数据类型及过程概述

　　　　Public intX As Integer　　　　　　'声明 Module2 的 intX。
　　　　Sub Test ()
　　　　　　　　　'设置 Module2 的 intX 变量的值。
　　　　　　intX = 2
　　　　End Sub
　　　　在窗体模块中声明了第三个变量 intX。名为 Test 的过程又一次设置它的值。
　　　　Public intX As Integer　　　　　　'声明了该窗体的 intX 变量。
　　　　Sub Test ()
　　　　　　　　' 设置 form 中的 intX 变量值。
　　　　　　intX = 3
　　　　End Sub
　　　　在三个命令按钮的 Click 事件过程中，每一个都调用了相应的 Test 过程，并用 MsgBox 来显示这三个变量的值。
　　　　Private Sub Command1_Click ()
　　　　　　Module1.Test　　　　　　　　　　' 调用 Module1 中的 Test。
　　　　　　MsgBox Module1.intX　　　　　　　' 显示 Module1 的 intX。
　　　　End Sub

　　　　Private Sub Command2_Click ()
　　　　　　Module2.Test　　　　　　　　　' 调用 Module2 中的 Test。
　　　　　　MsgBox Module2.intX　　　　　　' 显示 Module2 的 intX。
　　　　End Sub

　　　　Private Sub Command3_Click ()
　　　　　　Test　　　　　　　　　　　　　' 调用 Form1 中的 Test。
　　　　　　MsgBox intX' 显示 Form1 的 intX。
　　　　End Sub
　　　　运行应用程序，单击三个命令按钮中的每一个按钮。于是将看到三个公用变量被分别引用。注意在第三个命令按钮的 Click 事件过程中，在调用Form1 的 Test 过程时不必指定 Form1.Test，在调用 Form1 的 Integer 变量的值时也不必指定 Form1.intX 。如果多个过程或变量同名，则 VisualBasic 会取变化更受限制的值，在本例中就是 Form1 变量。

　　　　公用变量与局部变量的比较
　　　　在不同的范围内也可有同名的变量。例如，可有名为 Temp 的公用变量，然后在过程中声明名为 Temp 的局部变量。在过程内通过引用名字 Temp来访问局部变量；而在过程外则通过引用名字 Temp 来访问公用变量。通过用模块名限定模块级变量就可在过程内访问这样的变量。
　　　　Public Temp As Integer
　　　　Sub Test ()
　　　　　　Dim Temp As Integer
　　　　　　Temp = 2　　　　　　　　　　　' Temp 的值为 2。
　　　　　　MsgBox Form1.Temp　　　　　　' Form1.Temp 的值为 1。
　　　　End Sub

　　　　Private Sub Form_Load ()
　　　　　　Temp = 1　　　　　　　　　　　' 将 Form1.Temp 的值设置成 1。
　　　　End Sub
　　　　Private Sub Command1_Click ()
　　　　　Test
　　　　End Sub
　　　　一般说来，当变量名称相同而范围不同时，局限性大的变量总会用“阴影”遮住局限性不太大的变量（即优先访问局限性大的变量）。所以，如果还有名为 Temp 的过程级变量，则它会用“阴影”遮住模块内部的公用变量Temp。

　　　　阴影窗体属性和控件
　　　　由于阴影效应，窗体属性、控件、常数和过程皆被视为窗体模块中的模块级变量。窗体属性或控件的名称与模块级变量、常数、自定义类型或过程的名称相同是不合法的，因为它们的范围相同。
在窗体模块内，和窗体中控件同名的局部变量将遮住同名控件。因此必须引用窗体名称或 Me 关键字来限定控件，才能设置或者得到该控件的值或它的属性值。例如：
　　　　Private Sub Form_Click ()
　　　　Dim Text 1 ， BackColor
　　　　'假定该窗体有一个控件也叫做 Text1。
　　　　　Text1 = "Variable" 　　　　　　'变量用“阴影”遮住控件。
　　　　　Me.Text1 = "Control"　　　 　　'要得到控件，必须用‘Me’限定。
　　　　　Text1.Top = 0 　　　　　　　　　'导致出错！
　　　　　Me.Text1.Top = 0 　　　　　　　'要得到控件，必须用‘Me’限定。
　　　　　BackColor = 0 　　　　　　　　'变量用“阴影”遮住属性。
　　　　　Me.BackColor = 0 　　　　　　　'要得到窗体属性，必须用‘Me’限定。
　　　End Sub

　　　　使用同名的变量和过程
　　　　专用模块级变量和公共模块级变量的名字也会和过程名冲突。模块中的变量不能和任何过程同名，也不能和模块中定义的类型同名。但可以和公用过程或其它模块中定义的类型或变量同名。在这种情况下，从别的模块访问这个变量时，就必须用模块名来限定。
　　　　虽然上面讨论阴影规则并不复杂，但是用阴影的方法可能会带来麻烦，而且会导致难以查找的错误。因此，对不同的变量使用不同的名称才是一种好的编程习惯。在窗体模块中应尽量使变量名和窗体中的控件名不一样。

　　　　静态变量
　　　　除范围之外，变量还有存活期，在这一期间变量能够保持它们的值。在应用程序的存活期内一直保持模块级变量和公用变量的值。但是，对于 Dim 声明的局部变量以及声明局部变量的过程，仅当过程在执行时这些局部变量才存在。通常，当一个过程执行完毕，它的局部变量的值就已经不存在，而且变量所占据的内存也被释放。当下一次执行该过程时，它的所有局部变量将重新初始化。

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!