_ Partial Class frmFrachtkostenBerechnen Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ 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. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFrachtkostenBerechnen)) Me.lblVon = New System.Windows.Forms.Label() Me.lblNach = New System.Windows.Forms.Label() Me.btnCancel = New System.Windows.Forms.Button() Me.btnOK = New System.Windows.Forms.Button() Me.lblEUAnteil = New System.Windows.Forms.Label() Me.lblNichtEUAnteil = New System.Windows.Forms.Label() Me.lblDistanzEU = New System.Windows.Forms.Label() Me.lblGewicht = New System.Windows.Forms.Label() Me.btnCalculate = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.lblGesamtfrachkosten = New System.Windows.Forms.Label() Me.lblFaktor = New System.Windows.Forms.Label() Me.lblWarningEUAnteil = New System.Windows.Forms.Label() Me.lblWarningNichtEUAnteil = New System.Windows.Forms.Label() Me.lblWarningAbgangort = New System.Windows.Forms.Label() Me.lblWarningBestimmungsort = New System.Windows.Forms.Label() Me.lblWarningFaktor = New System.Windows.Forms.Label() Me.lblDistanzNichtEU = New System.Windows.Forms.Label() Me.ckbManAnteilsermittlung = New System.Windows.Forms.CheckBox() Me.ToolTipAutomatischErmitteln = New System.Windows.Forms.ToolTip(Me.components) Me.cbxLandNach = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.cbxLandVon = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txbCalcDistanceNichtEU = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbNichtEUAnteilberechnet = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbEUAnteilberechnet = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbFactor = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbxGesamtfrachtkosten = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbGewicht = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbCalcDistanceEU = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbNachOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbVonOrt = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbNachPLZ = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txbVonPLZ = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbNichtEUAnteil = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.tbEUAnteil = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.SuspendLayout() ' 'lblVon ' Me.lblVon.AutoSize = True Me.lblVon.Location = New System.Drawing.Point(5, 9) Me.lblVon.Name = "lblVon" Me.lblVon.Size = New System.Drawing.Size(64, 13) Me.lblVon.TabIndex = 0 Me.lblVon.Text = "Abgangsort:" ' 'lblNach ' Me.lblNach.AutoSize = True Me.lblNach.Location = New System.Drawing.Point(205, 9) Me.lblNach.Name = "lblNach" Me.lblNach.Size = New System.Drawing.Size(84, 13) Me.lblNach.TabIndex = 1 Me.lblNach.Text = "Bestimmungsort:" ' 'btnCancel ' Me.btnCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel Me.btnCancel.Location = New System.Drawing.Point(5, 270) Me.btnCancel.Name = "btnCancel" Me.btnCancel.Size = New System.Drawing.Size(75, 23) Me.btnCancel.TabIndex = 35 Me.btnCancel.Text = "Abbrechen" Me.btnCancel.UseVisualStyleBackColor = True ' 'btnOK ' Me.btnOK.AccessibleRole = System.Windows.Forms.AccessibleRole.Cursor Me.btnOK.DialogResult = System.Windows.Forms.DialogResult.OK Me.btnOK.Location = New System.Drawing.Point(286, 270) Me.btnOK.Name = "btnOK" Me.btnOK.Size = New System.Drawing.Size(75, 23) Me.btnOK.TabIndex = 36 Me.btnOK.Text = "OK" Me.btnOK.UseVisualStyleBackColor = True ' 'lblEUAnteil ' Me.lblEUAnteil.AutoSize = True Me.lblEUAnteil.Location = New System.Drawing.Point(5, 195) Me.lblEUAnteil.Name = "lblEUAnteil" Me.lblEUAnteil.Size = New System.Drawing.Size(51, 13) Me.lblEUAnteil.TabIndex = 23 Me.lblEUAnteil.Text = "EU Anteil" ' 'lblNichtEUAnteil ' Me.lblNichtEUAnteil.AutoSize = True Me.lblNichtEUAnteil.Location = New System.Drawing.Point(5, 230) Me.lblNichtEUAnteil.Name = "lblNichtEUAnteil" Me.lblNichtEUAnteil.Size = New System.Drawing.Size(79, 13) Me.lblNichtEUAnteil.TabIndex = 29 Me.lblNichtEUAnteil.Text = "Nicht EU Anteil" ' 'lblDistanzEU ' Me.lblDistanzEU.AutoSize = True Me.lblDistanzEU.Location = New System.Drawing.Point(210, 195) Me.lblDistanzEU.Name = "lblDistanzEU" Me.lblDistanzEU.Size = New System.Drawing.Size(42, 13) Me.lblDistanzEU.TabIndex = 26 Me.lblDistanzEU.Text = "Distanz" ' 'lblGewicht ' Me.lblGewicht.AutoSize = True Me.lblGewicht.Location = New System.Drawing.Point(5, 99) Me.lblGewicht.Name = "lblGewicht" Me.lblGewicht.Size = New System.Drawing.Size(46, 13) Me.lblGewicht.TabIndex = 14 Me.lblGewicht.Text = "Gewicht" ' 'btnCalculate ' Me.btnCalculate.AccessibleRole = System.Windows.Forms.AccessibleRole.ComboBox Me.btnCalculate.Location = New System.Drawing.Point(5, 160) Me.btnCalculate.Name = "btnCalculate" Me.btnCalculate.Size = New System.Drawing.Size(75, 23) Me.btnCalculate.TabIndex = 21 Me.btnCalculate.Text = "Berechnen" Me.btnCalculate.UseVisualStyleBackColor = True ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(5, 30) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(27, 13) Me.Label1.TabIndex = 2 Me.Label1.Text = "PLZ" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(5, 52) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(21, 13) Me.Label2.TabIndex = 8 Me.Label2.Text = "Ort" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(205, 56) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(21, 13) Me.Label3.TabIndex = 10 Me.Label3.Text = "Ort" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(205, 30) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(27, 13) Me.Label4.TabIndex = 5 Me.Label4.Text = "PLZ" ' 'lblGesamtfrachkosten ' Me.lblGesamtfrachkosten.AutoSize = True Me.lblGesamtfrachkosten.Location = New System.Drawing.Point(205, 125) Me.lblGesamtfrachkosten.Name = "lblGesamtfrachkosten" Me.lblGesamtfrachkosten.Size = New System.Drawing.Size(92, 13) Me.lblGesamtfrachkosten.TabIndex = 18 Me.lblGesamtfrachkosten.Text = "Frachtkosten ges." ' 'lblFaktor ' Me.lblFaktor.AutoSize = True Me.lblFaktor.Location = New System.Drawing.Point(5, 125) Me.lblFaktor.Name = "lblFaktor" Me.lblFaktor.Size = New System.Drawing.Size(37, 13) Me.lblFaktor.TabIndex = 16 Me.lblFaktor.Text = "Faktor" ' 'lblWarningEUAnteil ' Me.lblWarningEUAnteil.AutoSize = True Me.lblWarningEUAnteil.ForeColor = System.Drawing.Color.Red Me.lblWarningEUAnteil.Location = New System.Drawing.Point(5, 211) Me.lblWarningEUAnteil.Name = "lblWarningEUAnteil" Me.lblWarningEUAnteil.Size = New System.Drawing.Size(162, 13) Me.lblWarningEUAnteil.TabIndex = 28 Me.lblWarningEUAnteil.Text = "EU Anteil hinterlegen (in Prozent)" Me.lblWarningEUAnteil.Visible = False ' 'lblWarningNichtEUAnteil ' Me.lblWarningNichtEUAnteil.AutoSize = True Me.lblWarningNichtEUAnteil.ForeColor = System.Drawing.Color.Red Me.lblWarningNichtEUAnteil.Location = New System.Drawing.Point(5, 249) Me.lblWarningNichtEUAnteil.Name = "lblWarningNichtEUAnteil" Me.lblWarningNichtEUAnteil.Size = New System.Drawing.Size(190, 13) Me.lblWarningNichtEUAnteil.TabIndex = 34 Me.lblWarningNichtEUAnteil.Text = "Nicht EU Anteil hinterlegen (in Prozent)" Me.lblWarningNichtEUAnteil.Visible = False ' 'lblWarningAbgangort ' Me.lblWarningAbgangort.AutoSize = True Me.lblWarningAbgangort.ForeColor = System.Drawing.Color.Red Me.lblWarningAbgangort.Location = New System.Drawing.Point(5, 72) Me.lblWarningAbgangort.Name = "lblWarningAbgangort" Me.lblWarningAbgangort.Size = New System.Drawing.Size(147, 13) Me.lblWarningAbgangort.TabIndex = 12 Me.lblWarningAbgangort.Text = "PLZ/Ort von Abgangsort fehlt" Me.lblWarningAbgangort.Visible = False ' 'lblWarningBestimmungsort ' Me.lblWarningBestimmungsort.AutoSize = True Me.lblWarningBestimmungsort.ForeColor = System.Drawing.Color.Red Me.lblWarningBestimmungsort.Location = New System.Drawing.Point(180, 72) Me.lblWarningBestimmungsort.Name = "lblWarningBestimmungsort" Me.lblWarningBestimmungsort.Size = New System.Drawing.Size(167, 13) Me.lblWarningBestimmungsort.TabIndex = 13 Me.lblWarningBestimmungsort.Text = "PLZ/Ort von Bestimmungsort fehlt" Me.lblWarningBestimmungsort.Visible = False ' 'lblWarningFaktor ' Me.lblWarningFaktor.AutoSize = True Me.lblWarningFaktor.ForeColor = System.Drawing.Color.Red Me.lblWarningFaktor.Location = New System.Drawing.Point(5, 144) Me.lblWarningFaktor.Name = "lblWarningFaktor" Me.lblWarningFaktor.Size = New System.Drawing.Size(82, 13) Me.lblWarningFaktor.TabIndex = 20 Me.lblWarningFaktor.Text = "Faktor angeben" Me.lblWarningFaktor.Visible = False ' 'lblDistanzNichtEU ' Me.lblDistanzNichtEU.AutoSize = True Me.lblDistanzNichtEU.Location = New System.Drawing.Point(215, 237) Me.lblDistanzNichtEU.Name = "lblDistanzNichtEU" Me.lblDistanzNichtEU.Size = New System.Drawing.Size(42, 13) Me.lblDistanzNichtEU.TabIndex = 33 Me.lblDistanzNichtEU.Text = "Distanz" Me.lblDistanzNichtEU.Visible = False ' 'ckbManAnteilsermittlung ' Me.ckbManAnteilsermittlung.AutoSize = True Me.ckbManAnteilsermittlung.Location = New System.Drawing.Point(92, 160) Me.ckbManAnteilsermittlung.Name = "ckbManAnteilsermittlung" Me.ckbManAnteilsermittlung.Size = New System.Drawing.Size(160, 17) Me.ckbManAnteilsermittlung.TabIndex = 22 Me.ckbManAnteilsermittlung.Text = "Anteile automatisch ermitteln" Me.ToolTipAutomatischErmitteln.SetToolTip(Me.ckbManAnteilsermittlung, "" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Anteile werden automatisch ermittelt." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Für TR (=Türkei) und SRB (=Serbien) wird" & " der EU-Anteil des Streckenverlaufs ermittelt, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "alle weiteren werden mit 60% EU" & " und 40% nicht EU berechnet." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)) Me.ckbManAnteilsermittlung.UseVisualStyleBackColor = True ' 'cbxLandNach ' Me.cbxLandNach._allowedValuesFreiText = Nothing Me.cbxLandNach._allowFreiText = False Me.cbxLandNach._value = "" Me.cbxLandNach.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Append Me.cbxLandNach.FormattingEnabled = True Me.cbxLandNach.Location = New System.Drawing.Point(255, 23) Me.cbxLandNach.Name = "cbxLandNach" Me.cbxLandNach.Size = New System.Drawing.Size(50, 21) Me.cbxLandNach.TabIndex = 6 ' 'cbxLandVon ' Me.cbxLandVon._allowedValuesFreiText = Nothing Me.cbxLandVon._allowFreiText = False Me.cbxLandVon._value = "" Me.cbxLandVon.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest Me.cbxLandVon.FormattingEnabled = True Me.cbxLandVon.Location = New System.Drawing.Point(75, 22) Me.cbxLandVon.Name = "cbxLandVon" Me.cbxLandVon.Size = New System.Drawing.Size(50, 21) Me.cbxLandVon.TabIndex = 3 ' 'txbCalcDistanceNichtEU ' Me.txbCalcDistanceNichtEU._DateTimeOnly = False Me.txbCalcDistanceNichtEU._numbersOnly = False Me.txbCalcDistanceNichtEU._numbersOnlyKommastellen = "" Me.txbCalcDistanceNichtEU._numbersOnlyTrennzeichen = True Me.txbCalcDistanceNichtEU._Prozent = False Me.txbCalcDistanceNichtEU._ShortDateNew = False Me.txbCalcDistanceNichtEU._ShortDateOnly = False Me.txbCalcDistanceNichtEU._TimeOnly = False Me.txbCalcDistanceNichtEU._TimeOnly_Seconds = False Me.txbCalcDistanceNichtEU._value = "" Me.txbCalcDistanceNichtEU._Waehrung = False Me.txbCalcDistanceNichtEU._WaehrungZeichen = True Me.txbCalcDistanceNichtEU.ForeColor = System.Drawing.Color.Black Me.txbCalcDistanceNichtEU.Location = New System.Drawing.Point(277, 227) Me.txbCalcDistanceNichtEU.MaxLineLength = -1 Me.txbCalcDistanceNichtEU.MaxLines_Warning = "" Me.txbCalcDistanceNichtEU.MaxLines_Warning_Label = Nothing Me.txbCalcDistanceNichtEU.Name = "txbCalcDistanceNichtEU" Me.txbCalcDistanceNichtEU.Size = New System.Drawing.Size(84, 20) Me.txbCalcDistanceNichtEU.TabIndex = 32 Me.txbCalcDistanceNichtEU.Visible = False ' 'tbNichtEUAnteilberechnet ' Me.tbNichtEUAnteilberechnet._DateTimeOnly = False Me.tbNichtEUAnteilberechnet._numbersOnly = False Me.tbNichtEUAnteilberechnet._numbersOnlyKommastellen = "" Me.tbNichtEUAnteilberechnet._numbersOnlyTrennzeichen = True Me.tbNichtEUAnteilberechnet._Prozent = False Me.tbNichtEUAnteilberechnet._ShortDateNew = False Me.tbNichtEUAnteilberechnet._ShortDateOnly = False Me.tbNichtEUAnteilberechnet._TimeOnly = False Me.tbNichtEUAnteilberechnet._TimeOnly_Seconds = False Me.tbNichtEUAnteilberechnet._value = "" Me.tbNichtEUAnteilberechnet._Waehrung = True Me.tbNichtEUAnteilberechnet._WaehrungZeichen = True Me.tbNichtEUAnteilberechnet.ForeColor = System.Drawing.Color.Black Me.tbNichtEUAnteilberechnet.Location = New System.Drawing.Point(141, 227) Me.tbNichtEUAnteilberechnet.MaxLineLength = -1 Me.tbNichtEUAnteilberechnet.MaxLines_Warning = "" Me.tbNichtEUAnteilberechnet.MaxLines_Warning_Label = Nothing Me.tbNichtEUAnteilberechnet.Name = "tbNichtEUAnteilberechnet" Me.tbNichtEUAnteilberechnet.ReadOnly = True Me.tbNichtEUAnteilberechnet.Size = New System.Drawing.Size(60, 20) Me.tbNichtEUAnteilberechnet.TabIndex = 31 ' 'tbEUAnteilberechnet ' Me.tbEUAnteilberechnet._DateTimeOnly = False Me.tbEUAnteilberechnet._numbersOnly = False Me.tbEUAnteilberechnet._numbersOnlyKommastellen = "" Me.tbEUAnteilberechnet._numbersOnlyTrennzeichen = True Me.tbEUAnteilberechnet._Prozent = False Me.tbEUAnteilberechnet._ShortDateNew = False Me.tbEUAnteilberechnet._ShortDateOnly = False Me.tbEUAnteilberechnet._TimeOnly = False Me.tbEUAnteilberechnet._TimeOnly_Seconds = False Me.tbEUAnteilberechnet._value = "" Me.tbEUAnteilberechnet._Waehrung = True Me.tbEUAnteilberechnet._WaehrungZeichen = True Me.tbEUAnteilberechnet.ForeColor = System.Drawing.Color.Black Me.tbEUAnteilberechnet.Location = New System.Drawing.Point(141, 188) Me.tbEUAnteilberechnet.MaxLineLength = -1 Me.tbEUAnteilberechnet.MaxLines_Warning = "" Me.tbEUAnteilberechnet.MaxLines_Warning_Label = Nothing Me.tbEUAnteilberechnet.Name = "tbEUAnteilberechnet" Me.tbEUAnteilberechnet.ReadOnly = True Me.tbEUAnteilberechnet.Size = New System.Drawing.Size(60, 20) Me.tbEUAnteilberechnet.TabIndex = 25 ' 'txbFactor ' Me.txbFactor._DateTimeOnly = False Me.txbFactor._numbersOnly = True Me.txbFactor._numbersOnlyKommastellen = "" Me.txbFactor._numbersOnlyTrennzeichen = True Me.txbFactor._Prozent = False Me.txbFactor._ShortDateNew = False Me.txbFactor._ShortDateOnly = False Me.txbFactor._TimeOnly = False Me.txbFactor._TimeOnly_Seconds = False Me.txbFactor._value = "" Me.txbFactor._Waehrung = True Me.txbFactor._WaehrungZeichen = True Me.txbFactor.ForeColor = System.Drawing.Color.Black Me.txbFactor.Location = New System.Drawing.Point(75, 122) Me.txbFactor.MaxLineLength = -1 Me.txbFactor.MaxLines_Warning = "" Me.txbFactor.MaxLines_Warning_Label = Nothing Me.txbFactor.Name = "txbFactor" Me.txbFactor.Size = New System.Drawing.Size(60, 20) Me.txbFactor.TabIndex = 17 ' 'tbxGesamtfrachtkosten ' Me.tbxGesamtfrachtkosten._DateTimeOnly = False Me.tbxGesamtfrachtkosten._numbersOnly = False Me.tbxGesamtfrachtkosten._numbersOnlyKommastellen = "" Me.tbxGesamtfrachtkosten._numbersOnlyTrennzeichen = True Me.tbxGesamtfrachtkosten._Prozent = False Me.tbxGesamtfrachtkosten._ShortDateNew = False Me.tbxGesamtfrachtkosten._ShortDateOnly = False Me.tbxGesamtfrachtkosten._TimeOnly = False Me.tbxGesamtfrachtkosten._TimeOnly_Seconds = False Me.tbxGesamtfrachtkosten._value = "" Me.tbxGesamtfrachtkosten._Waehrung = True Me.tbxGesamtfrachtkosten._WaehrungZeichen = True Me.tbxGesamtfrachtkosten.ForeColor = System.Drawing.Color.Black Me.tbxGesamtfrachtkosten.Location = New System.Drawing.Point(301, 122) Me.tbxGesamtfrachtkosten.MaxLineLength = -1 Me.tbxGesamtfrachtkosten.MaxLines_Warning = "" Me.tbxGesamtfrachtkosten.MaxLines_Warning_Label = Nothing Me.tbxGesamtfrachtkosten.Name = "tbxGesamtfrachtkosten" Me.tbxGesamtfrachtkosten.ReadOnly = True Me.tbxGesamtfrachtkosten.Size = New System.Drawing.Size(60, 20) Me.tbxGesamtfrachtkosten.TabIndex = 19 ' 'txbGewicht ' Me.txbGewicht._DateTimeOnly = False Me.txbGewicht._numbersOnly = False Me.txbGewicht._numbersOnlyKommastellen = "" Me.txbGewicht._numbersOnlyTrennzeichen = True Me.txbGewicht._Prozent = False Me.txbGewicht._ShortDateNew = False Me.txbGewicht._ShortDateOnly = False Me.txbGewicht._TimeOnly = False Me.txbGewicht._TimeOnly_Seconds = False Me.txbGewicht._value = "" Me.txbGewicht._Waehrung = False Me.txbGewicht._WaehrungZeichen = True Me.txbGewicht.ForeColor = System.Drawing.Color.Black Me.txbGewicht.Location = New System.Drawing.Point(75, 96) Me.txbGewicht.MaxLineLength = -1 Me.txbGewicht.MaxLines_Warning = "" Me.txbGewicht.MaxLines_Warning_Label = Nothing Me.txbGewicht.Name = "txbGewicht" Me.txbGewicht.ReadOnly = True Me.txbGewicht.Size = New System.Drawing.Size(84, 20) Me.txbGewicht.TabIndex = 15 ' 'txbCalcDistanceEU ' Me.txbCalcDistanceEU._DateTimeOnly = False Me.txbCalcDistanceEU._numbersOnly = False Me.txbCalcDistanceEU._numbersOnlyKommastellen = "" Me.txbCalcDistanceEU._numbersOnlyTrennzeichen = True Me.txbCalcDistanceEU._Prozent = False Me.txbCalcDistanceEU._ShortDateNew = False Me.txbCalcDistanceEU._ShortDateOnly = False Me.txbCalcDistanceEU._TimeOnly = False Me.txbCalcDistanceEU._TimeOnly_Seconds = False Me.txbCalcDistanceEU._value = "" Me.txbCalcDistanceEU._Waehrung = False Me.txbCalcDistanceEU._WaehrungZeichen = True Me.txbCalcDistanceEU.ForeColor = System.Drawing.Color.Black Me.txbCalcDistanceEU.Location = New System.Drawing.Point(277, 188) Me.txbCalcDistanceEU.MaxLineLength = -1 Me.txbCalcDistanceEU.MaxLines_Warning = "" Me.txbCalcDistanceEU.MaxLines_Warning_Label = Nothing Me.txbCalcDistanceEU.Name = "txbCalcDistanceEU" Me.txbCalcDistanceEU.Size = New System.Drawing.Size(84, 20) Me.txbCalcDistanceEU.TabIndex = 27 ' 'txbNachOrt ' Me.txbNachOrt._DateTimeOnly = False Me.txbNachOrt._numbersOnly = False Me.txbNachOrt._numbersOnlyKommastellen = "" Me.txbNachOrt._numbersOnlyTrennzeichen = True Me.txbNachOrt._Prozent = False Me.txbNachOrt._ShortDateNew = False Me.txbNachOrt._ShortDateOnly = False Me.txbNachOrt._TimeOnly = False Me.txbNachOrt._TimeOnly_Seconds = False Me.txbNachOrt._value = "" Me.txbNachOrt._Waehrung = False Me.txbNachOrt._WaehrungZeichen = True Me.txbNachOrt.ForeColor = System.Drawing.Color.Black Me.txbNachOrt.Location = New System.Drawing.Point(255, 49) Me.txbNachOrt.MaxLineLength = -1 Me.txbNachOrt.MaxLines_Warning = "" Me.txbNachOrt.MaxLines_Warning_Label = Nothing Me.txbNachOrt.Name = "txbNachOrt" Me.txbNachOrt.Size = New System.Drawing.Size(106, 20) Me.txbNachOrt.TabIndex = 11 ' 'txbVonOrt ' Me.txbVonOrt._DateTimeOnly = False Me.txbVonOrt._numbersOnly = False Me.txbVonOrt._numbersOnlyKommastellen = "" Me.txbVonOrt._numbersOnlyTrennzeichen = True Me.txbVonOrt._Prozent = False Me.txbVonOrt._ShortDateNew = False Me.txbVonOrt._ShortDateOnly = False Me.txbVonOrt._TimeOnly = False Me.txbVonOrt._TimeOnly_Seconds = False Me.txbVonOrt._value = "" Me.txbVonOrt._Waehrung = False Me.txbVonOrt._WaehrungZeichen = True Me.txbVonOrt.ForeColor = System.Drawing.Color.Black Me.txbVonOrt.Location = New System.Drawing.Point(75, 49) Me.txbVonOrt.MaxLineLength = -1 Me.txbVonOrt.MaxLines_Warning = "" Me.txbVonOrt.MaxLines_Warning_Label = Nothing Me.txbVonOrt.Name = "txbVonOrt" Me.txbVonOrt.Size = New System.Drawing.Size(105, 20) Me.txbVonOrt.TabIndex = 9 ' 'txbNachPLZ ' Me.txbNachPLZ._DateTimeOnly = False Me.txbNachPLZ._numbersOnly = False Me.txbNachPLZ._numbersOnlyKommastellen = "" Me.txbNachPLZ._numbersOnlyTrennzeichen = True Me.txbNachPLZ._Prozent = False Me.txbNachPLZ._ShortDateNew = False Me.txbNachPLZ._ShortDateOnly = False Me.txbNachPLZ._TimeOnly = False Me.txbNachPLZ._TimeOnly_Seconds = False Me.txbNachPLZ._value = "" Me.txbNachPLZ._Waehrung = False Me.txbNachPLZ._WaehrungZeichen = True Me.txbNachPLZ.ForeColor = System.Drawing.Color.Black Me.txbNachPLZ.Location = New System.Drawing.Point(311, 23) Me.txbNachPLZ.MaxLineLength = -1 Me.txbNachPLZ.MaxLines_Warning = "" Me.txbNachPLZ.MaxLines_Warning_Label = Nothing Me.txbNachPLZ.Name = "txbNachPLZ" Me.txbNachPLZ.Size = New System.Drawing.Size(50, 20) Me.txbNachPLZ.TabIndex = 7 ' 'txbVonPLZ ' Me.txbVonPLZ._DateTimeOnly = False Me.txbVonPLZ._numbersOnly = False Me.txbVonPLZ._numbersOnlyKommastellen = "" Me.txbVonPLZ._numbersOnlyTrennzeichen = True Me.txbVonPLZ._Prozent = False Me.txbVonPLZ._ShortDateNew = False Me.txbVonPLZ._ShortDateOnly = False Me.txbVonPLZ._TimeOnly = False Me.txbVonPLZ._TimeOnly_Seconds = False Me.txbVonPLZ._value = "" Me.txbVonPLZ._Waehrung = False Me.txbVonPLZ._WaehrungZeichen = True Me.txbVonPLZ.ForeColor = System.Drawing.Color.Black Me.txbVonPLZ.Location = New System.Drawing.Point(130, 23) Me.txbVonPLZ.MaxLineLength = -1 Me.txbVonPLZ.MaxLines_Warning = "" Me.txbVonPLZ.MaxLines_Warning_Label = Nothing Me.txbVonPLZ.Name = "txbVonPLZ" Me.txbVonPLZ.Size = New System.Drawing.Size(50, 20) Me.txbVonPLZ.TabIndex = 4 ' 'tbNichtEUAnteil ' Me.tbNichtEUAnteil._DateTimeOnly = False Me.tbNichtEUAnteil._numbersOnly = False Me.tbNichtEUAnteil._numbersOnlyKommastellen = "" Me.tbNichtEUAnteil._numbersOnlyTrennzeichen = True Me.tbNichtEUAnteil._Prozent = True Me.tbNichtEUAnteil._ShortDateNew = False Me.tbNichtEUAnteil._ShortDateOnly = False Me.tbNichtEUAnteil._TimeOnly = False Me.tbNichtEUAnteil._TimeOnly_Seconds = False Me.tbNichtEUAnteil._value = Nothing Me.tbNichtEUAnteil._Waehrung = False Me.tbNichtEUAnteil._WaehrungZeichen = False Me.tbNichtEUAnteil.ForeColor = System.Drawing.Color.Black Me.tbNichtEUAnteil.Location = New System.Drawing.Point(86, 227) Me.tbNichtEUAnteil.MaxLineLength = -1 Me.tbNichtEUAnteil.MaxLines_Warning = "" Me.tbNichtEUAnteil.MaxLines_Warning_Label = Nothing Me.tbNichtEUAnteil.Name = "tbNichtEUAnteil" Me.tbNichtEUAnteil.Size = New System.Drawing.Size(49, 20) Me.tbNichtEUAnteil.TabIndex = 30 ' 'tbEUAnteil ' Me.tbEUAnteil._DateTimeOnly = False Me.tbEUAnteil._numbersOnly = False Me.tbEUAnteil._numbersOnlyKommastellen = "" Me.tbEUAnteil._numbersOnlyTrennzeichen = False Me.tbEUAnteil._Prozent = True Me.tbEUAnteil._ShortDateNew = False Me.tbEUAnteil._ShortDateOnly = False Me.tbEUAnteil._TimeOnly = False Me.tbEUAnteil._TimeOnly_Seconds = False Me.tbEUAnteil._value = Nothing Me.tbEUAnteil._Waehrung = False Me.tbEUAnteil._WaehrungZeichen = False Me.tbEUAnteil.ForeColor = System.Drawing.Color.Black Me.tbEUAnteil.Location = New System.Drawing.Point(84, 188) Me.tbEUAnteil.MaxLineLength = -1 Me.tbEUAnteil.MaxLines_Warning = "" Me.tbEUAnteil.MaxLines_Warning_Label = Nothing Me.tbEUAnteil.Name = "tbEUAnteil" Me.tbEUAnteil.Size = New System.Drawing.Size(51, 20) Me.tbEUAnteil.TabIndex = 24 ' 'frmFrachtkostenBerechnen ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(381, 305) Me.Controls.Add(Me.cbxLandNach) Me.Controls.Add(Me.cbxLandVon) Me.Controls.Add(Me.ckbManAnteilsermittlung) Me.Controls.Add(Me.txbCalcDistanceNichtEU) Me.Controls.Add(Me.lblDistanzNichtEU) Me.Controls.Add(Me.tbNichtEUAnteilberechnet) Me.Controls.Add(Me.tbEUAnteilberechnet) Me.Controls.Add(Me.lblWarningFaktor) Me.Controls.Add(Me.lblWarningBestimmungsort) Me.Controls.Add(Me.lblWarningAbgangort) Me.Controls.Add(Me.lblWarningNichtEUAnteil) Me.Controls.Add(Me.lblWarningEUAnteil) Me.Controls.Add(Me.txbFactor) Me.Controls.Add(Me.lblFaktor) Me.Controls.Add(Me.tbxGesamtfrachtkosten) Me.Controls.Add(Me.txbGewicht) Me.Controls.Add(Me.txbCalcDistanceEU) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.txbNachOrt) Me.Controls.Add(Me.txbVonOrt) Me.Controls.Add(Me.btnCalculate) Me.Controls.Add(Me.lblGesamtfrachkosten) Me.Controls.Add(Me.lblGewicht) Me.Controls.Add(Me.lblDistanzEU) Me.Controls.Add(Me.txbNachPLZ) Me.Controls.Add(Me.txbVonPLZ) Me.Controls.Add(Me.lblNichtEUAnteil) Me.Controls.Add(Me.lblEUAnteil) Me.Controls.Add(Me.tbNichtEUAnteil) Me.Controls.Add(Me.tbEUAnteil) Me.Controls.Add(Me.btnOK) Me.Controls.Add(Me.btnCancel) Me.Controls.Add(Me.lblNach) Me.Controls.Add(Me.lblVon) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmFrachtkostenBerechnen" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Frachtkosten berechnen" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents lblVon As Label Friend WithEvents lblNach As Label Friend WithEvents btnCancel As Button Friend WithEvents btnOK As Button Friend WithEvents tbEUAnteil As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents tbNichtEUAnteil As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblEUAnteil As Label Friend WithEvents lblNichtEUAnteil As Label Friend WithEvents txbVonPLZ As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txbNachPLZ As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblDistanzEU As Label Friend WithEvents lblGewicht As Label Friend WithEvents btnCalculate As Button Friend WithEvents txbVonOrt As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txbNachOrt As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label1 As Label Friend WithEvents Label2 As Label Friend WithEvents Label3 As Label Friend WithEvents Label4 As Label Friend WithEvents txbCalcDistanceEU As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txbGewicht As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblGesamtfrachkosten As Label Friend WithEvents tbxGesamtfrachtkosten As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txbFactor As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblFaktor As Label Friend WithEvents lblWarningEUAnteil As Label Friend WithEvents lblWarningNichtEUAnteil As Label Friend WithEvents lblWarningAbgangort As Label Friend WithEvents lblWarningBestimmungsort As Label Friend WithEvents lblWarningFaktor As Label Friend WithEvents tbEUAnteilberechnet As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents tbNichtEUAnteilberechnet As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txbCalcDistanceNichtEU As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblDistanzNichtEU As Label Friend WithEvents ckbManAnteilsermittlung As CheckBox Friend WithEvents ToolTipAutomatischErmitteln As ToolTip Friend WithEvents cbxLandVon As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents cbxLandNach As VERAG_PROG_ALLGEMEIN.MyComboBox End Class