第一范文网 - 专业文章范例文档资料分享平台

学生成绩管理系统 数据库原理课设 - 图文

来源:用户分享 时间:2025/5/15 9:11:34 本文由loading 分享 下载这篇文档手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ:xxxxxx 处理(尽可能给您提供完整文档),感谢您的支持与谅解。

沈阳理工大学课程设计专用纸

x = MsgBox(\确实要删除当前记录吗?\确认\If x = vbYes Then

Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End If Else

Adodc1.Refresh End If End Sub

Private Sub Command9_Click() Adodc1.Refresh

Command6.Enabled = True Command8.Enabled = True Command7.Enabled = False Command9.Enabled = False End Sub

Private Sub Form_Load() Command1.Enabled = False Command2.Enabled = False Command3.Enabled = True Command4.Enabled = True Command6.Enabled = True Command8.Enabled = True Command7.Enabled = False Command9.Enabled = False

Label6.Caption = \记录:\& Adodc1.Recordset.AbsolutePosition & \& Adodc1.Recordset.RecordCount Combo1.AddItem \男\Combo1.AddItem \女\End Sub

3.5各科信息浏览界面

在表中,显示学生成绩信息表格和学生课程表格;当选中某行记录并单击[修改数据]按钮时,将打开修改信息界面,显示该行记录的信息,并可以修改数据。点击[返回]键返回信息信息浏览界面。 各科信息浏览界面如下:

11

沈阳理工大学课程设计专用纸

图3.6:各科信息浏览

对应代码如下:

Private Sub Command1_Click()

If Adodc1.Recordset.EOF Or Adodc1.Recordset.BOF Then MsgBox \请选择要修改的行\ Exit Sub End If

修改信息.Show

各科信息浏览.Hide End Sub

Private Sub 返回_Click() 信息浏览.Show Unload Me End Sub

3.6修改信息浏览界面

当选中上面某个人的信息是点击[修改成绩]将会弹出此界面对应学生的信息进行修改点击[更新]按钮将对学生信息进行修改。点击[返回]按钮将弹出各科信息浏览界面。 修改信息浏览界面如下:

12

沈阳理工大学课程设计专用纸

图3.7:修改信息

代码如下:

Private Sub Command1_Click()

各科信息浏览.Adodc1.Recordset.Fields(\学号\各科信息浏览.Adodc1.Recordset.Fields(\课号\各科信息浏览.Adodc1.Recordset.Fields(\类型\各科信息浏览.Adodc1.Recordset.Fields(\成绩\各科信息浏览.Adodc1.Recordset.Fields(\姓名\各科信息浏览.Adodc1.Recordset.Update 各科信息浏览.Adodc1.Refresh End Sub

Private Sub Command2_Click() Unload 修改信息 各科信息浏览.Show End Sub

Private Sub Form_Load()

Text1.Text = 各科信息浏览.Adodc1.Recordset.Fields(\学号\Text2.Text = 各科信息浏览.Adodc1.Recordset.Fields(\课号\Text3.Text = 各科信息浏览.Adodc1.Recordset.Fields(\类型\Text4.Text = 各科信息浏览.Adodc1.Recordset.Fields(\成绩\Text5.Text = 各科信息浏览.Adodc1.Recordset.Fields(\姓名\End Sub

13

沈阳理工大学课程设计专用纸

3.7混合信息查询界面

可以选择按学号、课程号、课程类别,查询相关信息。查询结果中包含:

按学号、课程号、课程类别进行学生成绩信息统计。点击[返回]按钮则进入MDIForm1界面。

混合信息查询界面如下:

图3.8:查询学号

图3.9:查询课号

14

学生成绩管理系统 数据库原理课设 - 图文.doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印
本文链接:https://www.diyifanwen.net/c1x3du30jzj721et5ih24_4.html(转载请注明文章来源)
热门推荐
Copyright © 2012-2023 第一范文网 版权所有 免责声明 | 联系我们
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ:xxxxxx 邮箱:xxxxxx@qq.com
渝ICP备2023013149号
Top