_ Partial Class Form1 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.MaskedTextBoxAdv1 = New DevComponents.DotNetBar.Controls.MaskedTextBoxAdv() Me.DoubleTextBox1 = New Syncfusion.Windows.Forms.Tools.DoubleTextBox() CType(Me.DoubleTextBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'MaskedTextBoxAdv1 ' ' ' ' Me.MaskedTextBoxAdv1.BackgroundStyle.Class = "TextBoxBorder" Me.MaskedTextBoxAdv1.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square Me.MaskedTextBoxAdv1.ButtonClear.Visible = True Me.MaskedTextBoxAdv1.Location = New System.Drawing.Point(223, 127) Me.MaskedTextBoxAdv1.Mask = "9.00" Me.MaskedTextBoxAdv1.Name = "MaskedTextBoxAdv1" Me.MaskedTextBoxAdv1.Size = New System.Drawing.Size(130, 19) Me.MaskedTextBoxAdv1.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled Me.MaskedTextBoxAdv1.TabIndex = 0 Me.MaskedTextBoxAdv1.Text = "" ' 'DoubleTextBox1 ' Me.DoubleTextBox1.BackGroundColor = System.Drawing.SystemColors.Window Me.DoubleTextBox1.BeforeTouchSize = New System.Drawing.Size(100, 20) Me.DoubleTextBox1.DoubleValue = 1.0R Me.DoubleTextBox1.Location = New System.Drawing.Point(236, 241) Me.DoubleTextBox1.Metrocolor = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(211, Byte), Integer), CType(CType(212, Byte), Integer)) Me.DoubleTextBox1.Name = "DoubleTextBox1" Me.DoubleTextBox1.NullString = "" Me.DoubleTextBox1.Size = New System.Drawing.Size(100, 20) Me.DoubleTextBox1.Style = Syncfusion.Windows.Forms.Tools.TextBoxExt.theme.[Default] Me.DoubleTextBox1.TabIndex = 1 Me.DoubleTextBox1.Text = "1.00" ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(800, 450) Me.Controls.Add(Me.DoubleTextBox1) Me.Controls.Add(Me.MaskedTextBoxAdv1) Me.Name = "Form1" Me.Text = "Form1" CType(Me.DoubleTextBox1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents MaskedTextBoxAdv1 As DevComponents.DotNetBar.Controls.MaskedTextBoxAdv Friend WithEvents DoubleTextBox1 As Syncfusion.Windows.Forms.Tools.DoubleTextBox End Class