Form3.vb 3.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273
  1. Public Class Form3
  2. Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  3. 'TODO: данная строка кода позволяет загрузить данные в таблицу "BD_Fam_PostanogovDataSet.Список_вакансий". При необходимости она может быть перемещена или удалена.
  4. Me.Список_вакансийTableAdapter.Fill(Me.BD_Fam_PostanogovDataSet.Список_вакансий)
  5. 'TODO: данная строка кода позволяет загрузить данные в таблицу "BD_Fam_PostanogovDataSet.Сферы_деятельности". При необходимости она может быть перемещена или удалена.
  6. Me.Сферы_деятельностиTableAdapter.Fill(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности)
  7. End Sub
  8. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  9. Сферы_деятельностиBindingSource.MoveFirst()
  10. End Sub
  11. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
  12. Сферы_деятельностиBindingSource.MovePrevious()
  13. End Sub
  14. Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
  15. Сферы_деятельностиBindingSource.AddNew()
  16. End Sub
  17. Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
  18. Сферы_деятельностиBindingSource.MoveLast()
  19. End Sub
  20. Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
  21. Сферы_деятельностиBindingSource.MoveNext()
  22. End Sub
  23. Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
  24. Сферы_деятельностиBindingSource.RemoveCurrent()
  25. End Sub
  26. Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
  27. Me.Сферы_деятельностиTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Сферы_деятельности)
  28. End Sub
  29. Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
  30. Список_вакансийBindingSource1.MoveFirst()
  31. End Sub
  32. Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
  33. Список_вакансийBindingSource1.MovePrevious()
  34. End Sub
  35. Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
  36. Список_вакансийBindingSource1.AddNew()
  37. End Sub
  38. Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
  39. Список_вакансийBindingSource1.MoveLast()
  40. End Sub
  41. Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
  42. Список_вакансийBindingSource1.MoveNext()
  43. End Sub
  44. Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
  45. Список_вакансийBindingSource1.RemoveCurrent()
  46. End Sub
  47. Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
  48. Me.Список_вакансийTableAdapter.Update(Me.BD_Fam_PostanogovDataSet.Список_вакансий)
  49. End Sub
  50. Private Sub Label4_Click(sender As Object, e As EventArgs) Handles Label4.Click
  51. End Sub
  52. Private Sub ВыходToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ВыходToolStripMenuItem.Click
  53. Me.Close()
  54. End Sub
  55. End Class