WINCE 中 VBNET 或C# 怎样在窗体上画线

[帮帮你我她]

WINCE 中 VBNET 或 C# 怎样在窗体上画线
请给出例子

[godqu]

想直接在窗体时划线，重写onPaint就行，在onPaint直接用drawLine就可以画了

[帮帮你我她]

只找到下面的可用在WINCE上，楼上的做法，请给出例子好吗？

    Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
        Dim redPen As New Pen(Color.Red, 3)    '红色宽度3
        Dim point1 As New Point(50, 50)
        Dim point2 As New Point(100, 25)
        '  Dim point3 As New Point(200, 5)
        '  Dim point4 As New Point(250, 50)
        '  Dim point5 As New Point(300, 100)
        '  Dim point6 As New Point(350, 200)
        '  Dim point7 As New Point(250, 250)
        '  Dim curvePoints As Point() = {point1, point2, point3, point4,point5, point6, point7}
        Dim curvePoints As Point() = {point1, point2}
        e.Graphics.DrawLines(redPen, curvePoints)
    End Sub

    Private Sub Panel1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
        Dim redPen As New Pen(Color.Red, 3)    '红色宽度3
        Dim point1 As New Point(50, 50)
        Dim point2 As New Point(100, 25)
        Dim curvePoints As Point() = {point1, point2}
        e.Graphics.DrawLines(redPen, curvePoints)
    End Sub

[帮帮你我她]

或者是这样也行

   Private Sub Panel1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
      Dim redPen As New Pen(Color.Red, 3)    '红色宽度3
      e.Graphics.DrawLine(redPen, 50, 50, 100, 25)
    End Sub