vb变量、常数和数据类型及过程概述(二.docVIP

vb变量、常数和数据类型及过程概述（二） 发布时间：2007-05-05 来源：未知 作者：未知 模块内部使用的变量 按照缺省规定，模块级变量对该模块的所有过程都可用，但对其它模块的代码不可用。可在模块顶部的声明段用 Private 关键字声明模块级变量，从而建立模块级变量。例如： Private intTemp As Integer 在模块级，Private 和 Dim 之间没有什么区别，但 Private 更好些，因为很容易把它和 Public 区别开来，使代码更容易理解。 所有模块使用的变量 为了使模块级的变量在其它模块中也有效，用 Public 关键字声明变量。公用变量中的值可用于应用程序的所有过程。和所有模块级变量一样，也在模块顶部的声明段来声明公用变量。例如： Public intTemp As Integer 注意 不能在过程中声明公用变量，只能在模块的声明段中声明公用变量。 详细信息 有关变量的其它信息，请参阅 “高级变量主题”。 高级变量主题 使用多个同名的变量 如果不同模块中的公用变量使用同一名字，则通过同时引用模块名和变量名就可以在代码中区分它们。例如，如果有一个在 Form1 和 Module1 中都声明了的公用 Integer 变量 intX，则把它们作为 Module1.intX 和Form1.intX 来引用便得到正确值。 为了看清这是如何工作的，在一个新工程中插入两个标准模块，并在窗体上画上三个命令按钮。 在第一个标准模块 Module1 之中声明一个变量 intX。Test 过程设置它的值： Public intX As Integer　声明 Module1 的 intX。 Sub Test () 设置 Module1 的 intX 变量的值。 intX = 1 End Sub 在第二个标准模块 Module2 中声明了第二个变量 intX，它有相同的名字。又是名为 Test 的过程设置它的值： 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 () Te