用记录集吧 Dim Rs As ADODB.Recordset Set Rs = New ADODB.Recordset With Rs Set .ActiveConnection = Cn .CursorLocation = adUseClient .CursorType = adOpenStatic .LockType = adLockReadOnly .Open "select * from T1" If .RecordCount > 0 Then Set DataGrid1.DataSource = rs rs.Requery DataGrid1.Refresh End If .Close End With
adodc1.refresh
在datagrid里删除一记录是不是用刷新datagrid的。如果你没通过datagrid去删除记录,而是用ADOC1去删除了记录,
可以重新绑定datagrid1.datasource=ADOC1
也可以向楼上说的,刷新数据源,再刷新datagrid
DataEnvironmentManageDataEnvironmentManage.rsCommStuSelect.Requery
DataGridStu.Refresh这样做不行啊我还想问一下datagrid筛选功能吗?
比如我给个条件让其只显示所有性别为男的记录
或都性别为男并且住在中国的所有记录
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
With Rs
Set .ActiveConnection = Cn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockReadOnly .Open "select * from T1"
If .RecordCount > 0 Then
Set DataGrid1.DataSource = rs
rs.Requery
DataGrid1.Refresh
End If
.Close
End With