isFeiertag, Control (Insert und Delete in Schichten), ExcelAusgabeDP, etc.

UID/Dienstplan/frmDienstplanVariabel.Designer.vb

@@ -1,9 +1,9 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class frmDienstplanVariabel
     Inherits System.Windows.Forms.Form
 
     'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <System.Diagnostics.DebuggerNonUserCode()>
     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
         Try
             If disposing AndAlso components IsNot Nothing Then
@@ -20,7 +20,7 @@ Partial Class frmDienstplanVariabel
     'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
     'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
     'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
+    <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
         Dim ListViewItem1 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("KW 1")
@@ -61,6 +61,8 @@ Partial Class frmDienstplanVariabel
         Me.cboQSSpaet = New System.Windows.Forms.ComboBox()
         Me.Label23 = New System.Windows.Forms.Label()
         Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.txtSchichtstd = New System.Windows.Forms.TextBox()
+        Me.Label1 = New System.Windows.Forms.Label()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.txtWoStd = New System.Windows.Forms.TextBox()
         Me.TabControl1 = New System.Windows.Forms.TabControl()
@@ -152,11 +154,10 @@ Partial Class frmDienstplanVariabel
         Me.Button4 = New System.Windows.Forms.Button()
         Me.Button3 = New System.Windows.Forms.Button()
         Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.SchichtLöcshenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.Panel4 = New System.Windows.Forms.Panel()
         Me.pnlOptions = New System.Windows.Forms.Panel()
         Me.Button19 = New System.Windows.Forms.Button()
-        Me.Label1 = New System.Windows.Forms.Label()
-        Me.txtSchichtstd = New System.Windows.Forms.TextBox()
         Me.UsrcntlAuswertungWocheAuslastung1 = New ADMIN.usrcntlAuswertungWocheAuslastung()
         Me.UsrCntlAuswertungAuslastungMA1 = New ADMIN.usrCntlAuswertungAuslastungMA()
         Me.ctxtDgv.SuspendLayout()
@@ -214,6 +215,7 @@ Partial Class frmDienstplanVariabel
         CType(Me.dgvUrl_Do, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.tbAuswertung.SuspendLayout()
         Me.tbTagesverteilung.SuspendLayout()
+        Me.ContextMenuStrip1.SuspendLayout()
         Me.Panel4.SuspendLayout()
         Me.pnlOptions.SuspendLayout()
         Me.SuspendLayout()
@@ -529,6 +531,29 @@ Partial Class frmDienstplanVariabel
         Me.GroupBox1.TabStop = False
         Me.GroupBox1.Text = "Details zum aktuellen Eintrag"
         '
+        'txtSchichtstd
+        '
+        Me.txtSchichtstd.BackColor = System.Drawing.Color.White
+        Me.txtSchichtstd.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.txtSchichtstd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSchichtstd.Location = New System.Drawing.Point(194, 117)
+        Me.txtSchichtstd.MaxLength = 1
+        Me.txtSchichtstd.Name = "txtSchichtstd"
+        Me.txtSchichtstd.ReadOnly = True
+        Me.txtSchichtstd.Size = New System.Drawing.Size(38, 13)
+        Me.txtSchichtstd.TabIndex = 99
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label1.Location = New System.Drawing.Point(120, 118)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(68, 13)
+        Me.Label1.TabIndex = 98
+        Me.Label1.Text = "Std. Schicht:"
+        Me.Label1.Visible = False
+        '
         'Label2
         '
         Me.Label2.AutoSize = True
@@ -1597,8 +1622,15 @@ Partial Class frmDienstplanVariabel
         '
         'ContextMenuStrip1
         '
+        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SchichtLöcshenToolStripMenuItem})
         Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
-        Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(181, 48)
+        '
+        'SchichtLöcshenToolStripMenuItem
+        '
+        Me.SchichtLöcshenToolStripMenuItem.Name = "SchichtLöcshenToolStripMenuItem"
+        Me.SchichtLöcshenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.SchichtLöcshenToolStripMenuItem.Text = "Schicht löschen"
         '
         'Panel4
         '
@@ -1654,29 +1686,6 @@ Partial Class frmDienstplanVariabel
         Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         Me.Button19.UseVisualStyleBackColor = True
         '
-        'Label1
-        '
-        Me.Label1.AutoSize = True
-        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Label1.Location = New System.Drawing.Point(120, 118)
-        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(68, 13)
-        Me.Label1.TabIndex = 98
-        Me.Label1.Text = "Std. Schicht:"
-        Me.Label1.Visible = False
-        '
-        'txtSchichtstd
-        '
-        Me.txtSchichtstd.BackColor = System.Drawing.Color.White
-        Me.txtSchichtstd.BorderStyle = System.Windows.Forms.BorderStyle.None
-        Me.txtSchichtstd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtSchichtstd.Location = New System.Drawing.Point(194, 117)
-        Me.txtSchichtstd.MaxLength = 1
-        Me.txtSchichtstd.Name = "txtSchichtstd"
-        Me.txtSchichtstd.ReadOnly = True
-        Me.txtSchichtstd.Size = New System.Drawing.Size(38, 13)
-        Me.txtSchichtstd.TabIndex = 99
-        '
         'UsrcntlAuswertungWocheAuslastung1
         '
         Me.UsrcntlAuswertungWocheAuslastung1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
@@ -1767,6 +1776,7 @@ Partial Class frmDienstplanVariabel
         CType(Me.dgvUrl_Do, System.ComponentModel.ISupportInitialize).EndInit()
         Me.tbAuswertung.ResumeLayout(False)
         Me.tbTagesverteilung.ResumeLayout(False)
+        Me.ContextMenuStrip1.ResumeLayout(False)
         Me.Panel4.ResumeLayout(False)
         Me.Panel4.PerformLayout()
         Me.pnlOptions.ResumeLayout(False)
@@ -1905,4 +1915,5 @@ Partial Class frmDienstplanVariabel
     Friend WithEvents ToolStripMenuSplitschicht As ToolStripMenuItem
     Friend WithEvents Label1 As Label
     Friend WithEvents txtSchichtstd As TextBox
+    Friend WithEvents SchichtLöcshenToolStripMenuItem As ToolStripMenuItem
 End Class