打印本文 打印本文 关闭窗口 关闭窗口
走近VB.Net(四) 关于数据类型与示例
作者:武汉SEO闵涛  文章来源:敏韬网  点击数2777  更新时间:2009/4/23 19:01:11  文章录入:mintao  责任编辑:mintao
Private WithEvents Button2 As System.WinForms.Button

   

   

   

    Private WithEvents Button1 As System.WinForms.Button

    Private WithEvents TextBox2 As System.WinForms.TextBox

    Private WithEvents TextBox1 As System.WinForms.TextBox

   

    Dim WithEvents Form1 As System.WinForms.Form

 

    ''''NOTE: The following procedure is required by the Windows Form Designer

    ''''It can be modified using the Windows Form Designer. 

    ''''Do not modify it using the code editor.

    Private Sub InitializeComponent()

        Me.components = New System.ComponentModel.Container()

        Me.Button1 = New System.WinForms.Button()

        Me.TextBox2 = New System.WinForms.TextBox()

        Me.Button3 = New System.WinForms.Button()

        Me.TextBox1 = New System.WinForms.TextBox()

        Me.Button2 = New System.WinForms.Button()

       

        ''''@design Me.TrayHeight = 0

        ''''@design Me.TrayLargeIcon = False

        ''''@design Me.TrayAutoArrange = True

        Button1.Location = New System.Drawing.Point(176, 40)

        Button1.Size = New System.Drawing.Size(24, 24)

        Button1.TabIndex = 2

        Button1.Font = New System.Drawing.Font("宋体", 12!, System.Drawing.FontStyle.Bold)

        Button1.Text = "+"

       

        TextBox2.Location = New System.Drawing.Point(160, 72)

        TextBox2.TabIndex = 1

        TextBox2.Size = New System.Drawing.Size(256, 21)

       

        Button3.Location = New System.Drawing.Point(24, 104)

        Button3.Size = New System.Drawing.Size(64, 24)

        Button3.TabIndex = 4

        Button3.Text = "退出"

       

        TextBox1.Location = New System.Drawing.Point(16, 8)

        TextBox1.TabIndex = 0

        TextBox1.Size = New System.Drawing.Size(200, 21)

       

        Button2.Location = New System.Drawing.Point(360, 104)

        Button2.Size = New System.Drawing.Size(32, 24)

        Button2.TabIndex = 3

        Button2.Text = "="

        Me.Text = "Form1"

        Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)

        Me.BackColor = System.Drawing.Color.YellowGreen

        Me.ClientSize = New System.Drawing.Size(456, 141)

       

        Me.Controls.Add(Button3)

        Me.Controls.Add(Button2)

        Me.Controls.Add(Button1)

        Me.Controls.Add(TextBox2)

        Me.Controls.Add(TextBox1)

    End Sub

   

#End Region

 &nb

上一页  [1] [2] [3] [4]  下一页

打印本文 打印本文 关闭窗口 关闭窗口