删除一条信息 为什么总说我的语法错误

Question

Public cnn As New ADODB.Connection Private Sub Command5_Click() 
  If deletesj = "" Then 
      MsgBox "请选择删除记录!" 
  Else 
      If MsgBox("时间： " & deletesj & " 确认要删除？", vbYesNo, "信息提示") = vbYes Then 
        cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb" 
        cnn.Execute "delete form [条码记录] where [id]=" & deleteid & "" 
            
      End If 
  End If 
End Sub

Answer 1

楼主好像发了两次:
你在立即窗口中打DEBUG.PRING "delete form [条码记录] where [id]=" & deleteid & "" 
再回车,就可以看到你的语句是否正确了,我怎么看你这语句的双引号都是不对称的
改成:"delete form [条码记录] where [id]='" & deleteid & "'"  试试

Answer 2

双引号没问题的 是form--->from

Answer 3

cnn.Execute " delete * from [条码记录] where [id]=" & deleteid & ""