工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号) Dim CN As New ADODB.Connection '定义数据库的连接 Dim Rs As New ADODB.Recordset CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False" CN.Opencn.execute "delete from table"
Dim Rs As New ADODB.Recordset CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
CN.Opencn.execute "delete from table"
我用datagrid1来显示这个数据库,删除记录之后,我用datagrid1.Refresh来刷新,怎么没有反映呢,但表中的内容确实已经没有了.
datagrid1.refresh
只适用于代码