從多個頁面調用單個StrConn

我有一個連接到我的vba代碼中設置的SQL Server。從多個頁面調用單個StrConn

的格式是：

strConn = "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1"

我有這樣的在4張，但會有時候，我會想改變它從SQL2或SQL3打電話，而不是改變在每個片材的代碼4次，我只想改一次。

有沒有辦法通過從其他地方調用它或通過將字符串傳入「」來設置該行來運行？

2010-06-17 Daniel

你爲什麼不添加一個模塊或類的項目與返回的連接字符串的函數

Function GetConnection() 
    GetConnection= "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1" 
End Function

或常數

Public Const strConn As String = "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1"

2010-06-17 19:21:53 Gratzy

對於功能我只需要在我想傳入的地方添加「GetConnection」？ – Daniel 2010-06-17 19:28:21

將模塊添加到項目中，並在需要使用連接時將函數調用GetConnecton。這個常數可能會更好。在模塊中聲明它，只是像變量一樣使用它，它只是只讀。 – Gratzy 2010-06-17 19:34:09

回答