vb點虐 2010中如何在窗口中建立畫布

'繪制圖形的三步曲

成都創(chuàng)新互聯(lián)公司擁有十年成都網(wǎng)站建設工作經(jīng)驗,為各大企業(yè)提供成都網(wǎng)站設計、成都網(wǎng)站建設服務，對于網(wǎng)頁設計、PC網(wǎng)站建設（電腦版網(wǎng)站建設）、成都APP應用開發(fā)、wap網(wǎng)站建設（手機版網(wǎng)站建設）、程序開發(fā)、網(wǎng)站優(yōu)化（SEO優(yōu)化）、微網(wǎng)站、域名注冊等，憑借多年來在互聯(lián)網(wǎng)的打拼，我們在互聯(lián)網(wǎng)網(wǎng)站建設行業(yè)積累了很多網(wǎng)站制作、網(wǎng)站設計、網(wǎng)絡營銷經(jīng)驗，集策劃、開發(fā)、設計、營銷、管理等網(wǎng)站化運作于一體，具備承接各種規(guī)模類型的網(wǎng)站建設項目的能力。

'1，獲得一個Graphics對象

Dim MyGraphics As Graphics

MyGraphics = Me.CreateGraphics

'2，定義一個Pen對象，用于繪制圖形（輪廓線）

Dim MyPen As New Pen(Color.Black)

'3，定義一個Brush對象，用于填充圖形（如果需要填充的話）

Dim MyBrush As New SolidBrush(Color.Orange)

MyGraphics.FillEllipse(MyBrush, 200, 200, 100, 100) '繪制一個實心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃的矩形區(qū)域內(nèi)

MyGraphics.DrawEllipse(MyPen, 200, 200, 100, 100) '繪制一個空心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃的矩形區(qū)域內(nèi)

vb點虐 中如何把picturebox定義為畫布

定義一個畫布，來源于picturebox

Dim?huabu?As?Graphics

huabu?=?picturebox.CreateGraphics

使用的時候還需要定義畫筆

Dim?pen?As?New?Pen(Brushes.Black,?1)

然后就可以畫圖了

huabu.DrawLine(pen,?0,?0,?10,?10)

更多的關(guān)于繪圖和坐標變換的東西可以參考

為什么VB點虐 2005使用paint事件沒效果？

Paint事件是在控件需要重畫時發(fā)生，就比如說窗體的Paint事件，只要窗體被其他窗口覆蓋后又被重新顯示時就會觸發(fā)Paint事件

沒有看到其他代碼，暫無法判斷哪里有問題

希望回答對你有幫助