. Disegno di linee in Visual Basic NET ( VB.NET ) è un concetto importante da capire quando si impara come lavorare con gli oggetti PictureBox e la classe Graphics . VB.NE , che è un linguaggio di programmazione orientato agli oggetti , utilizza il framework . NET ed è il successore del linguaggio Visual Basic . Per utilizzare il metodo " DrawLine " , in primo luogo creare un oggetto " PictureBox " , inizializzare e quindi chiamare il metodo " DrawLine " per tracciare una linea tra due punti di un oggetto " Pen " . Istruzioni
1
Aprire il file sorgente VB.NET in un editor come Microsoft Visual Studio .
2
Creare un oggetto PictureBox di attingere aggiungendo il seguente codice all'interno il tuo "Form" dichiarazione di classe :
pictureBox1 privato As New PictureBox ( )
3
Creare una subroutine per inizializzare la PictureBox . Collegare la subroutine evento Paint aggiungendo il seguente codice all'interno dichiarazione di classe del tuo Form1 :
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 ) per
End Sub ' Form1_Load
la subroutine imposta lo sfondo di nero . Assicurarsi di chiamare il metodo " Form1_Load " altrove nel codice , come ad esempio nel " Form1 ()" costruttore .
4
Creare una subroutine per tracciare una linea tra due punti con il " DrawLine " metodo aggiungendo il seguente codice all'interno di dichiarazione di classe del tuo Form1 :
private Sub pictureBox1_Paint ( ByVal sender As Object , ByVal e As System.Windows.Forms.PaintEventArgs ) per
Dim whitePen As New Pen ( Color.White , 2 ) per
Dim point1 As New Point ( 25 , 50 ) per
Dim punto2 As New Point ( 150 , 100 ) per
e.Graphics.DrawLine ( whitePen , punto 1 , punto 2 ) per
End Sub ' pictureBox1_Paint
La subroutine crea un oggetto " penna " che è bianco e ha una larghezza di 2 . Chiama quindi il metodo " DrawLine " per disegnare una linea con la penna tra i punti " 25,50 " e " 150.100 ".
5
Salvare il file VB.NET . Compilare ed eseguire il programma per disegnare la linea .