[VB.NET]Drawing繪圖

2012-02-09

6839
0
VB.NET
2013-12-12

有人問到要做折線圖，要用程式繪製，爬了一下文，用WindowsForm做個簡單的範例提供參考

Imports System.Drawing '匯入命名空間
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim gra As Graphics = CreateGraphics() '建立畫布
        Dim pen As New Pen(Color.Red, 1) '建立一支畫筆
        gra.DrawLine(pen, 50, 70, 100, 100)
        gra.DrawLine(pen, 100, 100, 150, 60)
        gra.DrawLine(pen, 150, 60, 200, 100)
        pen.Dispose()
        gra.Dispose()
     End Sub 
End Class

這裡可查閱Graphics類別的相關方法

不只畫直線還可以畫其他的圖

http://msdn.microsoft.com/zh-tw/library/system.drawing.graphics_methods(v=vs.90).aspx

回首頁