下面是VS2005中的壹段代碼。
我。PictureBox1。高度= 450
我。PictureBox1。寬度= 880
“將gr作為圖形顯示”定義了畫布。
“將bp設為新位圖(880，450)”定義位圖並賦值。
暗p為新筆(顏色。'黑色'定義畫筆。
頁（page的縮寫）寬度= 2 '寬度2
p . dash style = drawing 2d . dash style . solid '樣式直線
PictureBox1。圖像= bp
gr =圖形。FromImage(PictureBox1。圖片)
填充矩形(畫筆。白色，新矩形(0，0，PictureBox1。寬度，PictureBox1。高度))
Gr .繪制線(p，a，b，a，.高度-b)'畫縱坐標。
Gr.drawline (p，a，.高度-b，。寬度-a，。height-b)'畫橫坐標。