学校学生成绩管理系统

时间:2012-07-06 09:27:32
【文件属性】:

文件名称:学校学生成绩管理系统

文件大小:548KB

文件格式:DOC

更新时间:2012-07-06 09:27:32

成绩管理系统

生信息删除代码: Private Sub cmdDel_Click() Set rs = New ADODB.Recordset sql = "delete from Student where Sno='" & Trim(Text1.Text) & " '"If MsgBox("确定要删除学号为" & Text1.Text & "的所有信息吗?", vbOKCancel + vbExclamation, "提示!") = vbOK Then TransactSQL (sql) MsgBox "该学生的所有信息已经删除!", vbOKOnly + vbExclamation, "警告!" End If Call init End Sub


网友评论