SQL 数据库课程设计学生成绩系统(7)

SQL 数据库课程设计学生成绩系统

Command2.Enabled = False Command4.Enabled = False Adodc1.Recordset.AddNew Text1.SetFocus Else

If Text1.Text = "" Then

MsgBox ("用户名不能为空") Exit Sub End If

Command3.Caption = "添加" Adodc1.Recordset.Update Command1.Enabled = True Command2.Enabled = True Command4.Enabled = True End If End Sub

删除（Command4）处理（Click）

Private Sub Command4_Click() Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End If End Sub

退出（Command5）处理（Click）

Private Sub Command5_Click() Unload Me End Sub

4.5. 学生基本信息管理模块 4.5.1

说明

学生基本信息的添加、删除、查询。

该模块有两个窗体：学生基本信息维护窗体和学生基本信息查询窗体