VB.Net/GUI/GUI Basics

Hand made GUI class

<source lang="vbnet"> Imports System Imports System.Windows.Forms Public Class MainClass

   Shared Sub Main(  )
       Application.Run(New HandDrawnClass() )
   End Sub
  

End Class

   Public Class HandDrawnClass
      Inherits Form
      Private lblOutput As System.Windows.Forms.Label
      Private btnCancel As System.Windows.Forms.Button

      Public Sub New(  )
         Me.lblOutput = New System.Windows.Forms.Label(  )
         Me.btnCancel = New System.Windows.Forms.Button(  )
         Me.Text = "Hello World"
         lblOutput.Location = New System.Drawing.Point(16, 24)
         lblOutput.Text = "Hello World!"
         lblOutput.Size = New System.Drawing.Size(216, 24)
         btnCancel.Location = New System.Drawing.Point(150, 200)
         btnCancel.Size = New System.Drawing.Size(112, 32)
         btnCancel.Text = "&Cancel"
         AddHandler btnCancel.Click, AddressOf Me.btnCancel_Click
         Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
         Me.ClientSize = New System.Drawing.Size(300, 300)
         Me.Controls.Add(Me.btnCancel)
         Me.Controls.Add(Me.lblOutput)
      End Sub "New

      Protected Sub btnCancel_Click( _
         sender As Object, e As System.EventArgs)
         Application.Exit(  )
      End Sub
   End Class 
          
      </source>