_ Partial Class convEventToObj Inherits System.Windows.Forms.Form 'Форма переопределяет dispose для очистки списка компонентов. _ 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 'Является обязательной для конструктора форм Windows Forms Private components As System.ComponentModel.IContainer 'Примечание: следующая процедура является обязательной для конструктора форм Windows Forms 'Для ее изменения используйте конструктор форм Windows Form. 'Не изменяйте ее в редакторе исходного кода. _ Private Sub InitializeComponent() Me.Button1 = New System.Windows.Forms.Button() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.SuspendLayout() ' 'Button1 ' Me.Button1.Location = New System.Drawing.Point(164, 70) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(436, 232) Me.Button1.TabIndex = 0 Me.Button1.Text = "COVERT TO OBJ" Me.Button1.UseVisualStyleBackColor = True ' 'TextBox1 ' Me.TextBox1.Location = New System.Drawing.Point(164, 44) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(100, 20) Me.TextBox1.TabIndex = 1 Me.TextBox1.Text = "100" ' 'TextBox2 ' Me.TextBox2.Location = New System.Drawing.Point(383, 44) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(100, 20) Me.TextBox2.TabIndex = 1 Me.TextBox2.Text = "110" ' 'convEventToObj ' 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.TextBox2) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Button1) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog Me.MaximizeBox = False Me.Name = "convEventToObj" Me.Text = "convEventToObj" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Button1 As Button Friend WithEvents TextBox1 As TextBox Friend WithEvents TextBox2 As TextBox End Class