May/Form2.vb

Public Class Form2
    Private Sub Form2_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 Button3_Click(sender As Object, e As EventArgs)
        СферыдеятельностиBindingSource.AddNew()
    End Sub

    Private Sub ТаблицаСфераДеятельностиToolStripMenuItem_Click(sender As Object, e As EventArgs)
        Me.Сферы_деятельностиTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности)
    End Sub

    Private Sub ТаблицаСписокВакансииToolStripMenuItem_Click(sender As Object, e As EventArgs)
        Me.Список_вакансийTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Список_вакансий)
    End Sub

    Private Sub СохранитьВсёToolStripMenuItem_Click(sender As Object, e As EventArgs)
        Me.Список_вакансийTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Список_вакансий)
        Me.Сферы_деятельностиTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности)
    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs)
        СферыдеятельностиBindingSource.RemoveCurrent()
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs)
        СписоквакансийBindingSource.AddNew()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs)
        СписоквакансийBindingSource.RemoveCurrent()
    End Sub

    Private Sub СохранитьToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles СохранитьToolStripMenuItem.Click
        Form3.Show()
    End Sub

    Private Sub ВыходToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ВыходToolStripMenuItem.Click
        Me.Close()
    End Sub

    Private Sub DataGridView2_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView2.CellContentClick

    End Sub
End Class