edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

20200108

Browse Source
This commit is contained in:
Andreas Luxbauer
2020-01-08 15:01:48 +01:00
parent c860c222c7
commit e879fb6881
89 changed files with 8692 additions and 3571 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
Aviso/Auswertung/frmAuswertung.vb
View File

@@ -28,17 +28,21 @@ Public Class frmAuswertung
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
clrPnlMain()
Dim usrCntl As New usrctStatistik
usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
pnlMain.Controls.Add(usrCntl)
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Gesamt", Me) Then
clrPnlMain()
Dim usrCntl As New usrctStatistik
usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
pnlMain.Controls.Add(usrCntl)
End If
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
clrPnlMain()
Dim usrCntl As New usrctlMAUebersicht
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Mitarbeiter", Me) Then
clrPnlMain()
Dim usrCntl As New usrctlMAUebersicht
usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
pnlMain.Controls.Add(usrCntl)
pnlMain.Controls.Add(usrCntl)
End If
End Sub