说明: 生信息删除代码: Private Sub cmdDel_Click() Set rs = New ADODB.Recordset sql = "delete from Student where Sno='" & Trim(Text1.Text) & " '"If MsgBox("确定要删除学号为" & Text1.Text & "的所有信息吗?", vbOKCancel + vbExclamation, & quot;提示!") = vbOK Then TransactSQL (sql) M
<yangkailian186> 上传 | 大小:548kb