图书库存信息查询代码如下：
Private Sub Command1_Click() Dim str As String
str = \图书库存 \
str = str & \图书库存.\ Adodc1.RecordSource = str Adodc1.Refresh End Sub
Private Sub Command2_Click() Unload Me End Sub
Private Sub Command3_Click() Unload Me
MDIForm1.Show End Sub
Private Sub Form_Load()
Combo1.AddItem \图书编号\Combo1.AddItem \书名\Combo1.AddItem \库存量\Combo1.AddItem \单价\Text1.Text = \Combo1.Text = \End Sub
Private Sub DataGrid1_Click() Unload Me End Sub
Private Sub Form_Load()
Combo1.AddItem \图书编号\Combo1.AddItem \图书名\Combo1.AddItem \库存量\Combo1.AddItem \单价\Text6.Text = \End Sub
19
总结
通过这次数据库课程设计，我学会了如何利用Microsoft SQL Server2005软件建立相关信息的数据库，并通过Microsoft Visual Basic 6.0实现对相关信息的查询，将所学知识都运用到实践中去，增加了我对数据库的兴趣，让我能更清楚地了解到数据库在现实生活中为我们带来的极大便利，方便我们将所需要的信息进行规划和管理，将信息集中管理也为我们查询我们所需要的信息带来了简易的途经。但是，这个图书馆信息管理系统并不是很完善，还有需改进之处。
最后，感谢数据库课程设计老师对我耐心的教导和帮助，为我解决了许多在课堂上没弄懂的问题，让我对数据库有了更进一步的认识和了解。今后我会更加努力学习数据库的相关知识，相信能为我以后带来很大的帮助。
参考文献
[1] 王珊.数据库系统简明教程.北京：高等教育出版社.2004,9
[2] 赛奎春.Visual Basic信息系统开发实例精选.北京：高等教育出版社.2004，9 [3] 刘韬,何旭洪.Visual BASIC数据库系统开发实例导航.北京：人民邮电出版社.2002，10 [4]张海潘.软件工程导论.北京：清华大学出版社.1999,19(2);138~143 [5]闫宏印.VB程序设计.北京：电子工业出版社.2002;1~20
20
