在创建对象的新实例之前将Object设置为Nothing?

时间:2015-04-23 18:03:58

标签: vba access-vba adodb

在VBA中,在声明一个新实例之前将对象设置为Nothing是一种好习惯吗?

例如:

Private Sub SetupConn()

Const Provider As String = "sqloledb"
Const LanDataSource As String = "127.0.0.1"
Const WanDataSource As String = "mail.12345678.biz:12345"

Dim UserName As String
Dim Password As String

UserName = "myusername"
Password = "mypassword"

这里是我想知道我是否应该关闭 连接或在重新打开新设置之前将其设置为空。

Set mDBconn = New ADODB.Connection

Select Case mConnMethod
Case WAN
    mConnStr = "Provider='" & Provider & ";Data Source=" & WanDataSource _
             & ";User ID=" & UserName & ";Password=" & Password
Case Lan
    mConnStr = "Provider='" & Provider & ";Data Source=" & LanDataSource _
             & ";User ID=" & UserName & ";Password=" & Password
End Select
End Sub

场景是用户在路上,使用移动数据连接,他到达办公室并希望直接进入高速wifi连接,而无需关闭并重新打开程序。在这种情况下,我要做的是将连接方法设置为LAN并使用重置参数调用此子。

1 个答案:

答案 0 :(得分:1)

我想根据这个Whats the difference between rs.close vs rs = nothing in a RecordSet, 关闭和设置任何东西都是好的。这回答了我的问题。