在创建对象的新实例之前,将“对象”设置为“无”



在 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 并使用重置参数调用此 sub。

我想根据这个rs.close与rs =记录集中什么都没有之间的区别,关闭和不设置任何东西都很好。这回答了我的问题。

最新更新