下繪一橫紅線 ( 資料來源 )
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim g As Graphics = e.Graphics
Dim redpen As Pen = New Pen(Color.Red, 3)
g.DrawLine(redpen, 0, 90, 285, 90)
End Sub
顏色可參考下
沒有留言:
張貼留言