VB+SQL,我要查询出数据库某表中的所有数据,显示在一个表格中,然后通过按钮,对数据进行操纵比如说:    表格中有1行数据,我现在需要通过点击按钮对这一行数据进行删除,同时把这个被删除的数据保存到数据库中另外一张表里,  如果同时有20行数据,我希望可以通过鼠标点选其中的某一个,进行删除,请问这都需要啥控件啊??最好能提供点代码,嘿嘿,谢谢老大们.我太笨了.
用adodc和datagrid我可以查询出所有数据,但不能对数据操纵........

解决方案 »

  1.   

    用adodc和datagrid我可以查询出所有数据,但不能对数据操纵........可以对数据进行操纵如下例删除记录Private Sub lbldelete_Click()
        Dim tempbusinessmanid As String
        '保存待删除记录的ID
        tempbusinessmanid = Adodc1.Recordset.Fields(0)
        '弹出删除确认对话框
        If MsgBox("是否删除“" + Adodc1.Recordset.Fields(1) + "”?", vbYesNo, "确认") = vbYes Then
        mybusinessman.delete (tempbusinessmanid)
        MsgBox "删除成功"
        End If
        refresh_businessman
    End SubPublic Sub delete(ByVal tempbusinessmanid As String)
        '连接数据库
        mydb.opendb
        
        '设置delete语句
        sqlstmt = "delete from businessman where businessmanid='" + Trim(tempbusinessmanid) + "'"    '执行SQL语句
        Dim Isexe As Boolean
        Dim rsbusinessman As ADODB.Recordset
        Isexe = mydb.exesql(sqlstmt, rsbusinessman, True)
        
        '断开与数据库的连接
        mydb.closedbEnd Sub