This commit is contained in:
2023-11-13 16:06:48 +01:00
parent ef3d484d59
commit 7a3a0a73ec
2 changed files with 27 additions and 1 deletions

View File

@@ -77,6 +77,9 @@ Public Class usrCntlMitarbeiter
sql &= " AND mit_gekuendigt=" & IIf(cbx.Checked, 1, 0)
End If
If cbxZE.CheckState <> CheckState.Indeterminate Then
sql &= IIf(cbxZE.Checked, " AND mit_timasId is not null", " AND mit_timasId is null")
End If
If firma = "VERAG" Then
@@ -282,10 +285,13 @@ Public Class usrCntlMitarbeiter
.Columns(9).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
'.AutoGenerateColumns = False
'.Columns(9).Visible = False
End With
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Dim Firma = ""
@@ -849,4 +855,8 @@ Public Class usrCntlMitarbeiter
Me.Cursor = Cursors.Default
End Sub
Private Sub cbxZE_CheckedChanged(sender As Object, e As EventArgs) Handles cbxZE.CheckedChanged
Tabelle_anzeigen()
End Sub
End Class