VB.NET数据库中插入数据

本文记录一下如何通过VB.NET往数据中添加数据，所用数据库仍然用上节数据库联结那个，下图为设计的窗体应用程序，内容很简单，点击学生信息表，往这个表添加数据，点击学生成绩表往相应表添加数据。

图1
二、接下来讲述代码部分，在这里先把完整代码晒出来，如下。

Imports System.Data.OleDb
Public Class Form1
Dim odc1 As New OleDbConnection() '数据库操作
Dim odcommand As New OleDbCommand()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    odc1.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;data source=E:\博客\数据库联结\Database7.mdb"
    odc1.Open()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim Strxzyh As String
    Strxzyh = "insert into 学生信息表 (学号,姓名,性别) " & "values ('" & "2020512" & "','" & "小红" & "','" & "女" & "')"
    odcommand.CommandText = Strxzyh
    odcommand.Connection = odc1
    odcommand.ExecuteNonQuery()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    Dim Strxzyh As String
    Strxzyh = "insert into 学生成绩表 (学号,数学,语文,英语) " & "values ('" & "2020512" & "','" & "99" & "','" & "98" & "','" & "99" & "')"
    odcommand.CommandText = Strxzyh                                     '千万注意标点符号要用英文的！！！！切记切记
    odcommand.Connection = odc1
    odcommand.ExecuteNonQuery()
End Sub

End Class

首先，程序最开头的 Imports System.Data.OleDb是第一步，只有引用了这个，下边的程序才能操作数据库，不引用的话，下边的操作会报错。接着又定义了两个odc1和odcommand，这两个作用，我自己理解为，一个数据库连接用，一个操作数据库用，也是不可缺少的。接着就需要连接数据库了，下边那句为连接数据库odc1.ConnectionString = “Provider = Microsoft.Jet.OLEDB.4.0;data source=E:\博客\数据库联结\Database7.mdb”，Microsoft.Jet.OLEDB.4.0;好像针对电脑系统的不同，好像还有其他的语句，我这是WIN10的64位，可以直接运行，也就没深究，接下来就是定义到，想要连接数据库的位置了，位置一定要写对，否则在打开数据库时，就会出现文件名无效的错误。
接下来就是两个按钮的程序了，在写 Strxzyh = "insert into 学生成绩表 (学号,数学,语文,英语) " & “values (’” & “2020512” & “’,’” & “99” & “’,’” & “98” & “’,’” & “99” & "’)"这段代码时，一定要是在英文输入法的前提下，标点符号也要英文的，若为中文的运行时会报错的，深有体会，切记！切记！切记！，设置完插入值后，剩下的三句是必须的，以上就是所有的过程。点击两个按钮后，结果如图2，图3.可以看到图3的联结字段插入了代码插入的数据。

图2

图3
以上就是数据库中插入数据步骤，老规矩总结。
1、首先引入 Imports System.Data.OleDb
2、定义连接和传递命令的语句
3、连接数据库
4、插入数据
好了，就这么多，如有不对请见谅，请指出，灰常感谢。