VB商场经营管理系统 第5页
DataGrid1的相关属性设置：
Allowaddnew=true
Allowarrows= true
Allowdelete=true
Allowupdate=true
Datasource=adodc1
添加用户界面
相关代码如下：
Private Sub Command1_Click()
Dim rs As Integer
res = MsgBox("确定添加此用户吗?", vbExclamation + vbYesNo + vbDefaultButton1)
If res = vbYes Then
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("username") = Text1.Text
Adodc1.Recordset.Fields("password") = Text2.Text
Adodc1.Recordset.Update
MsgBox "添加成功"
End If
End Sub
删除用户界面
相关代码如下：
Private Sub Command1_Click()
Dim res As Integer
res = MsgBox("确定删除此行记录吗?", vbExclamation + vbYesNo + vbDefaultButton1)
If res = vbYes Then
Adodc1.Recordset.Delete
Adodc1.Recordset.MoveNext
MsgBox "删除成功"
If Adodc1.Recordset.EOF = True Then
Adodc1.Recordset.MoveLast
End If
End If
End Sub
第优章 设计总结
时光飞逝，转眼间此次的数据库课程设计已进入末期，通过本次课程设计，使我对数据库和VB方面的知识有了一个比较系统的认识和理解。通过一个星期的自学VB，大大的提高了我的自学能力，同时提高了我的动手操作能力，以及应变能力。大大的扩展了我的知识面，同时让我知道，光有理论是不行的，一定要理论联系实际，这样才能充分的发挥自己的动手能力。虽然这是我一个人做的系统，但是团队配合还是必不可少的，人不是万能的，多多少少都些不会的，这样就需要和别人相互学习，相互沟通！
在做这个课程设计的时候，也遇到了不少的困难，同时由于时间的比较仓促，在时间的合理安排上就有了一定的困难，尤其是在连接数据库的阶段，起初是怎么连也连不上，曾几何时我想过放弃，但是我却坚持了下来，最后通过自己独立完成了整个设计，在这个过程中我的毅力得到了锻炼。
由于时间和人力的限制，本次设计的系统还存在一些缺陷，只实现了老师所要求的基本功能，但该系统实现起来简单明了，易于操作。还有不少功能需要扩展，尤其是对后台数据库的控制需要加强！
参考文献
1、《Visual Basic 6.0程序设计》，刘新民，清华大学出版社，2004
2、《Visual Basic 项目案例导航》，鲁荣江，科学出版社，2002
3、《Visual Basic 数据库编程技术与实例》，赵斯思，人民邮电出版社，2004
4、《SQL Server 2000入门与提高》，周绪，白海波，清华大学出版社，2001
5、《浅析VB中三种数据访问技术》.杨艳，中小企业管理与科技(上旬刊),2009
6、《Visual Basic中的数据访问技术》.耿小芬,徐忠军.中国教育信息化高职高教.2009
7、杨学全.《SQL Server 2000 实例编程》 北京：电子工业出版社，2004.
致谢
在这个课程设计即将要结束之际，感谢郭X老师对我们的细心指导，郭老师严谨的指导态度与深厚的理论知识都让我受益非浅，在老师身上学到了不少东西，再次，我要感谢那些在我做课程设计的过程中所有对我提供帮助的同学以及老师，尤其是张X健同学。至此郑重的感谢他们！最后感谢学校领导为我们提供了这个实际动手的机会！
上一页 [1] [2] [3] [4] [5]
VB商场经营管理系统 第5页下载如图片无法显示或论文不完整，请联系qq752018766
