Get Rectangle properties : Rectangle « 2D Graphics « VB.Net Tutorial

1. VB.Net Tutorial
2. 2D Graphics
3. Rectangle

Imports System.Drawing.Text
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class Test
   public Shared Sub Main
        Dim pt As New Point(10, 10)
        Dim sz As New Size(60, 40)
        Dim rect1 As Rectangle = Rectangle.Empty
        Dim rect2 As New Rectangle(20, 30, 30, 10)
        ' Set Rectangle properties
        If rect1.IsEmpty Then
            rect1.Location = pt
            rect1.Width = sz.Width
            rect1.Height = sz.Height
        End If
        ' Get Rectangle properties
        Dim str As String = "Location:" + rect1.Location.ToString()
        str += ", X:" + rect1.X.ToString()
        str += ", Y:" + rect1.Y.ToString()
        str += ", Left:" + rect1.Left.ToString()
        str += ", Right" + rect1.Right.ToString()
        str += ", Top:" + rect1.Top.ToString()
        str += ", Bottom:" + rect1.Bottom.ToString()
        Console.WriteLine(str)
   End Sub
End class

Location:{X=10,Y=10}, X:10, Y:10, Left:10, Right70, Top:10, Bottom:50

17.7.Rectangle
	17.7.1.	Create Rectangle From Size And Point
	17.7.2.	Create Rectangle From X, Y, Width, Height
	17.7.3.	Get Rectangle properties
	17.7.4.	Rectangle.Inflate
	17.7.5.	Rectangle.Union
	17.7.6.	Use RectangleF
	17.7.7.	Draw Rectangle
	17.7.8.	Draw Rectangle with rectangle X, Y, Width and Height
	17.7.9.	Fill Rectangle
	17.7.10.	Draw Rectangle in different size
	17.7.11.	Is inside a Rectangle
	17.7.12.	Rectangle.Intersect
	17.7.13.	Rectangle.Union and Intersect