Anhangsarten eigene Form für Adminstration

2024-03-13 17:31:48 +01:00
parent 3c85713ff0
commit fb978b760b
8 changed files with 417 additions and 62 deletions
--- a/Aviso/frmAvisoAnhangsarten.Designer.vb
+++ b/Aviso/frmAvisoAnhangsarten.Designer.vb
@@ -0,0 +1,88 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmAvisoAnhangsarten
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    '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()> _
+    Private Sub InitializeComponent()
+        Me.DataGridView = New System.Windows.Forms.DataGridView()
+        Me.btnOK = New System.Windows.Forms.Button()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.txtSuche = New System.Windows.Forms.TextBox()
+        CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'DataGridView
+        '
+        Me.DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.DataGridView.Location = New System.Drawing.Point(12, 45)
+        Me.DataGridView.MultiSelect = False
+        Me.DataGridView.Name = "DataGridView"
+        Me.DataGridView.Size = New System.Drawing.Size(786, 399)
+        Me.DataGridView.TabIndex = 15
+        '
+        'btnOK
+        '
+        Me.btnOK.Location = New System.Drawing.Point(689, 446)
+        Me.btnOK.Name = "btnOK"
+        Me.btnOK.Size = New System.Drawing.Size(109, 23)
+        Me.btnOK.TabIndex = 16
+        Me.btnOK.Text = "Speichern"
+        Me.btnOK.UseVisualStyleBackColor = True
+        Me.btnOK.Visible = False
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(9, 3)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(41, 13)
+        Me.Label2.TabIndex = 17
+        Me.Label2.Text = "Suche:"
+        '
+        'txtSuche
+        '
+        Me.txtSuche.Location = New System.Drawing.Point(12, 19)
+        Me.txtSuche.Name = "txtSuche"
+        Me.txtSuche.Size = New System.Drawing.Size(150, 20)
+        Me.txtSuche.TabIndex = 18
+        '
+        'frmAvisoAnhangsarten
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(810, 481)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.txtSuche)
+        Me.Controls.Add(Me.btnOK)
+        Me.Controls.Add(Me.DataGridView)
+        Me.Name = "frmAvisoAnhangsarten"
+        Me.Text = "frmAvisoAnhangsarten"
+        CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents DataGridView As DataGridView
+    Friend WithEvents btnOK As Button
+    Friend WithEvents Label2 As Label
+    Friend WithEvents txtSuche As TextBox
+End Class