Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DataGrid1.CaptionText = "学生基本数据"
DataGrid1.DataSource = DataSet11
OleDbDataAdapter1.Fill(DataSet11, "student")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myDataRow As DataRow
myDataRow = DataSet11.Tables("student").NewRow()
myDataRow("Name") = "New"
DataSet11.Tables("student").Rows.Add(myDataRow)
OleDbDataAdapter1.Update(DataSet11, "student")
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
DataSet11.Tables("student").Rows(DataGrid1.CurrentCell.RowNumber).Delete()
OleDbDataAdapter1.Update(DataSet11, "student")
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
OleDbDataAdapter1.Update(DataSet11, "student")
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Close()
End Sub
End Class

忘了补充。插入、删除数据时，数据库没反应。怎么回事？