. Zeichnen von Linien in Visual Basic NET ( VB.NET) ist ein wichtiges Konzept zu verstehen , wenn das Lernen , wie man mit PictureBox Objekten und der Graphics-Klasse arbeiten. VB.NE , die eine objektorientierte Programmiersprache ist , verwendet das . NET Framework und ist der Nachfolger von der Sprache Visual Basic . Um die " DrawLine " Methode zu verwenden, erstellen Sie zuerst eine " PictureBox " Objekt initialisieren und rufen Sie dann die " DrawLine " Methode, um eine Linie zwischen zwei Punkten mit einem " Pen "-Objekt zu zeichnen. Anleitung
1
Öffnen Sie Ihre VB.NET Quelldatei in einem Editor wie z. B. Microsoft Visual Studio.
2
erstellen PictureBox Objekt zu zeichnen , indem Sie auf den folgenden Code innerhalb Ihr "Form" Klassendeklaration :
Privat pictureBox1 As New PictureBox ( )
3
erstellen Unterprogramm die PictureBox initialisieren. Verknüpfen Sie das Paint-Ereignis Unterprogramm indem Sie den folgenden Code in Ihre Form1 Klassendeklaration :
Private Sub Form1_Load (ByVal sender As Object, ByVal e As System.EventArgs ) Handles MyBase.Load
pictureBox1 . Dock = DockStyle.Fill
pictureBox1.BackColor = Color.Black
AddHandler pictureBox1.Paint , AddressOf Me.pictureBox1_Paint
Me.Controls.Add ( pictureBox1 )
End Sub ' Form1_Load
das Unterprogramm setzt die Hintergrundfarbe auf Schwarz . Achten Sie auf die " Form1_Load " Verfahren anderer Stelle im Code , wie in der " Form1 ()" -Konstruktor.
4
erstellen Subroutine , um eine Linie zwischen zwei Punkten mit dem " DrawLine " ziehen rufen Verfahren , indem Sie den folgenden Code in Ihrem Form1 Klassendeklaration :
private Sub pictureBox1_Paint (ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs )
Dim whitePen As New Pen ( Color.White , 2)
Dim point1 Wie New Point (25, 50)
Dim Punkt2 Wie New Point (150, 100)
e.Graphics.DrawLine ( whitePen , point1 , Punkt2 )
End Sub ' pictureBox1_Paint
Die Unterroutine erstellt ein " Pen" -Objekt, das weiß ist und eine Breite von 2 . Es ruft dann die " DrawLine "-Methode , um eine Linie mit dem Stift zwischen den Punkten " 25,50 " und ziehe " 150.100 . "
5
Speichern Sie die Datei VB.NET . Kompilieren und starten Sie das Programm , um die Linie zu zeichnen.