Tracer une ligne

Question

Salut
j'utilise vb2008
 j'ai écrit une sub qui trace une line à l'intérieur d'un 
 picture box de haut à gauche jusqu'en bas à droite
  Private Sub drawline()
        Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Green)
        Dim formGraphics As System.Drawing.Graphics

        formGraphics = Me.mybox.CreateGraphics()
        myPen.Width = 3
        formGraphics.DrawLine(myPen, 0, 0, mybox.Size.Width, mybox.Size.Height)
        myPen.Dispose()
        formGraphics.Dispose()
        
    End Sub

la question où je dois appeler "drawline" pour que la ligne tracée apparait quand le programme est exécuté
merci

mdevaux62 · Answer

Bonjour

[i]Où dois-je appeler "drawline" pour que la ligne tracée apparait quand le programme est exécuté.
D/ians l'évènement Paint de la pictureBox :


 Private Sub myBox_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles myBox.Paint
        Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Green)
        myPen.Width = 3
        e.Graphics.DrawLine(myPen, 0, 0, myBox.Size.Width, myBox.Size.Height)
        myPen.Dispose()
    End Sub

cs_ShayW · Answer

Merci...

Tracer une ligne

2 réponses

Votre réponse

Discussions similaires