会的传授下我哈！

Question

在SSDBGrid中选中一行，点击删除按钮删除这一行，怎么实现啊？

Answer 1

哈哈,是delete,比尔盖子也打错了

Answer 2

呵呵~~最近看书写的，给大家看看~
Dim vbMark As Variant
Dim Answer As String
    db = SSDBGrid2.SelBooks.Count
    If SSDBGrid2.Row = 0 Then
        MsgBox "请至少选择一行记录"
    End If
    For k = 0 To db - 1
   
         With SSDBGrid2
       
            vbMark = SSDBGrid2.SelBooks.Item(k)
     Answer = MsgBox("1  " & .Columns(2).Value & "删除数据！", vbYesNo, "提示：")
      If Answer = vbYes Then
           sqlstr = "delete from temp_answer where 1=1"
                If .Columns(5).CellText(vbMark) <> "" Then
                   sqlstr = sqlstr & " and answerid='" & .Columns(5).CellText(vbMark) & "' "
                   Set rs = oratest.Execute(sqlstr)
                End If
     Else
       Exit Sub
     End If     End With
      Next k