生徒のテーブルに新しい行を挿入しようとしていますが、何もしていません。私のコードは次のとおりです。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim stAdapter As New StudentSystemDBDataSetTableAdapters.studentsTableAdapter()
Dim stDataset As New StudentSystemDBDataSet()
Dim Row As StudentSystemDBDataSet.studentsRow
Row = stDataset.students.NewstudentsRow
Row.Student_no = "34"
Row.Title = "ert"
Row.Initials = "3434"
Row.Surname = "erwer"
Row.Address = "fgsfd"
Row.Postal_Code = "rwerwe"
Row.Birthdate = "gogid"
Row.Gender = "erwrwer"
stDataset.students.Rows.Add(Row)
stAdapter.Update(stDataset.students)
End Sub