. Visual Basic NET ( VB.NET ) Matrix klassen innehåller ett Translate metod som kan hjälpa dig förvandla en 2D- ritning som en ellips eller en rektangel . Detta gör att du kan flytta en GraphicsPath objekt över skärmen utan att behöva skapa flera versioner av objektet . En GraphicsPath objekt innehåller en serie av kurvor och linjer . Utnyttja GraphicsPath objektets Transform metod och ett Matrix -objekts Översätt metod för att förvandla ditt objekt . Instruktioner
1
Öppna din Visual Basic . NET -filen i en editor , exempelvis Microsoft Visual Studio .
2
Skapa en ny subrutin för att utföra matrisomformning och skicka den de " PaintEventArgs " data genom att lägga till följande kod i filen :
Public Sub TransformRectangle ( ByVal e Som PaintEventArgs ) Addera 3
Skapa ny GraphicsPath , RectangleF och Matrix objekt genom att lägga till följande kod på toppen av subrutinen :
Dim gpath Som New GraphicsPathDim rectf Som RectangleF = Ny RectangleF ( 0,0,75,75 ) Dim transmatrix Som ny matris
rektangeln kommer att visas i det övre vänstra hörnet på koordinaterna ( 0,0 ) med en bredd av 75 enheter och en höjd på 75 enheter .
4
Rita utgångsläget av rektangeln på skärm med följande kod :
e.Graphics.DrawPath ( Pens.Black , gpath )
5
Översätt och sedan omvandla objektet med denna kod :
transmatrix.Translate ( 200,0 ) gpath.Transform ( transmatrix )
6
Rita transformerade rektangel på användarens skärm med koden :
e.Graphics.DrawPath ( Pens. Svart , gpath ) katalog
End Sub
den transformerade rektangel visas 200 enheter till höger om den ursprungliga rektangeln.
7
Spara VB.NET fil, och kompilera och köra programmet för att visa den transformerade rektangeln .