⑴ vb中如何关闭数据库求代码语句
两个步骤
1、使用数据库对象的close方法
2、将数据对象消除：set object=nothing
⑵ 如何用VB实现关闭所有数据库对象
如果你在程序中使用了任何数据库对象（DAO,
RDO,
或者
ADO),
在退出程序之前，你必须确认已经关闭掉了所有已经打开的记录、数据库和数据工作台（recordsets,
databases,
and
workspaces）。虽然退出程序时这些对象的指针都被自动施放了，但是如果你自己又不能确认是否真正地释放了打开的数据库对象，那么就有可能数据库连接没有马上被释放掉，从而被这些对象所占用的内存就再也不能被操作系统再次分配。
----
下面有一段放在Form_Unload
事件（或者其他退出模块中）中的一小段代码例子，它演示了关闭所有打开的DAO
工作台、数据库和记录并释放了被这些对象占用的内存。当你退出FORM时，不论在有一个、100个甚至没有数据库连接时都可以使用下面代码。
Private
Sub
Form_Unload(Cancel
As
Integer)
'
关闭数据库对象并且释放内存
⑶ VB打开和关闭数据库
'打开数据库Private Sub Command1_Click()
Set db = OpenDatabase(App.Path + "/data.mdb")
Set rs = db.OpenRecorddset("select * from Users")
If Not (db Is Nothing) Then
MsgBox "打开数据库！"
Command2.Enabled = True
End If
End Sub '关闭数据库Private Sub Command2_Click()
rs.Close
Set rs = Nothing
db.Close
Set db = Nothing
MsgBox "关闭数据库！"
Command2.Enabled = False
End Sub
⑷ VB怎么用SQL语句来实现关闭数据库
呵呵，你定义了Dim DBConn As New ADODB.Connection连接，那么有两种方法：
1、DBConn.close '直接关闭连接
2、set DBConn=nothing ‘设置为空连接，那么原来的当然就关了