Thread: VB.Net :: Matrix Calculation

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

Public Class MainClass

Shared Sub Main()
Dim m As Matrix = New Matrix()
m.Rotate(90, MatrixOrder.Append)
m.Translate(7, 12, MatrixOrder.Append)
Dim p() As Point = {New Point(20, 45)}

Console.WriteLine(p.GetValue(0).ToString())

m.TransformPoints(p)

Console.WriteLine(p.GetValue(0).ToString())
End Sub

End Class