Open uw VB.NET bronbestand in een editor zoals Microsoft Visual Studio . Kopen van 2

Maak een PictureBox object om op te tekenen door het toevoegen van de volgende code binnen uw "Form " class verklaring :

Prive pictureBox1
als Nieuwe PictureBox ( )
3

Maak een subroutine om de PictureBox initialiseren . Verbinden de Paint event subroutine door toevoeging van de volgende code in de klasse verklaring van uw Form1 :

Private Sub Form1_Load ( ByVal afzender als Voorwerp , ByVal e als System.EventArgs ) Handles MyBase.Load

pictureBox1 . dock = DockStyle.Fill

pictureBox1.BackColor
= Color.Black

AddHandler pictureBox1.Paint , AddressOf Me.pictureBox1_Paint

Me.Controls.Add
( pictureBox1 ) op Twitter

End Sub ' Form1_Load

de subroutine waarmee de achtergrond naar zwart . Zorg ervoor dat de " Form1_Load " methode elders in uw code , zoals in het " Form1 ( ) " constructeur .
4

Maak een subroutine op een lijn tussen twee punten met de " DrawLine " trekken bellen methode door toevoeging van de volgende code in de klasse verklaring van uw Form1 :

Private Sub pictureBox1_Paint ( ByVal afzender als Voorwerp , ByVal e als System.Windows.Forms.PaintEventArgs )

Dim whitePen
als Nieuwe Pen ( Color.white , 2 )

Dim point1
als Nieuwe Point ( 25 , 50 )

Dim punt2
als Nieuwe Punt ( 150 , 100 )

e.Graphics.DrawLine
( whitePen , point1 , punt2 )

End Sub '
pictureBox1_Paint

De subroutine creëert een " pen " object dat is wit en heeft een breedte van 2 . Het roept dan de " DrawLine " methode om een ​​lijn te trekken met de pen tussen de punten " 25,50 " en " 150100 . "
5

Sla het bestand VB.NET . Compileren en uitvoeren van het programma om de lijn te trekken .