imports System
imports System.Drawing
imports System.Windows.Forms
public class FormSizeLocation : inherits Form
private lbl as Label
' Override the DefaultSize property to gain better performance
protected ReadOnly overrides Property DefaultSize as Size
get
return new Size(400,400)
end get
end property
public sub New()
Text = "Control Parent"
BackColor = Color.LightBlue
ForeColor = Color.DarkBlue
Size = new Size(350,200)
end sub
public shared sub Main()
Application.Run(new FormSizeLocation())
end sub
end class
|
