Question

VB怎么设置全局变量，并赋初始值

比如我有N多个子程序，他们都要用到X这个全局变量
我在第一行，也就是子程序外面，写了 dim X
但是我想让X初始值为10，要怎么才能做到啊

Answer 1

你可以在窗体的Load事件中给x赋初始值：
Private Sub Form_Load()
x = 10
End Sub

如果是模块中的全局变量，而且启动对象设为Sub Main，则可以在Main过程赋初始值：
Sub main()
x = 10
End Sub

也可以在使用x的时候，先检测x，如果是空值，就赋初始值：
If IsEmpty(x) Then x = 10

还有一种方法，可以把x定义为常量，这样就可以在定义时直接赋初始值：
Const x = 10

如果你的这个x是固定数值的话，建议你用最后一种方法。如果x是需要变化的，就只能用前面三种了。

Answer 2

可以在Form_load过程里赋值：

dim X

Private Sub Form_Load()
X = 10
End Sub

Answer 3

要是那样的话，还是弄个标准模块，在那里面定义这个全局变量。

Answer 4

Global s As String
只能写在 Module 中

Answer 5

Private Sub Form_Load()
x = 10
End Sub