xin3721网络学院为广大学员,准备了丰富了教学视频。相关视频教程地址为:vb.net教程
前面介绍了ADO.NET基础,以及ADO.NET与Windows窗体控件的绑定方法。但是,对于数据库编程我们更想了解的还是如何增加记录,删除记录,更新记录等数据库记录的操作方法。这里我们将以一个具体的实例为大家介绍这些操作方法。
在图3中,有btnFirst(第一个记录),btnEnd(最后一条记录),btnAdd(增加记录),btnDel(删除记录),btnEdit(修改记录)控件。
用代码形式打开数据并在frmtest_load中把数据绑定给TextBox控件。此处给出源代码:
'打开数据库
Public Sub OpenData()
'创建一个 OleDbConnection
Dim ConnectionString As String = ″ Provider =
Microsoft.Jet.OLEDB.4.0; Data Source = e:My
Documentsdb1.mdb″
Dim myConn As OleDbConnection = New OleDbConnection()
myConn.ConnectionString = ConnectionString
Dim strCom As String = ″ SELECT * FROM student ″
'创建一个 DataSet
myDataSet = New DataSet()
myConn.Open()
'用 OleDbDataAdapter 得到一个数据集
Dim myCommand As OleDbDataAdapter = New OleDbDataAdapter(strCom,
myConn)
'把Dataset绑定student数据表
myCommand.Fill(myDataSet, ″student″)
'关闭此OleDbConnection
myConn.Close()
End Sub
'绑定数据到TextBox控件
Private Sub frmtest_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
txtStuID.DataBindings.Add(New Binding(″Text″, Me.myDataSet,
″student.StuID″))
txtStuName.DataBindings.Add(New Binding(″Text″, Me.myDataSet,
″student.StuName″))
txtStuSex.DataBindings.Add(New Binding(″Text″, Me.myDataSet,
″student.StuSex″))
txtStuBorn.DataBindings.Add(New Binding(″Text″, Me.myDataSet,
″student.StuBorn″))
txtStuCore.DataBindings.Add(New Binding(″Text″, Me.myDataSet,
″student.StuCore″))
End Sub
完成以上步骤后,我们就可以通过编程对数据库进行各作操作了。