vb.net教程之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数据库插入记录操作的差异也只在于不同的数据链接，具体的代码可以参考"删除数据记录"中的代码，在这里就不提供了。

栏目列表

首页 > VB.net教程 >

vb.net教程之VB.NET来插入数据记录

（相关vb.net教程)