按钮删除一条记录-数据库应用系统开发

【文件属性】：

文件名称：按钮删除一条记录-数据库应用系统开发

文件大小：1.02MB

文件格式：PPT

更新时间：2024-05-13 17:54:14

数据库

按钮（删除一条记录） Private Sub Command8_Click() Dim answer As String On Error GoTo delerror answer = MsgBox(“确定要删除吗", vbYesNo, "") If answer = vbYes Then DataGrid1.AllowDelete = True rst_student.Delete DataGrid1.Refresh MsgBox “成功删除", vbOKOnly + vbExclamation, "" DataGrid1.AllowDelete = False Else Exit Sub End If delerror: If Err.Number <> 0 Then MsgBox Err.Description End If End Sub 三、系统实施