29 Premium Themes
Included with purchase — and more features on the way!
Get access — $12 once
Version 2 is coming soon.
The price goes up when it arrives.
Pay once today and every update after that is free.
One Dark Pro
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Andromeda
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Ayu Dark
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Ayu Mirage
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Ayu Light
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Cobalt2
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Night Owl
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Night Owl Light
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Azureus
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Bordo
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Hibernus
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Lilac
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Lux
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Minimus
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Obscuro
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Sereno
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Uva
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Noctis Viola
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Palenight
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Pico 8
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Shades of Purple
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Shades of Purple SD
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Synthwave '84
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Tokyo Night
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Tokyo Night Storm
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Tokyo Night Light
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Winter is Coming
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Winter is Coming Light
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html
Winter is Coming Dark
Imports System
Imports System.Drawing
Imports System.Windows.Forms
Public Class HelloWindows
Inherits Form
Private lblHelloWindows As Label
Public Shared Sub Main( )
Application.Run(New HelloWindows( ))
End Sub
Public Sub New( )
lblHelloWindows = New Label( )
With lblHelloWindows
.Location = New Point(37, 31)
.Size = New Size(392, 64)
.Font = New Font("Arial", 36)
.Text = "Hello, Windows!"
.TabIndex = 0
.TextAlign = ContentAlignment.TopCenter
End With
Me.Text = "Programming Visual Basic .NET"
AutoScaleBaseSize = New Size(5, 13)
FormBorderStyle = FormBorderStyle.FixedSingle
ClientSize = New Size(466, 127)
Controls.Add(lblHelloWindows)
End Sub
End Class
' From https://www.oreilly.com/library/view/programming-visual-basic/0596000936/ch01s03.html