vb6类模块中变量赋值

发布网友发布时间：2022-06-03 20:04

共3个回答

热心网友时间：2023-10-24 18:21

你要在标准模块（不是类模块）声明全局变量，然后在你的启动模块（比如Form1的Form_Load事件，或标准模块的Sub Main()函数）中对变量进行赋值即可。这个变量是全局通用的，包括类模块。

窗体的事件是不能写在模块中的，但可以调用模块中的过程或函数，如：

窗体中的代码：
Private Sub Command1_Click()
MsgBox "变量x的初始值是" & x
abc
MsgBox "变量x的当前值是" & x
End Sub

模块中的代码：

Public x As Integer

Public Sub abc()
x = 10
End Sub

热心网友时间：2023-10-24 18:22

假设在类A中有一个公有过程B,公有属性E
在窗体C中声明一个窗体级变量
dim objA as new A
在窗体的加载事件中加入代码
objA.E="新值"
在窗体上的按钮D的事件中加入代码
objA.B

msgbox objA.E
这样,满足你的所有要求

热心网友时间：2023-10-24 18:22

想要全局使用一个变量不要用类模块，这是错误的，要在模块中定义。

建立一个新的mole，定义

public IsGameBox as Boolean

就是全程序静态变量了。