工程文件中包含一个模块文件和一个窗体文件。 模块文件的程序代码是:
Public X As Integer
Private Y As Integer
窗体文件的程序代码是:
Dim a As Integer
Private Sub Form_Load()
Dim b As Integer
a=2: b=3: x=10: y=20
End Sub
Private Sub Command1_Click()
a=a+5: b=b+5: x: x+5: y=y+5
Print a; b; x; y
End Sub
运行程序, 单击窗体上的命令按钮, 则在窗体上显示的是
程序在模块文件中定义 x 为整型全局变量, 在整个工程中都起作用, 而 y 定义为整型私有变量, 只能在本模块文件中起作用。在窗体文件中变量 a 在本窗体文本中起作用,窗体加载事件中定义的变量 b 和没有声明的变量 y, 只在本事件过程起作用。 程序窗体加载时, 对后边有影响的变量值为 a 为 2, x 为 10, 没有指定初值的变量值默认为 0, 因此单击命令按钮后, a=a+5=7, b=b+5=5, x=x+5=15, y=y+5=5, 结果输出 7 5 15 5。