- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
.
.
中南大学
本科生课程实践报告
(数据库应用基础)
题 目
诗词信息管理系统
学生姓名
王祖佳
指导教师
刘泽星
学 院
生物科学与技术学院(生命科学院)
专业班级
生物科学类1202
学生学号
3702120225
计算机基础教学实验中心
2013年 07 月 03 日
一、系统设计
1、整体设计:
系统总体由SQL数据库和Visual Basic功能窗口组成,实现二者的链接,完成查询、修改、删除等指令。
2、模块设计:
诗词信息管理系统主要实现诗词管理、诗人信息管理、背景设置和系统管理等功能,系统功能模块如下图:
查询诗人信息删除诗人信息修改诗人信息查询诗词删改诗词添加诗词背景设置诗人管理诗词管理系统管理诗词信息管理系统
查询诗人信息
删除诗人信息
修改诗人信息
查询诗词
删改诗词
添加诗词
背景设置
诗人管理
诗词管理
系统管理
诗词信息管理系统
系统各模块的功能如下:
系统管理模块:
用于登录系统和退出系统;
诗词管理模块:
添加诗词模块——用户根据自己的需要可以自行添加诗词信息。
删改诗词模块——用户根据自己的需要,可以自行查询指定诗词,并进行删除或修改。
查询诗词模块——可以按照诗人姓名、年代、体裁分别进行查询。
诗人管理模块:
修改诗人信息模块——可修改诗人姓名、年代、简介等信息。
删除诗人信息模块——通过输入诗人姓名进行查询,并可进行删除;
查询诗人信息模块——可查询诗人的全部信息;
背景设置模块:
包括打开背景、关闭背景、打开背景音乐、关闭背景音乐等模块
3、数据库设计:
SQL,将本系统所需数据,存入PoemManager数据库中。该数据库包含两份基本表,诗词基本表和诗人基本表。
两张表如下图:
Poem诗词信息表
列名
数据类型
是否为空
其他说明
诗词编号
Int
NOT NULL
设为主键
题目
Char(40)
NOT NULL
作者编号
Int
NOT NULL
年代
Char(4)
NOT NULL
体裁
Char(10)
NOT NULL
类别
Char(10)
NOT NULL
内容
Text
NOT NULL
Poet诗人信息表
列名
数据类型
是否为空
其他说明
作者编号
Int
NOT NULL
设为主键
作者姓名
Char(8)
NOT NULL
年代
Char(4)
NOT NULL
简介
Text
NOT NULL
二、主要界面
Visual Basic主要包含以下这个界面窗体:
frmmain(作为系统主窗体,caption属性为“诗词信息管理系统”);
frmIn(系统登录窗体,caption属性为“登陆管理系统”);
frmaddpoem(添加诗词窗体,caption属性为“添加诗词”);
frmaddpoet(添加诗人信息窗体,caption属性为“添加诗人”);
frmmodifypoem(删改诗词信息窗体,caption属性为“修改诗词信息”);
frmmodifypoet(删改诗人信息窗体,caption属性为“修改诗人信息”);
frmquerypoem(查询诗词信息窗体,caption属性为“查询诗词信息”);
frmquerypoet(查询诗人信息窗体,caption属性为“查询诗人信息”);
三、源程序
1、frmIn系统登录窗体程序代码:
Private Sub cmdOK_Click()
If username = IRIS And userpassword = 123456 Then(设置唯一用户名和唯一密码)
MsgBox 亲、欢迎您的到来~
Unload Me
frmmain.Enabled = True
frmmain.Show
Else
MsgBox 密码不正确哟~
Unload frmmain
Unload Me
End If
End Sub
2、frmmain系统主窗体程序代码
Private Sub Form_Load() (设置窗体的基本界面,背景和音乐)
Me.Top = (Screen.Height - Me.Height) \ 2
Me.Left = (Screen.Width - Me.Width) \ 2
Me.light(0).Enabled = True
Me.light(1).Enabled = False
Me.music(0).Enabled = True
Me.music(1).Enabled = False
c
文档评论(0)