vb编程_vb基本数据类型_vb编程入门实例讲解(12)

Dim myConn As OleDbConnection = New OleDbConnection()

myConn.ConnectionString = ConnectionString

myConn.Open()

Dim StrAdd As String = ″insert into student (Stuid,StuName,StuSex,StuBorn,StuCore) ＆#118alues('″ txtStuID.Text ″','″ txtStuName.Text ″','″ txtStuSex.Text ″','″ txtStuBorn.Text ″','″ txtStuCore.Text ″')″

Debug.Write(StrAdd)

Dim myCommand As OleDbCommand = New OleDbCommand(StrAdd, myConn)

myCommand.ExecuteNonQuery()

myConn.Close()

myDataSet.Tables(″student″).Rows(Me.BindingContext(myDataSet, ″student″).Position).BeginEdit()

myDataSet.Tables(″student″).Rows(Me.BindingContext(myDataSet, ″student″).Position).EndEdit()

myDataSet.Tables(″student″).AcceptChanges()

MsgBox(″数据增加完成！″)

End Sub

有了前面几种基本操作方法的代码分析后，这段代码相信不难理解。大家需要关注的还是SQL语句是如何实现数据记录增加的。这种方法具有一定的通行性。

完成上述设计后我们来看看整个程序的运行结果。按下F5键运行程序即可。

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/ruanjian/article-46460-12.html