关于全局变量赋值问题

pingju　发表于：2008-04-11 08:46:24 　

在模块中设置变量后想赋一个值，供整个模块调用，现在只能用1方法，想实现2方法，1可以实现，2则不能，不只问题出在哪里，请指教。

1、Public quju As String

Sub a()

quju = Forms![窗体1]!text

....

end sub

Sub a()

quju = Forms![窗体1]!text

....

end sub

Sub a()

quju = Forms![窗体1]!text

....

end sub

2、Public quju As String

quju = Forms![窗体1]!text

Sub a()

....

end sub

Sub a()

....

end sub

Sub a()

....

end sub

钱玉炜发表于：2008-04-11 09:29:46

Public quju As String

quju = Forms![窗体1]!text

你这个都是写在模块里的？？？？？？？？？？？？

pc高手发表于：2008-04-11 09:42:30

你的 2 是有问题。

public 定义变量名称后，那句赋值语句（quju = Forms![窗体1]!text），并没有执行。所以
“quju” 没有被赋值。做如下修改：

Public quju As String

Sub bas全局变量()
quju = Forms![窗体1]!Text
End Sub

Sub a()
Call bas全局变量 ''' 只要在某一个窗体（或在登陆主窗体，视你情况而定）， call 一次即可。在整个系统任何窗体或时间内都能使用 “变量 quju”了。
End Sub

== 因为没有看到你的全部程序和不知你到底要表达什么业务需求只能写上述简单建议。

我觉得你提出的问题，在技术方面是很简单的，但是你的业务需求存在问题。这么个使用方法

不是很妥善的。只是个人建议！供参考！

总记录：2篇页次：1/1 9 1 :

Access交流中心