. Visual Basic NET ( VB.NET ) Matrix klassen inneholder en Translate metode som kan hjelpe deg å forvandle en 2D- tegning som en ellipse eller et rektangel . Dette lar deg flytte et GraphicsPath objekt over skjermen uten å måtte lage flere versjoner av objektet . En GraphicsPath objektet inneholder en serie av kurver og linjer. Utnytte GraphicsPath objektets Transform metode og et Matrix objektets Translate metode for å forvandle din objektet. Instruksjoner
en
Åpne Visual Basic. NET -filen i et redigeringsprogram , for eksempel Microsoft Visual Studio.
2
Opprett en ny subrutine å utføre matrise transformasjon og gi det de " PaintEventArgs " data ved å legge følgende kode i filen :
Public Sub TransformRectangle ( ByVal e Som PaintEventArgs )
3
Lag ny GraphicsPath , RectangleF og Matrix objekter ved å legge følgende kode på toppen av subrutinen :
Dim gpath som ny GraphicsPathDim rectf Som RectangleF = Ny RectangleF ( 0,0,75,75 ) Dim transmatrix som ny Matrix
rektangelet vises i øverste venstre hjørne på koordinatene ( 0,0) med en bredde på 75 enheter og en høyde på 75 enheter .
4
Tegn utgangsposisjonen av rektangelet på skjerm med følgende kode :
e.Graphics.DrawPath ( Pens.Black , gpath )
5
Oversett og deretter transformere objektet med denne koden : en
transmatrix.Translate ( 200,0 ) gpath.Transform ( transmatrix )
6
Tegn forvandlet rektangel på brukerens skjerm med koden : en
e.Graphics.DrawPath ( Pens. svart, gpath )
End Sub
forvandlet rektangel vises 200 enheter til høyre for den første rektangelet .
7
Lagre VB.NET fil, og kompilere og kjøre programmet for å se forvandlet rektangel .