如何在VBA中保持全局变量

Question

在VBA的标准模块中定义了一个全局的数据库连接变量，接着在Main中打开连接，打开一个模态窗口，但下次再调用Main时发现该变量已经关闭，而如果打开的是一个非模态窗口则不会，但我的需求是必须先打开一个模态窗口才能进行下一步操作，而且该连接对象必须保持Open状态。代码如下：public gDbConn as new ConnectionSub Main
   .....
   if gDbConn is nothing then Set gDbCon = New Connection
   if gDbConn.State<>adStateOpen then gDbConn.Open strConn
   UserForm1.Show vbmodal
   .....end sub

Answer 1

看起来没问题，你是不是在其他地方把它关闭了