Dessin en ligne vb.net

Je suis en train d'utiliser le code suivant dans un bouton. Je veux l'appeler DrawLineFloat. J'ai essayé d'appeler DrawLineFloat() mais cela n'a pas fonctionné. De quoi ai-je besoin d'entrer dans ()?

Grâce

 Public Sub DrawLineFloat(ByVal e As PaintEventArgs)
    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)
    ' Create coordinates of points that define line.
    Dim x1 As Single = 100.0F
    Dim y1 As Single = 100.0F
    Dim x2 As Single = 500.0F
    Dim y2 As Single = 100.0F
    ' Draw line to screen.
    e.Graphics.DrawLine(blackPen, x1, y1, x2, y2)
End Sub
  • "Il n'a pas de travail", a-t-il une erreur, ou n'était rien en tirer? Avez-vous vérifié que la fonction exécutée (c'est à dire l'intensification à travers elle)?
  • vous devez passer les paramètres dans l' ()...
InformationsquelleAutor Furqan Sehgal | 2012-03-08
  1. 4

    Je suppose que vous êtes à l'appel de cette l'intérieur d'une forme, mais pas dans la Peinture de l'événement.
    Donc, vous avez besoin pour créer les Graphiques utilisés pour tracer votre ligne 

        Public Sub DrawLineFloat() 
        ' Create pen. 
        Dim blackPen As New Pen(Color.Black, 3) 
        ' Create coordinates of points that define line. 
        Dim x1 As Single = 100.0F 
        Dim y1 As Single = 100.0F 
        Dim x2 As Single = 500.0F 
        Dim y2 As Single = 100.0F 
        ' Draw line to screen. 

        Dim g As Graphics = Me.CreateGraphics()
        g.DrawLine(blackPen, x1, y1, x2, y2) 

        blackPen.Dispose()

End Sub

    Également de noter que la Plume de l'objet doivent être éliminés dès que possible

    InformationsquelleAutor Steve
  2. 0

    Pourquoi ne pas écrire comme

    Public Sub DrawLine()
    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)
    ' Create coordinates of points that define line.
    Dim x1 As Single = 100.0F
    Dim y1 As Single = 100.0F
    Dim x2 As Single = 500.0F
    Dim y2 As Single = 100.0F
    ' Draw line to screen.
    e.Graphics.DrawLine(blackPen, x1, y1, x2, y2)
End Sub

    et de l'appeler comme

    DrawLine()
    • Il dit que e n'est pas déclaré
    InformationsquelleAutor PraveenVenu
  3. -1

    essayer de passer la valeur null (Nothning en VB) pour la fonction.

    DrawLineFloat(Nothing)
    InformationsquelleAutor Dipesh Bhatt