实验八 VB.NET对数据库的访问

一、实验目的

1．  掌握VB.NET的数据库访问方法。
2．  学习绑定对象的操作方法。

二、实验内容

1．建立tjdb数据库客户表的浏览界面，并能进行更新、插入和删除操作。参考界面如图8.1。
 

                            图8.1 实验结果参考界面
2．实现功能：
（1）建立SQLServer客户表与VB.net控件之间的数据绑定关系；
（2）用四个button实现客户表的数据浏览；
（3）用五个button实现客户表的更新操作；
（4）利用菜单项退出系统。

三、实验指导

（1）建立SQLServer客户表与VB.net控件之间的数据绑定关系；
提示：建立BindingManagerBase类mybind对象，用于绑定数据源客户表。实现语句为：
Public mybind As BindingManagerBase
（2）用四个button实现客户表的数据浏览；
在填充数据集同时，指定mybind的数据源。实现语句为：
      Me.SqlDataAdapter2.Fill(Me.DataSet11.客户)
       mybind = Me.BindingContext(Me.DataSet11, "客户")
浏览时，用mybind对象的方法position来实现表数据记录指针的移动；用mybind对象的方法count来表示客户表的总行数（即记录数）。实现语句为：
        mybind.Position = 0                        //到头
mybind.Position = mybind.Position – 1      //往前翻
mybind.Position = mybind.Position + 1      //往后翻
mybind.Position = mybind.Count – 1         //到尾
（3）用五个button实现客户表的更新操作；实现语句为：
        mybind.AddNew()                     //插入一条记录
         mybind.RemoveAt(mybind.Position)     //删除当前记录
         mybind.EndCurrentEdit()              //结束当前更新状态
          mybind.CancelCurrentEdit()          //取消当前编辑修改
          mybind.EndCurrentEdit()        //下面两语句结束当前更新状态，并更新数据库物理表。
          Me.SqlDataAdapter1.Update(Me.DataSet11.客户)
（4）利用菜单项退出系统。
     在界面上通过菜单控件实现系统退出。