Public Class Form3 Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load 'TODO: данная строка кода позволяет загрузить данные в таблицу "BD_Fam_PostanogovDataSet.Список_вакансий". При необходимости она может быть перемещена или удалена. Me.Список_вакансийTableAdapter.Fill(Me.BD_Fam_PostanogovDataSet.Список_вакансий) 'TODO: данная строка кода позволяет загрузить данные в таблицу "BD_Fam_PostanogovDataSet.Сферы_деятельности". При необходимости она может быть перемещена или удалена. Me.Сферы_деятельностиTableAdapter.Fill(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности) End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Сферы_деятельностиBindingSource.MoveFirst() End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Сферы_деятельностиBindingSource.MovePrevious() End Sub Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click Сферы_деятельностиBindingSource.AddNew() End Sub Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click Сферы_деятельностиBindingSource.MoveLast() End Sub Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click Сферы_деятельностиBindingSource.MoveNext() End Sub Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click Сферы_деятельностиBindingSource.RemoveCurrent() End Sub Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click Me.Сферы_деятельностиTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности) End Sub Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click Список_вакансийBindingSource1.MoveFirst() End Sub Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click Список_вакансийBindingSource1.MovePrevious() End Sub Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click Список_вакансийBindingSource1.AddNew() End Sub Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click Список_вакансийBindingSource1.MoveLast() End Sub Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click Список_вакансийBindingSource1.MoveNext() End Sub Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click Список_вакансийBindingSource1.RemoveCurrent() End Sub Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click Me.Список_вакансийTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Список_вакансий) End Sub Private Sub Label4_Click(sender As Object, e As EventArgs) Handles Label4.Click End Sub Private Sub ВыходToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ВыходToolStripMenuItem.Click Me.Close() End Sub End Class