用VB.net制作一个小程序(1)
----制作“Hello.NET”程序
作者:高山
用下面很简单的方法,就可以制作一个“Hello.NET”小程序,同时可以掌握一些控件的用法。
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
´该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
´在 InitializeComponent() 调用之后添加任何初始化
End Sub
´窗体重写处置以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
´Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
´注意:以下过程是 Windows 窗体设计器所必需的
´可以使用 Windows 窗体设计器修改此过程。
´不要使用代码编辑器修改它。
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Button1 = New System.Windows.Forms.Button()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.SuspendLayout()
´
´Button1
´
Me.Button1.Location = New System.Drawing.Point(16, 112)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 0
Me.Button1.Text = "OK"
´
´TextBox1
´
Me.TextBox1.Location = New System.Drawing.Point(160, 112)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.TabIndex = 1
Me.TextBox1.Text = ""
´
´Form1
´
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
Me.ClientSize = New System.Drawing.Size(292, 266)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.TextBox1, Me.Button1})
Me.Name = "Form1"
Me.Text = "Hello,VB.NET"
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = "Hello,VB.NET!"
End Sub
文章来源于领测软件测试网 https://www.ltesting.net/