关于datagrid的问题,在线等

Question

如何删除 datagrid中显示的数据

Answer 1

Set Rs = Nothing
    Set datagrid.DataSource = Rs
    datagrid.Refresh

Answer 2

？  Set Rs = Nothing
    Set datagrid.DataSource = Rs
    datagrid.Refresh
  这个好象是清空datagrid 里的信息

Answer 3

Private Sub ComDelete_Click()     
  If Adodc1.Recordset.RecordCount > 0 Then
    a = MsgBox("您确实要删除这条数据吗?", vbYesNo, "提示")
    If a = vbYes Then
      Adodc1.Recordset.Delete
      DataGrid1.Refresh
   End If
  Else
    a = MsgBox("没有要删除的数据!", vbInformation, "提示")
  End If
End SubAdodc1.RecordSource = "select * from fstudent 可以删除指定的记录

Answer 4

可以用控件直接删除On Error Resume Next
Dim r As Integer
r = MsgBox("确定要删除当前记录？[Y/N]", vbInformation + vbYesNo, " 提 示")
If r = vbNo Then Exit Sub
me.Adodc1.Recordset.Delete