Timas und MitarbeiterID in Übersicht

2023-09-26 17:23:22 +02:00
parent 608dde3702
commit df4d816216
8 changed files with 69 additions and 35 deletions
--- a/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmMitarbeitersuche.vb
+++ b/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmMitarbeitersuche.vb
@@ -85,6 +85,7 @@ Public Class frmMitarbeitersuche
            lblSpitzname.Text = If(MA.mit_MAVerzeichnis_Spitzname, "")
            lblFirma.Text = MA.getFirma
            lblNiederlassung.Text = If(MA.mit_niederlassung, "")
+            lblMAId.Text = MA.mit_id

            lblTelefon.Text = If(MA.mit_durchwahl, "")
            lblMail.Text = If(MA.mit_email, "")
@@ -190,6 +191,7 @@ Public Class frmMitarbeitersuche
    Sub clearMA()

        lblName.Text = ""
+        lblMAId.Text = ""
        lblSpitzname.Text = ""
        lblFirma.Text = ""
        lblNiederlassung.Text = ""
@@ -453,4 +455,6 @@ Public Class frmMitarbeitersuche
            setBGPic("", MA)
        End If
    End Sub
+
+
 End Class