VB.NET来插入数据记录

（相关vb.net教程)

：

往数据库中插入记录和修改记录和删除记录基本上差不多，主要也是利用SQL语句，下面是以Access 2000为操作数据库，进行插入记录的代码：

Private Sub button2_Click (ByVal sender As Object , _       ByVal e As System.EventArgs) Handles button2.Click         '判断所有字段是否添完，添完则执行，反之弹出提示         If  ( t_id.Text <> "" And t_xm.Text <> ""   And t_xb.Text <> "" And t_nl.Text <> ""   And t_books.Text <> "" ) Then             Dim myConn1 As String = " Provider = Microsoft.Jet.OLEDB.4.0 ;    Data Source = db.mdb"             Dim myConn As OleDbConnection = New OleDbConnection ( myConn1 )             myConn.Open ( )             Dim strInsert As String = " INSERT INTO person  ( id  , xm  ,     xb  , nl  , zip ) VALUES  ( " & _             t_id.Text + " , '" & _             t_xm.Text + "' , '" & _             t_xb.Text + "' , " & _             t_nl.Text + " , " & _             t_books.Text + ")"             Dim inst As OleDbCommand = New OleDbCommand ( strInsert , myConn )             inst.ExecuteNonQuery ( )             myConn.Close ( )             myDataSet.Tables ( "person" ).Rows ( myBind.Position ).BeginEdit ( )             myDataSet.Tables ( "person" ).Rows ( myBind.Position ).EndEdit ( )             myDataSet.Tables ( "person" ).AcceptChanges ( )         Else             MessageBox.Show ( "必须填满所有字段值！" , "错误！" )         End If End Sub

同样对Sql Server 2000数据库进行插入记录操作和Access 2000数据库插入记录操作的差异也只在于不同的数据链接，具体的代码可以参考"删除数据记录"中的代码，在这里就不提供了。