VB.Net/2D/Matrix

Matrix Calculation

<source lang="vbnet"> 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

      </source>