毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 论文 >> 正文

VB图书管理系统毕业论文 第7页

更新时间:2009-8-15:  来源:毕业论文
VB图书管理系统毕业论文 第7页
 登录成功后,管理员可以进行添加和删除用户,修改密码,修改各种资料等操作。

4.2读者管理界面编码设计
通过DataCombol控件连接到数据库的dbl基础数据表,用DATA GRID控件,将它的各列显示出数据库的各列,属性设为可写,连接到数据库。
用Text 控件来显示所输入的内容,单击“保存“按钮后就可以保存到数据库中,通过ADO控件来浏览记录。
实现读者资料登记的添加、删除、修改、保存功能。
读者管理界面如图:

此窗体的主要代码设计如下:

sql = "读者编号='" & Trim(Text1.Text & " ") & "'"
If Check2.Value = vbChecked Then
   If Trim(sql) = "" Then
      sql = "读者姓名='" & Trim(Text2.Text & " ") & "'"
      sql = sql & "and 读者姓名='" & Trim(Text2.Text & " ") & "'"
If Check3.Value = vbChecked Then
   If Trim(sql) = "" Then
      sql = "读者类别='" & Trim(Combo1.Text & " ") & "'"
      sql = sql & "and  读者类别='" & Trim(Combo1.Text & " ") & "'"
sql = "select * from 读者信息 where " & sql

4.3图书管理界面编码设计
通过ADO控件连接到数据库,用DATA GRID控件,将它的各列显示出数据库的各种类型,其类型有:计算机、电子、电工、物理、小说。用户可以通过此窗体来添加或删除类型。次窗体连接到借书窗体。读者管理界面如图:

此窗体的主要代码设计如下

sql = "书名='" & Trim(Text1.Text & " ") & "'"
If Check2.Value = vbChecked Then
   If Trim(sql) = "" Then
      sql = "类别='" & Trim(Combo1.Text & " ") & "'"
      sql = sql & "and 书名='" & Trim(Combo1.Text & " ") &
If Check3.Value = vbChecked Then
      sql = "作者='" & Trim(Text2.Text & " ") & "'"
      sql = sql & "and  作者='" & Trim(Text2.Text & " ") &
      sql = "出版社='" & Trim(Text3.Text & " ") & "'"
      sql = sql & "and  出版社='" & Trim(Text3.Text & " ")
      sql = "书籍编号='" & Trim(Text4.Text & " ") & "'"
      sql = sql & "and  书籍编号='" & Trim(Text4.Text & "
If Trim(sql) = "" Then
   MsgBox "请选择查询方式!", vbOKOnly + vbExclamation
sql = "select * from 书籍信息 where " & sql

4.4借阅信息管理界面编码设计
次窗体主要用于借书功能,还可以显示借阅者的具体信息,以便于确认借阅者的正确身份。通过ADO控件连接到数据库,用DATA GRID控件,将它的各列显示出所有读者的编号和姓名。次窗体主要用于借书操作。 
此窗体的主要代码设计如下
sql = "select * from 借阅信息"
sql = "select * from 书籍信息 where 书籍编号='" & book_num & "'"

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

VB图书管理系统毕业论文 第7页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。