8繪圖

1、工程應用培訓教材VisualBasic6.0程序員培訓教程６０第八第八節(jié)繪圖繪圖應用背景用背景在自動化系統(tǒng)的應用程序中適當加進些圖形和動畫常常可以增加程序的魅力，能夠更加直接反映系統(tǒng)狀態(tài)的變化，使程序多姿多彩。利用VB提供的有關圖形顯示控件和繪圖方法可以很容易地完成各種圖形編程工作，若將它們靈活地加以應用，就能夠完成我們的設計任務。例如需要顯示氧化鋁回轉窯壁溫度分布的變化趨勢，需要以不同的色彩明暗代表溫度值，參見圖71為回轉窯外壁溫度分

2、布趨勢。圖71六臺回轉窯外壁溫度分布趨勢知識要點要點(1)繪圖板VB的圖畫框控件Picture，還有窗體Fm，都可以作為來繪圖板。VB提供了自己的坐標系，左上角為原點（0，0），往右為X方向，向下為Y方向。我們在窗體上畫了一個圖畫框Picture1，寬度和高度的值是以系統(tǒng)默認的單位給出的，相應的坐標也是同樣的。在實際中，我們往往需要確定自己的坐標單位這就需要坐標轉換。Picture控件提供了Scalewidth和Scaleheight兩

3、個屬性幫助我們重建坐標系。例如，需要圖畫框Picture1的寬度為20，高度也為20，怎么辦呢？你只要在程序中加入：工程應用培訓教材VisualBasic6.0程序員培訓教程６２[B]可選的。如果包括，則利用對角坐標畫出矩形。[F]可選的。如果使用了B選項，則F選項規(guī)定矩形以矩形邊框的顏色填充，B與F必須同時使用。畫圓：Circle[Step](xy)radius[col](xy)參數是圓心的坐標，radius參數是圓的半徑[col]為

4、畫圓的指定色彩。例如，下面語句將畫出一個以(55)為圓心、10為半徑的圓：Picture1.Circle(55)10應用舉例：例：例1：編寫程序，在窗體Fm1的Picture1繪圖控件上同時繪制y=sin(x)，y=cos(x)曲線其中x在0到10弧度范圍內。1創(chuàng)建一個標準exe的工程1，在工程的窗體上增加PictureBox控件Picture1，增加模塊Module1。2在模塊Module1增加函數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(