我把datagrid 与数据库绑定,对datagrid中选中的数据进行删除和编辑的时候,采用以下的方法
Private Sub Cmd_del_Click()
    Dim adors As New ADODb.Recordset
    Dim adocon As New ADODb.Connection
    Dim strCode As String
    Dim c As String
    adocon.CursorLocation = adUseClient
    adocon.Open "provider=microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\文件编码.mdb;Persist Security Info=False"
    strCode = DataGrid1.Columns(0)
    adocon.Execute ("delete from 文件信息 where 文件编码 = '" + strCode + "'")
    Set adors = adocon.Execute("select * from 文件信息")
    Set DataGrid1.DataSource = adors
End Sub
就是先把被选中行的首列数据赋给变量strCode
再采用SQL语句再搜索定位到该项,进行删除
这方法太笨了吧
谁能告诉我怎么改

解决方案 »

  1.   

    想简单就用控件绑定,adodc+datagrid
    删除: Adodc1.Recordset.Delete
      

  2.   

    就是感觉兜了一个大圈子
    明明在datagrid中已经选择这项记录了
    把执行SQL语句去查询这条记录
      

  3.   

    设置datagrid1.AllowDelete = True
    选中一行要删除,直接按delete键就可以了
      

  4.   

    楼主的意思我明白了,你可以这样
    直接在DATAGRID的KEYUP事件中(设定DEL键删除),当然用个按扭也可以
    adors.delete
    adors.update就可以了
      

  5.   

    1在datagrid上右键属性中,设置datagrid,允许删除
    2把datagrid 与数据库绑定
    3运行程序,选中一行,然后按del键可删除一行。