Exception-Handling verfeinert, kleine Bugfixes durchgeführt.

Aviso/frmRoutendauerBerechnen.Designer.vb

@@ -1,9 +1,9 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class frmRoutendauerBerechnen
     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 frmRoutendauerBerechnen
     '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()
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmRoutendauerBerechnen))
         Me.btnMinus = New System.Windows.Forms.Button()
@@ -39,7 +39,6 @@ Partial Class frmRoutendauerBerechnen
         Me.lblDauer = New System.Windows.Forms.Label()
         Me.lblberechneteDauer = New System.Windows.Forms.Label()
         Me.lbWarningDateIsPast = New System.Windows.Forms.Label()
-        Me.Button1 = New System.Windows.Forms.Button()
         Me.SuspendLayout()
         '
         'btnMinus
@@ -241,21 +240,11 @@ Partial Class frmRoutendauerBerechnen
         Me.lbWarningDateIsPast.Text = "Datum des Eintreffens liegt in der Verangenheit!"
         Me.lbWarningDateIsPast.Visible = False
         '
-        'Button1
-        '
-        Me.Button1.Location = New System.Drawing.Point(144, 13)
-        Me.Button1.Name = "Button1"
-        Me.Button1.Size = New System.Drawing.Size(29, 23)
-        Me.Button1.TabIndex = 27
-        Me.Button1.Text = "-"
-        Me.Button1.UseVisualStyleBackColor = True
-        '
         'frmRoutendauerBerechnen
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(317, 208)
-        Me.Controls.Add(Me.Button1)
         Me.Controls.Add(Me.lbWarningDateIsPast)
         Me.Controls.Add(Me.lblberechneteDauer)
         Me.Controls.Add(Me.lblDauer)
@@ -297,5 +286,4 @@ Partial Class frmRoutendauerBerechnen
     Friend WithEvents lblDauer As Label
     Friend WithEvents lblberechneteDauer As Label
     Friend WithEvents lbWarningDateIsPast As Label
-    Friend WithEvents Button1 As Button
 End Class