【文章內(nèi)容簡介】 容器的坐標(biāo)系統(tǒng)可以由 ScaleLeft、 ScaleTop、ScaleHeight、 ScaleWidth來屬性確定。 其中： （ ScaleLeft， ScaleTop）是所繪制的圖形在容器中顯示區(qū)域的左上角坐標(biāo)； （ ScaleLeft+ScaleWidth，ScaleTop+ScaleHeight）是所繪制的圖形在容器中顯示區(qū)域的右下角坐標(biāo)。 系統(tǒng)默認(rèn)（ ScaleLeft， ScaleTop）為（ 0， 0） 原點(diǎn) (0,0) Y 軸 X軸 Top Left 圖 88 坐標(biāo)系 看圖 繪圖 55 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 自定義坐標(biāo)系統(tǒng) 如果用戶使用系統(tǒng)默認(rèn)（ ScaleLeft，ScaleTop）即（ 0， 0）則默認(rèn)坐標(biāo)的原點(diǎn)在容器的左上角。通常我們在繪制圖形時，如希望坐標(biāo)的原點(diǎn)在一個指定的位置，這時用戶可自定義坐標(biāo)系統(tǒng)。 方法一： 利用（ ScaleLeft， ScaleTop）和 （ ScaleLeft+ScaleWidth，ScaleTop+ScaleHeight）屬性定義坐標(biāo)系統(tǒng)，將（ ScaleLeft， ScaleTop）坐標(biāo)平移，坐標(biāo)向右、向上移動為正，坐標(biāo)向左、向下移動為負(fù)。 繪圖 56 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 自定義坐標(biāo)系統(tǒng) 方法二： Scale方法的格式： [對象 .]Scale[(xLeft,yTop)(xRight,yBottom)] 功能：自定義坐標(biāo)系統(tǒng)。 繪圖 57 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 在一窗體上，分別在系統(tǒng)默認(rèn)坐標(biāo)系和用戶自定義坐標(biāo)系中各畫一條起點(diǎn)坐標(biāo)和終點(diǎn)坐標(biāo)都相同的線段，觀察在不同坐標(biāo)系統(tǒng)對窗體的大小及在屏幕上的位置是否有影響，同一線段圖形在不同坐標(biāo)系統(tǒng)中的顯示變化。并將指針的坐標(biāo)值顯示在文本框中。 例 87 看圖 繪圖 58 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 繪圖屬性 ， CurrentY屬性 CurrentX， CurrentY屬性給出在容器內(nèi)繪圖時的當(dāng)前橫坐標(biāo)、縱坐標(biāo)，這兩個屬性只能在程序中設(shè)置。 CurrentX， CurrentY屬性格式： [對象 .]CurrentX [= x] [對象 .]CurrentY [= y] 功能：設(shè)置對象的 CurrentX和 CurrentY的值。 繪圖 59 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 DrawWidth屬性用于設(shè)置容器內(nèi)所畫線的寬度或點(diǎn)的大小。 DrawWidth屬性格式： [對象 .]DrawWidth [= Size] 功能：設(shè)置容器輸出的線寬。 其中： Size為數(shù)值表達(dá)式，其范圍從 1 到 32767，該值以像素為單位表示線寬。缺省值為 1，即一個像素寬。 繪圖 60 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 DrawStyle屬性用于設(shè)置容器內(nèi)所畫線的形狀。 AutoRedraw屬性用于設(shè)置和返回對象或控件是否能自動重繪。 若 AutoRedraw屬性值為 True時，使 Form對象或 PictureBox控件的自動重繪有效，否則對象不接受重繪事件（ Paint）。 繪圖 61 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 FillColor指定填充圖案的顏色，默認(rèn)的顏色與對象的 ForeColor相同。 FillStyle屬性指定填充的圖案，共有 8種類型。 FillStyle屬性設(shè)置為 0～ 7時的填充效果 繪圖 62 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 在窗體上點(diǎn)擊鼠標(biāo)左鍵，產(chǎn)生三百根爆炸射線，點(diǎn)擊鼠標(biāo)右鍵，清除打印圖形，在窗體上輸入當(dāng)前坐標(biāo)的屬性值。 例 61 繪圖 63 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 通過改變 DrawStyle屬性值，在窗體上帶出不同的線型，通過改變 DrawWidth屬性值畫一系列寬度遞增的直線。 例 62 繪圖 64 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 演示顏色的漸變過程。 例 63 繪圖 65 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 1. Line 方法 用 Line方法能夠在容器內(nèi)畫出一個線段，或一個矩形。 Line方法格式如下： [對象名 .] Line [[Step](X1， Y1)]－ (X2， Y2)[,顏色 ][,B[F]] 功能：在由 [對象名 .]指定的容器內(nèi)，在坐標(biāo)系中以（ X1， Y1）為起點(diǎn)，（ X2， Y2）為終點(diǎn)畫一個線段，或一個矩形。 繪圖 66 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 Line 方法 注意事項(xiàng)： （ 1） [,B[F]]： B表示畫矩形， F表示用畫矩形的顏色來填充矩形。 （ 2） [Step]：從當(dāng)前坐標(biāo)移動相應(yīng)的步長后所得的點(diǎn)為畫線起點(diǎn)。 （ 3） Line方法中的參數(shù)可根據(jù)實(shí)際選擇取舍，如果舍去的是中間參數(shù)，但參數(shù)的分隔符不能舍去。 繪圖 67 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 用 Line方法在圖片框中畫出指定長和寬構(gòu)成的矩形及矩形塊。要求矩形由四條不同顏色線段連接而成。 例 64 繪圖 68 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 方法 用 Circle方法能夠在容器內(nèi)畫出一個圓、或橢圓、或圓弧 ， 或扇形。 Circle方法格式如下： [對象名 .] Circle [ [Step] （ X， Y） , 半徑 [,顏色 ][,起始角 ] [,終止角 ][,長短軸比率 ]]] 功能：在由 [對象名 .]指定的容器內(nèi)，在坐標(biāo)系中以（ X， Y）為圓心畫圓、或橢圓、或圓弧，或扇形。 繪圖 69 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 方法 注意事項(xiàng)： （ 1）（ X， Y）：為圓心坐標(biāo)。 （ 2）半徑：為圓的半徑。 （ 3） [,起始角 ]和 [,終止角 ]：可控制畫圓弧和扇形。 （ 4） [,長短軸比率 ]：可控制畫圓還是橢圓，默認(rèn)值為 1，畫圓。 繪圖 70 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 在窗體的 4個文本框中輸出班級里優(yōu)、良、及格和不及格的人數(shù)，計算所占的百分比，然后分別用不同的顏色繪制出橢圓的餅圖。 例 65 繪圖 71 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 3. Pset 方法 用 APset方法能夠在容器內(nèi)畫出一個點(diǎn)。 Pset方法格式如下： [對象名 .]Pset （ X， Y） [，顏色 ] 功能：在由 [對象名 .]指定的容器內(nèi)，在坐標(biāo)為（ X， Y）的位置上畫一個點(diǎn)；若缺省 [對象名 .]則在窗體上，且坐標(biāo)為（ X， Y）的位置上畫一個點(diǎn)。 繪圖 72 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 用 Pset方法繪制阿基米德螺線 。 例 66 繪圖 73 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 4. PrintPicture方法 格式如下： [Object.] PaintPicture 圖片 ,x1,y1 [,寬度 1,[高度 1,x2[,y2 [,寬度 2[,高度 2]]]]] 功能： PrintPicture方法用于在窗體、圖片框和打印機(jī)上繪制出圖形文件的內(nèi)容，圖形文件類型包括 .bmp、 .wmf、 .emf、 .cur和 .ico等。 繪圖 74 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 PrintPicture方法 說明 ⑴ Object指目標(biāo)對象 ,可以是窗體、圖片框或打印機(jī) ⑵ 圖片指源圖文件。 ⑶ x y1指在目標(biāo)對象上繪制圖片的左上角坐標(biāo)(x,y) ⑷ 寬度 高度 1是目標(biāo)對象繪圖的寬度和高度。 ⑸ x y2指源圖片內(nèi)剪貼區(qū)的左上角坐標(biāo)，默認(rèn)為 (0， 0)。 ⑹ 寬度 高度 2指源圖片內(nèi)剪貼區(qū)的寬度和高度，默認(rèn)為整個圖片的寬度或高度。 繪圖 75 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 用鼠標(biāo)在 Picture1中拖放選擇部分區(qū)域，再點(diǎn)擊放大按鈕，在 picture2中將選擇的部分放大顯示。 例 67 繪圖 76 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 格式： [Object.] Point (x,y) 功能： Point方法用于獲取窗體上或圖片框中指定點(diǎn)的 RGB顏色。 說明： Object指獲取顏色點(diǎn)所在的目標(biāo)對象，(x,y)為對象中某個像素的位置坐標(biāo)。 Point方法返回值為長整型，如果由 (x,y)坐標(biāo)指定的點(diǎn)在 Object對象外面，則 Point方法返回值為 1。 繪圖 77 第六章 鍵盤、鼠標(biāo)與繪圖 遼寧科技大學(xué) Visual Basic 程序設(shè)計 教學(xué)課件 ③ 20222 1. 繪圖操作基礎(chǔ) 性與事件 將圖片框的圖像進(jìn)行反轉(zhuǎn)顯示。 例 68 繪圖 78 第六章