| Frage |
Hallo Freunde,
nach mehrjährigerer Pause musste ich feststellen, dass ich schon alles verlernt habe.
Hier an dem Beispiel komme ich nicht drauf wie ich Pens.Color in einem Sub übertragen kann.
Private Sub KalibrierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KalibrierenToolStripMenuItem.Click
Call PicBoxZeichnen(10, 10, 165, 165, Color.Blue)
End Sub
Private Sub PicBoxZeichnen(XStart As Integer, YStart As Integer, XEnd As Integer, YEnd As Integer, Farbe As Color)
Dim g As Graphics = PictureBox1.CreateGraphics()
g.DrawLine(Pens.Farbe, XStart, YStart, XEnd, YEnd)
End Sub
Es kommt der Fehler: "Farbe" ist kein Member von "Pens"
Viele Grüße
|
Zum Seitenanfang