Mega Code Archive

 

Categories / VB.Net by API / System Drawing Drawing2d

 

Matrix Rotate

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