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

Timas

Browse Source
This commit is contained in:
d.breimaier
2023-09-20 10:18:37 +02:00
parent f46065ef1e
commit 791b0ad4be
2 changed files with 27 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
UID/Mitarbeiter/frmMitarbDetails.Designer.vb generated
View File

@@ -83,6 +83,8 @@ Partial Class frmMitarbDetails
Me.cbxTimasAngelegt = New System.Windows.Forms.CheckBox()
Me.txtPersonalNr = New System.Windows.Forms.TextBox()
Me.btnMAanlegen = New System.Windows.Forms.Button()
Me.TabPage7 = New System.Windows.Forms.TabPage()
Me.lbSprachen = New VERAG_PROG_ALLGEMEIN.MyListBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.txtTelNr = New System.Windows.Forms.TextBox()
@@ -203,8 +205,6 @@ Partial Class frmMitarbDetails
Me.cboAdminBer = New System.Windows.Forms.ComboBox()
Me.Label7 = New System.Windows.Forms.Label()
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.TabPage7 = New System.Windows.Forms.TabPage()
Me.lbSprachen = New VERAG_PROG_ALLGEMEIN.MyListBox()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout()
Me.TabControl2.SuspendLayout()
@@ -216,6 +216,7 @@ Partial Class frmMitarbDetails
Me.TabPage6.SuspendLayout()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.dgvData, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage7.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.picFoto, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -227,7 +228,6 @@ Partial Class frmMitarbDetails
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage7.SuspendLayout()
Me.SuspendLayout()
'
'PictureBox1
@@ -898,6 +898,28 @@ Partial Class frmMitarbDetails
Me.btnMAanlegen.Text = "anlegen"
Me.btnMAanlegen.UseVisualStyleBackColor = False
'
'TabPage7
'
Me.TabPage7.Controls.Add(Me.lbSprachen)
Me.TabPage7.Location = New System.Drawing.Point(4, 22)
Me.TabPage7.Name = "TabPage7"
Me.TabPage7.Size = New System.Drawing.Size(442, 174)
Me.TabPage7.TabIndex = 4
Me.TabPage7.Text = "Sprachen"
Me.TabPage7.UseVisualStyleBackColor = True
'
'lbSprachen
'
Me.lbSprachen._value = ""
Me.lbSprachen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbSprachen.FormattingEnabled = True
Me.lbSprachen.Location = New System.Drawing.Point(5, 3)
Me.lbSprachen.MultiColumn = True
Me.lbSprachen.Name = "lbSprachen"
Me.lbSprachen.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
Me.lbSprachen.Size = New System.Drawing.Size(152, 134)
Me.lbSprachen.TabIndex = 97
'
'Label4
'
Me.Label4.AutoSize = True
@@ -2233,28 +2255,6 @@ Partial Class frmMitarbDetails
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
'
'TabPage7
'
Me.TabPage7.Controls.Add(Me.lbSprachen)
Me.TabPage7.Location = New System.Drawing.Point(4, 22)
Me.TabPage7.Name = "TabPage7"
Me.TabPage7.Size = New System.Drawing.Size(442, 174)
Me.TabPage7.TabIndex = 4
Me.TabPage7.Text = "Sprachen"
Me.TabPage7.UseVisualStyleBackColor = True
'
'lbSprachen
'
Me.lbSprachen._value = ""
Me.lbSprachen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbSprachen.FormattingEnabled = True
Me.lbSprachen.Location = New System.Drawing.Point(5, 3)
Me.lbSprachen.MultiColumn = True
Me.lbSprachen.Name = "lbSprachen"
Me.lbSprachen.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
Me.lbSprachen.Size = New System.Drawing.Size(152, 95)
Me.lbSprachen.TabIndex = 97
'
'frmMitarbDetails
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -2286,6 +2286,7 @@ Partial Class frmMitarbDetails
Me.TabPage6.PerformLayout()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.dgvData, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage7.ResumeLayout(False)
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
@@ -2300,7 +2301,6 @@ Partial Class frmMitarbDetails
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox6, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage7.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub

2
UID/Mitarbeiter/usrCntlMitarbeiter.vb
View File

@@ -200,7 +200,7 @@ Public Class usrCntlMitarbeiter
If dt.Columns.Count > 0 Then
If txtSuche.Text <> "" Then
dt.DefaultView.RowFilter = "lastname like '%" & txtSuche.Text & "%' or firstname like '%" & txtSuche.Text & "%' or pnr1 like '%" & txtSuche.Text & "%' or info like '%" & txtSuche.Text & "%'"
dt.DefaultView.RowFilter = "Vorname like '%" & txtSuche.Text & "%' or Nachname like '%" & txtSuche.Text & "%' or 'Personal-Nr (Lohn)' like '%" & txtSuche.Text & "%' or Info like '%" & txtSuche.Text & "%'"
Else
dt.DefaultView.RowFilter = Nothing
End If