Feature Gesamtsicherheiten: Refactorting und Einbau der neuen Funktionen
This commit is contained in:
@@ -3992,25 +3992,25 @@ Public Class frmHauptfenster
|
||||
End Sub
|
||||
|
||||
Private Sub ATGesamtsicherheitVeragAGToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragAGToolStripMenuItem.Click
|
||||
Dim frm As New frmGesSichMenu
|
||||
Dim frm As New frmGesamtsicherheitenMenu
|
||||
frm.Standort = "VERAG AG"
|
||||
frm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub DEGesamtsicherheitVeragGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DEGesamtsicherheitVeragGmbHToolStripMenuItem.Click
|
||||
Dim frm As New frmGesSichMenu
|
||||
Dim frm As New frmGesamtsicherheitenMenu
|
||||
frm.Standort = "Verag GmbH"
|
||||
frm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitIMEXCSGmbHToolStripMenuItem.Click
|
||||
Dim frm As New frmGesSichMenu
|
||||
Dim frm As New frmGesamtsicherheitenMenu
|
||||
frm.Standort = "IMEX"
|
||||
frm.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub ATGesamtsicherheitVeragCSToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ATGesamtsicherheitVeragCSToolStripMenuItem.Click
|
||||
Dim frm As New frmGesSichMenu
|
||||
Dim frm As New frmGesamtsicherheitenMenu
|
||||
frm.Standort = "Verag CS"
|
||||
frm.Show()
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user