版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
1、工程應(yīng)用培訓(xùn)教材VisualBasic6.0程序員培訓(xùn)教程60第八第八節(jié)繪圖繪圖應(yīng)用背景用背景在自動化系統(tǒng)的應(yīng)用程序中適當(dāng)加進(jìn)些圖形和動畫常??梢栽黾映绦虻镊攘?,能夠更加直接反映系統(tǒng)狀態(tài)的變化,使程序多姿多彩。利用VB提供的有關(guān)圖形顯示控件和繪圖方法可以很容易地完成各種圖形編程工作,若將它們靈活地加以應(yīng)用,就能夠完成我們的設(shè)計(jì)任務(wù)。例如需要顯示氧化鋁回轉(zhuǎn)窯壁溫度分布的變化趨勢,需要以不同的色彩明暗代表溫度值,參見圖71為回轉(zhuǎn)窯外壁溫度分
2、布趨勢。圖71六臺回轉(zhuǎn)窯外壁溫度分布趨勢知識要點(diǎn)要點(diǎn)(1)繪圖板VB的圖畫框控件Picture,還有窗體Fm,都可以作為來繪圖板。VB提供了自己的坐標(biāo)系,左上角為原點(diǎn)(0,0),往右為X方向,向下為Y方向。我們在窗體上畫了一個圖畫框Picture1,寬度和高度的值是以系統(tǒng)默認(rèn)的單位給出的,相應(yīng)的坐標(biāo)也是同樣的。在實(shí)際中,我們往往需要確定自己的坐標(biāo)單位這就需要坐標(biāo)轉(zhuǎn)換。Picture控件提供了Scalewidth和Scaleheight兩
3、個屬性幫助我們重建坐標(biāo)系。例如,需要圖畫框Picture1的寬度為20,高度也為20,怎么辦呢?你只要在程序中加入:工程應(yīng)用培訓(xùn)教材VisualBasic6.0程序員培訓(xùn)教程62[B]可選的。如果包括,則利用對角坐標(biāo)畫出矩形。[F]可選的。如果使用了B選項(xiàng),則F選項(xiàng)規(guī)定矩形以矩形邊框的顏色填充,B與F必須同時使用。畫圓:Circle[Step](xy)radius[col](xy)參數(shù)是圓心的坐標(biāo),radius參數(shù)是圓的半徑[col]為
4、畫圓的指定色彩。例如,下面語句將畫出一個以(55)為圓心、10為半徑的圓:Picture1.Circle(55)10應(yīng)用舉例:例:例1:編寫程序,在窗體Fm1的Picture1繪圖控件上同時繪制y=sin(x),y=cos(x)曲線其中x在0到10弧度范圍內(nèi)。1創(chuàng)建一個標(biāo)準(zhǔn)exe的工程1,在工程的窗體上增加PictureBox控件Picture1,增加模塊Module1。2在模塊Module1增加函數(shù)drawcurve(picAsPic
5、tureBox)代碼如下:PublicSubdrawcurve(picAsPictureBox)DimiAsSingleDimsAsSingleDimoxoyAsSinglepic.ScaleHeight=2pic.ScaleWidth=12ox=2:oy=1pic.DrawMode=13pic.DrawStyle=0pic.DrawWidth=1drawaxisofxypic.Line(01)(12oy)vbBluepic.Line(
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
評論
0/150
提交評論