GUI-Verbesserungen

VERAGAddIn/frmAvisoFormularAnfügen.Designer.vb

@@ -48,7 +48,7 @@ Partial Class frmAvisoFormularAnfuegen
         '
         Me.lblKunden.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.lblKunden.AutoSize = True
-        Me.lblKunden.Location = New System.Drawing.Point(3, 9)
+        Me.lblKunden.Location = New System.Drawing.Point(12, 15)
         Me.lblKunden.Name = "lblKunden"
         Me.lblKunden.Size = New System.Drawing.Size(44, 13)
         Me.lblKunden.TabIndex = 2
@@ -58,7 +58,7 @@ Partial Class frmAvisoFormularAnfuegen
         '
         Me.btnOK.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.btnOK.DialogResult = System.Windows.Forms.DialogResult.OK
-        Me.btnOK.Location = New System.Drawing.Point(402, 65)
+        Me.btnOK.Location = New System.Drawing.Point(409, 65)
         Me.btnOK.Name = "btnOK"
         Me.btnOK.Size = New System.Drawing.Size(105, 40)
         Me.btnOK.TabIndex = 3
@@ -85,11 +85,11 @@ Partial Class frmAvisoFormularAnfuegen
         Me.KdSearchBox.KdNr = "-1"
         Me.KdSearchBox.kdNrField = Nothing
         Me.KdSearchBox.KdNrNullInt = Nothing
-        Me.KdSearchBox.Location = New System.Drawing.Point(6, 31)
+        Me.KdSearchBox.Location = New System.Drawing.Point(12, 32)
         Me.KdSearchBox.Name = "KdSearchBox"
         Me.KdSearchBox.nurAktive = True
         Me.KdSearchBox.searchActive = True
-        Me.KdSearchBox.Size = New System.Drawing.Size(501, 20)
+        Me.KdSearchBox.Size = New System.Drawing.Size(495, 20)
         Me.KdSearchBox.TabIndex = 4
         Me.KdSearchBox.TIMER_SEARCH = True
         Me.KdSearchBox.usrcntl = Nothing
@@ -112,9 +112,9 @@ Partial Class frmAvisoFormularAnfuegen
         Me.cbVMTypen._value = ""
         Me.cbVMTypen.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.cbVMTypen.FormattingEnabled = True
-        Me.cbVMTypen.Location = New System.Drawing.Point(3, 80)
+        Me.cbVMTypen.Location = New System.Drawing.Point(12, 81)
         Me.cbVMTypen.Name = "cbVMTypen"
-        Me.cbVMTypen.Size = New System.Drawing.Size(501, 21)
+        Me.cbVMTypen.Size = New System.Drawing.Size(492, 21)
         Me.cbVMTypen.TabIndex = 35
         '
         'MyPanel1
@@ -126,7 +126,7 @@ Partial Class frmAvisoFormularAnfuegen
         Me.MyPanel1.Dock = System.Windows.Forms.DockStyle.Bottom
         Me.MyPanel1.Location = New System.Drawing.Point(0, 523)
         Me.MyPanel1.Name = "MyPanel1"
-        Me.MyPanel1.Size = New System.Drawing.Size(526, 108)
+        Me.MyPanel1.Size = New System.Drawing.Size(521, 108)
         Me.MyPanel1.TabIndex = 36
         '
         'pbMail
@@ -161,14 +161,14 @@ Partial Class frmAvisoFormularAnfuegen
         Me.MyPanel2.Dock = System.Windows.Forms.DockStyle.Top
         Me.MyPanel2.Location = New System.Drawing.Point(0, 0)
         Me.MyPanel2.Name = "MyPanel2"
-        Me.MyPanel2.Size = New System.Drawing.Size(526, 114)
+        Me.MyPanel2.Size = New System.Drawing.Size(521, 114)
         Me.MyPanel2.TabIndex = 37
         '
         'lblVMId
         '
         Me.lblVMId.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.lblVMId.AutoSize = True
-        Me.lblVMId.Location = New System.Drawing.Point(3, 63)
+        Me.lblVMId.Location = New System.Drawing.Point(9, 64)
         Me.lblVMId.Name = "lblVMId"
         Me.lblVMId.Size = New System.Drawing.Size(69, 13)
         Me.lblVMId.TabIndex = 36
@@ -178,7 +178,7 @@ Partial Class frmAvisoFormularAnfuegen
         '
         Me.UsrCntlKundenZollVollmachten1.Location = New System.Drawing.Point(0, 120)
         Me.UsrCntlKundenZollVollmachten1.Name = "UsrCntlKundenZollVollmachten1"
-        Me.UsrCntlKundenZollVollmachten1.Size = New System.Drawing.Size(514, 387)
+        Me.UsrCntlKundenZollVollmachten1.Size = New System.Drawing.Size(514, 355)
         Me.UsrCntlKundenZollVollmachten1.TabIndex = 38
         '
         'dgvAnhaenge
@@ -194,12 +194,12 @@ Partial Class frmAvisoFormularAnfuegen
         Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
         Me.dgvAnhaenge.ColumnHeadersVisible = False
         Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName})
-        Me.dgvAnhaenge.Location = New System.Drawing.Point(0, 481)
+        Me.dgvAnhaenge.Location = New System.Drawing.Point(0, 483)
         Me.dgvAnhaenge.Name = "dgvAnhaenge"
         Me.dgvAnhaenge.ReadOnly = True
         Me.dgvAnhaenge.RowHeadersVisible = False
         Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvAnhaenge.Size = New System.Drawing.Size(523, 48)
+        Me.dgvAnhaenge.Size = New System.Drawing.Size(514, 36)
         Me.dgvAnhaenge.TabIndex = 39
         Me.dgvAnhaenge.Visible = False
         '
@@ -215,7 +215,7 @@ Partial Class frmAvisoFormularAnfuegen
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.BackColor = System.Drawing.Color.White
-        Me.ClientSize = New System.Drawing.Size(526, 631)
+        Me.ClientSize = New System.Drawing.Size(521, 631)
         Me.Controls.Add(Me.dgvAnhaenge)
         Me.Controls.Add(Me.UsrCntlKundenZollVollmachten1)
         Me.Controls.Add(Me.MyPanel2)

VERAGAddIn/frmAvisoFormularAnfügen.vb

@@ -105,8 +105,6 @@ Public Class frmAvisoFormularAnfuegen
 
         Close()
 
-
-
     End Sub
 
     Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click