VisualBasic程序設計項目化教程 項目12 繪制數(shù)學函數(shù)圖像

《VisualBasic程序設計項目化教程 項目12 繪制數(shù)學函數(shù)圖像》由會員分享，可在線閱讀，更多相關《VisualBasic程序設計項目化教程 項目12 繪制數(shù)學函數(shù)圖像（41頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社Visual Basic 程序設計項目化教程n主編主編 管小清管小清 郭賀彬郭賀彬VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社項目十二項目十二 繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像n項目目標：項目目標：n本項目利用本項目利用VB提供的函數(shù)來繪制典型的數(shù)學函數(shù)圖像，提供的函數(shù)來繪制典型的數(shù)學函數(shù)圖像，包括正弦函數(shù)圖像、余弦函數(shù)圖像和擺線；熟練使用包括正弦函數(shù)圖像、余弦函數(shù)圖像和擺線；熟練使用PictureBox控件以及菜單編輯器進行界面設計，掌握控件以及菜單編輯器進行界面設計，掌握在在

2、PictureBox中輸出文本以及圖形的方法，掌握中輸出文本以及圖形的方法，掌握Line（）函數(shù)，（）函數(shù)，Pset（）函數(shù)，（）函數(shù)，RGB（）函數(shù)的使用方法，（）函數(shù)的使用方法，通過本項目的學習可以使得學習者掌握通過本項目的學習可以使得學習者掌握VB的繪圖方法的繪圖方法和菜單的設計與制作方法。和菜單的設計與制作方法。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社項目十二項目十二 繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像n項目主要知識點：項目主要知識點：n1、圖片框（、圖片框（PictureBox）的使用）的使用圖片框：圖片框：PictureBox圖像框：圖像框：I

3、magen2、Line函數(shù)的使用函數(shù)的使用功能：繪制直線或矩形功能：繪制直線或矩形語法格式以及參數(shù)的含義語法格式以及參數(shù)的含義n3、菜單編輯器的使用、菜單編輯器的使用下拉式菜單下拉式菜單彈出式菜單彈出式菜單分隔菜單項和快捷鍵分隔菜單項和快捷鍵VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社項目十二項目十二 繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像n4、在圖片框中輸出文本與圖形的方法、在圖片框中輸出文本與圖形的方法 n5、Pset（）函數(shù)的使用（）函數(shù)的使用n語法格式及參數(shù)含義語法格式及參數(shù)含義n6、RGB（）函數(shù)的使用（）函數(shù)的使用n語法格式及參數(shù)含義語法格式及參數(shù)含義

4、n7、窗體的、窗體的Pain事件方法事件方法n8、測試程序，完善程序的能力、測試程序，完善程序的能力VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社項目十二項目十二 繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像n項目實施步驟：項目實施步驟：n閱讀相關基礎知識閱讀相關基礎知識n界面設計界面設計n編程實現(xiàn)坐標系的繪制程序設計編程實現(xiàn)坐標系的繪制程序設計n編寫三角函數(shù)菜單中的事件過程編寫三角函數(shù)菜單中的事件過程n編寫擺線菜單的事件過程編寫擺線菜單的事件過程n程序測試，進行功能完善程序測試，進行功能完善n程序打包，生成可執(zhí)行文件程序打包，生成可執(zhí)行文件EXEVBVB程序設計項目化教

5、程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1 第第1步：基礎知識步：基礎知識n12.1.1 圖片框（圖片框（PictureBox）和圖像框（）和圖像框（Image）n圖片框（圖片框（PictureBox）和圖像框（和圖像框（Image）圖片框控件和圖片框控件和圖像框控件都具有顯示圖形（圖像）的功能。在窗體上添加圖片圖像框控件都具有顯示圖形（圖像）的功能。在窗體上添加圖片框（框（PictureBox）控件和圖像框（）控件和圖像框（Image）控件，可實現(xiàn)在窗口）控件，可實現(xiàn)在窗口中所需位置顯示圖像的目的?？杉虞d到這兩個控件上的圖像文件中所需位置顯示圖像的目的。可加載到這兩個控

6、件上的圖像文件格式有：位圖（格式有：位圖（.bmp、.dib、.cur）、圖標（）、圖標（.ico）、圖元文件）、圖元文件（.wmf）、增強型圖元文件（）、增強型圖元文件（.emf）、）、JPEG或或GIF文件。文件。n這兩個控件圖像的加載是通過給這兩個控件圖像的加載是通過給Picture屬性設置裝載的圖形來實屬性設置裝載的圖形來實現(xiàn)的，具體的主要屬性設置如下表所示（兩個控件的屬性基本一現(xiàn)的，具體的主要屬性設置如下表所示（兩個控件的屬性基本一致）：致）：VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1 第第1步：基礎知識步：基礎知識n表表12-1 圖片框

7、和圖像框的屬性列表圖片框和圖像框的屬性列表屬性屬性所屬控件所屬控件說明說明NameImage PictureBox設置控件的名稱EnabledImage PictureBoxTrue/False 是否對控件產生響應PictureImage PictureBox設置控件對象要顯示的圖形和圖像StretchImageTrue/False 是否可以拉伸圖形以適應控件的大小AutoSizePictureBoxTrue/False設置控件的大小是否自動調整VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.2 Line（）函數(shù)（）函數(shù)n Line函數(shù)畫線方法的主要功

8、能實在窗體或控件的指定位置處繪制直線或者矩形等。函數(shù)畫線方法的主要功能實在窗體或控件的指定位置處繪制直線或者矩形等。n 語法格式：語法格式：n.LineStep()-Step(,顏色顏色),BFn 說明：說明：n 對象名對象名指窗體、圖片框等對象名，若缺省對象名，則在活動窗體上畫線或者矩形。指窗體、圖片框等對象名，若缺省對象名，則在活動窗體上畫線或者矩形。n（x1,y1）直線起點或者矩形左上角坐標。如果缺省，直線或矩形左上角坐標為直線起點或者矩形左上角坐標。如果缺省，直線或矩形左上角坐標為（CuttentX,CurrentY）。）。n（x2,y2）直線終點或者右下角坐標。該參數(shù)不能缺省。直線終

9、點或者右下角坐標。該參數(shù)不能缺省。n 顏色顏色指定畫線或矩形邊的顏色。如果缺省該參數(shù)，則使用該對象的前景顏色畫線。指定畫線或矩形邊的顏色。如果缺省該參數(shù)，則使用該對象的前景顏色畫線。n B盒子（盒子（Box）之意，表示用）之意，表示用Line方法畫矩形。此時，（方法畫矩形。此時，（x1,y1）和（）和（x2.y2）或他們的）或他們的變形為矩形左上角和右下角坐標。變形為矩形左上角和右下角坐標。n F可選項。若選用，必須與可選項。若選用，必須與B參數(shù)連用，用于指定畫矩形邊框時所用顏色來填充矩形區(qū)域。參數(shù)連用，用于指定畫矩形邊框時所用顏色來填充矩形區(qū)域。若畫矩形時缺省此參數(shù)，則用當前的填充色（由若畫

10、矩形時缺省此參數(shù)，則用當前的填充色（由FillColor指定）和填充樣式（由指定）和填充樣式（由FillStyle）VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.2 Line（）函數(shù)（）函數(shù)n其中其中FillStyle的取值和屬性的意義如下表：的取值和屬性的意義如下表：n 表表12-2 FillStyle屬性值的不同意義屬性值的不同意義FillStyle的屬的屬性值性值填充樣式填充樣式0以FillColor屬性指定的顏色填充1透明線（默認值）2水平線3垂直線4斜向上對角線5斜向下對角線6水平交叉線7對角交叉線VBVB程序設計項目化教程程序設計項目化教

11、程中國水利水電出版社中國水利水電出版社12.1.3 Pset（）函數(shù)函數(shù)n畫點方法的功能實在窗體或控件的指定位置處繪制一個像素點。畫點方法的功能實在窗體或控件的指定位置處繪制一個像素點。n 語法格式：語法格式：n.Pset Step(x,y),n對象名對象名指窗體、圖片框等對象名，若缺省對象名，則在活動指窗體、圖片框等對象名，若缺省對象名，則在活動窗體上畫點。窗體上畫點。n（x,y）指定畫點的坐標位置。指定畫點的坐標位置。x,y必須是單精度數(shù)，可以是必須是單精度數(shù)，可以是小數(shù)、數(shù)值表達式或者常量。小數(shù)、數(shù)值表達式或者常量。n 顏色顏色可選項。缺省時畫點選用由可選項。缺省時畫點選用由ForeCo

12、lor設置的當前前景設置的當前前景顏色。顏色。nStep可選項。選用該參數(shù)時，可選項。選用該參數(shù)時，x,y是在當前光標所在點坐標的是在當前光標所在點坐標的基礎上的增量?；A上的增量。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.4 RGB()函數(shù)函數(shù)n用來設置顏色的函數(shù)，格式為：用來設置顏色的函數(shù)，格式為：n RGB（R,G,B）分別代表）分別代表R紅色，紅色，G代表綠色，代表綠色，B代表藍色；每種顏色的取值范圍是代表藍色；每種顏色的取值范圍是0255；三種顏色的；三種顏色的不同值形成新的顏色。例如：不同值形成新的顏色。例如：n Form1.Fore

13、color=RGB(125,56,79)VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n 1、菜單分類：、菜單分類：o下拉式菜單：窗口的頂部有一個主菜單，稱為菜單欄。單擊菜單欄的某一個下拉式菜單：窗口的頂部有一個主菜單，稱為菜單欄。單擊菜單欄的某一個菜單項，打開一個包含菜單項的列表（子菜單）。菜單欄中的選項稱為菜單菜單項，打開一個包含菜單項的列表（子菜單）。菜單欄中的選項稱為菜單標題。彈出的子菜單列表中包含命令、分隔條和子菜單標題（右邊有三角記標題。彈出的子菜單列表中包含命令、分隔條和子菜單標題（右邊有三角記號的菜單項）。號的菜單項）。o

14、彈出式菜單：用鼠標指向某一個對象（或空白區(qū)域），單機鼠標右鍵彈出的彈出式菜單：用鼠標指向某一個對象（或空白區(qū)域），單機鼠標右鍵彈出的菜單成為彈出式菜單，或稱為菜單成為彈出式菜單，或稱為“快捷菜單快捷菜單”、“上下文相關菜單上下文相關菜單”。與下列。與下列式菜單的區(qū)別是：位置上不同，彈出式菜單顯示位置會自動調整在合適處。式菜單的區(qū)別是：位置上不同，彈出式菜單顯示位置會自動調整在合適處。n 2、菜單編輯器的使用、菜單編輯器的使用n VB的菜單也是一個控件，但菜單控件不在工具箱中。的菜單也是一個控件，但菜單控件不在工具箱中。VB的菜單控件的菜單控件也具有外觀和行為的屬性。所以也需要定義其屬性，但不是

15、在屬性窗口也具有外觀和行為的屬性。所以也需要定義其屬性，但不是在屬性窗口中設置屬性值，而是在菜單編輯器窗口中設置的。中設置屬性值，而是在菜單編輯器窗口中設置的。n 菜單控件只能出發(fā)菜單控件只能出發(fā)Click事件。菜單設計是在事件。菜單設計是在“菜單編輯器菜單編輯器”中進行的。中進行的?！安藛尉庉嬈鞑藛尉庉嬈鳌笨捎脕韯?chuàng)建菜單欄，也可以用來修改已存在的菜單。打可用來創(chuàng)建菜單欄，也可以用來修改已存在的菜單。打開菜單編輯器有兩種方法：開菜單編輯器有兩種方法：VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n選擇選擇【工具工具】下拉菜單中的下拉菜單中

16、的“菜單編輯器菜單編輯器”選項（如圖選項（如圖12-1所示）。所示）。圖12-1“工具”菜單中的“菜單編輯器”VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n單擊工具欄中的單擊工具欄中的“”圖標，即圖標，即“菜單編輯器菜單編輯器”按鈕，圖標按鈕，圖標位于工具欄上的方框部分，如圖位于工具欄上的方框部分，如圖12-2所示。所示。圖12-2 工具欄中的“菜單編輯器 VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n設置菜單控件的屬性：設置菜單控件的屬性：“菜單編輯器菜單編輯器”標題欄下方的區(qū)

17、域是屬性區(qū)，屬性區(qū)中的各個文本框標題欄下方的區(qū)域是屬性區(qū)，屬性區(qū)中的各個文本框用來設置菜單控件的屬性，如：標題，名稱，快捷鍵等，如圖用來設置菜單控件的屬性，如：標題，名稱，快捷鍵等，如圖12-3所示。其主要屬性如表所示。其主要屬性如表12-3所示：所示：圖12-3 菜單編輯器VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n表表12-3 菜單編輯器中各參數(shù)的含義菜單編輯器中各參數(shù)的含義屬屬 性性說說 明明標題（Caption）顯示在菜單控件上的字符。即菜單項名，如“文件”等名稱（Name）在程序代碼中引用菜單控件時使用的名稱索引（Index

18、）菜單控件可以利用索引來建立數(shù)組，并以索引值來識別數(shù)組中的不同成員，但它不會自動為用戶建立索引值?？旖萱I（Shortcut）設置菜單的快捷鍵復選（Checked）該屬性為True（選中）時在菜單項的前面出現(xiàn)一個“”標記，表示該項目前處于活動狀態(tài)。有效（Enabled）該屬性為False（未選中）時，對應的菜單項呈現(xiàn)灰色，表示當前不可用?？梢姡╒isible）該屬性為False（未選中）時，對應的菜單項不可見幫助上下文ID在HelpFile 屬性指定的幫助文件中用該數(shù)值查找適當?shù)膸椭畔?。協(xié)調位置允許選擇菜單的NegotiatePosition屬性，該屬性決定是否以及如何在容器窗體中。VBVB程

19、序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n菜單屬性區(qū)的下方是菜單編輯區(qū)。編輯區(qū)上方有菜單屬性區(qū)的下方是菜單編輯區(qū)。編輯區(qū)上方有7個控制按鈕，編輯菜單要借助它。個控制按鈕，編輯菜單要借助它。n左、右箭頭按鈕：調整菜單項的級別（主菜單還是子菜單）。通過這兩個鍵，告左、右箭頭按鈕：調整菜單項的級別（主菜單還是子菜單）。通過這兩個鍵，告訴系統(tǒng)所設計的菜單時主菜單還是子菜單。若菜單項前面沒有內縮符號訴系統(tǒng)所設計的菜單時主菜單還是子菜單。若菜單項前面沒有內縮符號“”，則表示該菜單項是主菜單項；若菜單項前面有一個內縮符號則表示該菜單項是主菜單項；若菜單項前

20、面有一個內縮符號“”，則表示該菜，則表示該菜單項是子菜單項（前一個菜單項的子菜單）；每增加一個內縮符號單項是子菜單項（前一個菜單項的子菜單）；每增加一個內縮符號“”，相應，相應的菜單級別向下一級。單擊一次右箭頭增加一個內縮符號的菜單級別向下一級。單擊一次右箭頭增加一個內縮符號“”，單擊一次左箭，單擊一次左箭頭刪除一個內縮符號頭刪除一個內縮符號“”。n上下箭頭按鈕：是把當前位置的菜單項進行上下位置的調整。上下箭頭按鈕：是把當前位置的菜單項進行上下位置的調整。n下一個：向后選定一個菜單控件，到了最后一個菜單項后單擊該按鈕，將增加一下一個：向后選定一個菜單控件，到了最后一個菜單項后單擊該按鈕，將增加

21、一個空白菜單項。個空白菜單項。n插入：在當前位置增加一個菜單項。插入：在當前位置增加一個菜單項。n刪除：刪除當前位置的菜單項。刪除：刪除當前位置的菜單項。n菜單編輯器窗口的空白區(qū)域用來輸入所設計的菜單項，也可以看作是菜單控件的菜單編輯器窗口的空白區(qū)域用來輸入所設計的菜單項，也可以看作是菜單控件的列表框，在其上列出了菜單項名稱，級別和快捷鍵。列表框，在其上列出了菜單項名稱，級別和快捷鍵。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n3、分隔菜單項和快捷鍵、分隔菜單項和快捷鍵n如果菜單項比較多（一般是子菜單項），而且類型比較明顯，可如果菜單

22、項比較多（一般是子菜單項），而且類型比較明顯，可以將同一類型的菜單項連在順序存放，各類型之間用一條水平線以將同一類型的菜單項連在順序存放，各類型之間用一條水平線分隔開。方法是：在菜單中插入一個菜單項，將該菜單項控件的分隔開。方法是：在菜單中插入一個菜單項，將該菜單項控件的“Caption”屬性設置為一個連字符屬性設置為一個連字符“-”即可。即可。n可以為菜單項設置一個快捷鍵，快捷鍵由可以為菜單項設置一個快捷鍵，快捷鍵由Alt鍵和一個指定的字符鍵和一個指定的字符組成。當用戶按下這樣一個組合鍵時，即可選中菜單控件（相當組成。當用戶按下這樣一個組合鍵時，即可選中菜單控件（相當于該菜單項），執(zhí)行相應的

23、操作。設置快捷鍵的方法是：在設置于該菜單項），執(zhí)行相應的操作。設置快捷鍵的方法是：在設置控件的控件的“Caption”屬性時，在希望做快捷鍵的字符上添加一個符屬性時，在希望做快捷鍵的字符上添加一個符號號“&”即可。設置好菜單后的菜單編輯器顯示內容如圖即可。設置好菜單后的菜單編輯器顯示內容如圖12-4所示。所示。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單圖12-4 設計好的菜單編輯器VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單n4、彈出式菜單、彈出式菜單n彈出式菜單時獨立于菜單欄

24、的浮動菜單，它可以顯示在窗體的任何一個地方（根彈出式菜單時獨立于菜單欄的浮動菜單，它可以顯示在窗體的任何一個地方（根據(jù)用戶單擊鼠標右鍵時的坐標動態(tài)地調整顯示位置）。彈出式菜單上的菜單項也據(jù)用戶單擊鼠標右鍵時的坐標動態(tài)地調整顯示位置）。彈出式菜單上的菜單項也取決于單擊鼠標右鍵時光標的位置。取決于單擊鼠標右鍵時光標的位置。n建立彈出式菜單也是在建立彈出式菜單也是在“菜單編輯器菜單編輯器”中完成的。彈出式菜單應至少有一個菜單中完成的。彈出式菜單應至少有一個菜單項。項。n彈出式菜單要用專門的方法來顯示：即彈出式菜單要用專門的方法來顯示：即PopupMenu方法。語法格式為：方法。語法格式為：n窗體名窗

25、體名.PopupMenu，F(xiàn)lags，x,y,BoldCommendn窗體名：指出在哪一個窗體上打開彈出式菜單。若省略，則在當前窗體打開彈出窗體名：指出在哪一個窗體上打開彈出式菜單。若省略，則在當前窗體打開彈出式菜單。式菜單。n菜單名：是指通過菜單名：是指通過“菜單編輯器菜單編輯器”設計出的至少含有一個選項的菜單名稱，即設計出的至少含有一個選項的菜單名稱，即Name屬性值。屬性值。nFlags：位置參數(shù)，是一些常量數(shù)值的設置，包含位置和行為兩個指定值。其中：位置參數(shù)，是一些常量數(shù)值的設置，包含位置和行為兩個指定值。其中：n位置常數(shù)：位置常數(shù)：0（默認）表示菜單的左上角位于（默認）表示菜單的左上

26、角位于x：4表示菜單上框中央位于表示菜單上框中央位于x；8表示表示菜單右上角位于菜單右上角位于x。n行為常數(shù)：行為常數(shù)：0（默認）表示菜單命令只接收右鍵單擊；（默認）表示菜單命令只接收右鍵單擊；2表示菜單命令可接收左、表示菜單命令可接收左、右鍵單擊。右鍵單擊。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.1.5 菜單菜單nBoldCommand：指定菜單中要以粗體字顯示的菜單名稱。：指定菜單中要以粗體字顯示的菜單名稱。注意：因為快捷菜單時單擊鼠標右鍵時彈出來的，所以在程序中應檢測用戶是否單擊了鼠標右鍵。檢測是否單擊鼠標右鍵可用鼠標事件MouseUp或者M

27、ouseDown。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社 12.2第第2步：設計界面步：設計界面n設計界面，并修改相應各控件的屬性設計界面，并修改相應各控件的屬性n添加窗體，修改屬性添加窗體，修改屬性nCaption：數(shù)學函數(shù)圖像：數(shù)學函數(shù)圖像nWidth：8500nHeight：4000n在窗體中添加菜單項，各菜單項如表在窗體中添加菜單項，各菜單項如表12-4所示：所示：VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社 12.2第第2步：設計界面步：設計界面表12-4 項目中的菜單項 標題（標題（Caption）名稱（

28、名稱（Name）索引（索引（Index）說明說明三角函數(shù)sanjiao主菜單項1Sin(x)hs10子菜單項11Cos(x)hs11子菜單項12清除hs12子菜單項12擺線baixian主菜單項2m=1.5m0子菜單項21m=3.0m1子菜單項22m=4.0m2子菜單項23m=5.0m3子菜單項24m=6.0m4子菜單項25清除m5子菜單項26關閉guan主菜單項3VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社 12.2第第2步：設計界面步：設計界面n在窗體上添加圖片框，并修改相應的屬性。在窗體上添加圖片框，并修改相應的屬性。nHeight:8300 Widt

29、h:3600界面設計效果如圖12-5所示：圖12-5 項目界面VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.3 第第3步：編程實現(xiàn)坐標系的繪制步：編程實現(xiàn)坐標系的繪制n 編程思路：數(shù)學函數(shù)圖像必須在固定的坐標系中完成，坐標系的繪制采用編程思路：數(shù)學函數(shù)圖像必須在固定的坐標系中完成，坐標系的繪制采用Line函函數(shù)，分別畫水平和垂直的兩條直線，并用數(shù)，分別畫水平和垂直的兩條直線，并用Line函數(shù)繪制刻度；函數(shù)繪制刻度；n編寫窗體的編寫窗體的Paint事件代碼如下：事件代碼如下：nPrivate Sub Form_Paint()nConst pi=3.1415

30、926n With Picture1 /在在PictureBox控件中繪制坐標系控件中繪制坐標系n .Top=0 n .Left=0n .Width=Me.ScaleWidth /當前的寬度當前的寬度n .Height=Me.ScaleHeight /當前的高度當前的高度n .ScaleMode=6n oldx=.ScaleWidth/2 n oldy=.ScaleHeight/2n .ClsVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.3 第第3步：編程實現(xiàn)坐標系的繪制步：編程實現(xiàn)坐標系的繪制n 畫坐標軸方法如下畫坐標軸方法如下n Picture1.L

31、ine(oldx,0)-(oldx,.ScaleHeight),RGB(255,0,0)/繪制繪制X軸軸n Picture1.Line(0,oldy)-(.ScaleWidth,oldy),RGB(255,0,0)/繪制繪制Y軸軸n End Withn Picture1.CurrentX=oldx 4 /原點的橫坐標原點的橫坐標n Picture1.CurrentY=oldy+0.5 /原點的縱坐標原點的縱坐標n Picture1.Print 0VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.3 第第3步：編程實現(xiàn)坐標系的繪制步：編程實現(xiàn)坐標系的繪制n 畫

32、畫x軸的刻度方法如下軸的刻度方法如下n For xt=-Int(oldx)To Int(oldx)Step 0.5n If xt 0 Thenn st=xt*10*pin Picture1.CurrentX=oldx+st 3 /x軸上刻度值的橫坐標軸上刻度值的橫坐標n Picture1.CurrentY=oldy+0.5/x軸上刻度值的縱坐標軸上刻度值的縱坐標n Picture1.Print xt&/從從Word中插入中插入n Picture1.Line(oldx+st,oldy-1)-(oldx+st,oldy),RGB(255,0,0)/畫畫X軸上的刻度軸上的刻度n End Ifn Ne

33、xt xtVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.3 第第3步：編程實現(xiàn)坐標系的繪制步：編程實現(xiàn)坐標系的繪制n 畫畫y軸的刻度方法如下軸的刻度方法如下n For yt=-5 To 7n If yt 0 Thenn st=yt*10n Picture1.CurrentX=oldx 4 /刻度值的橫坐標刻度值的橫坐標n Picture1.CurrentY=oldy+st 1/刻度值的縱坐標刻度值的縱坐標n Picture1.Print ytn Picture1.Line(oldx,oldy+st)-(oldx+1,oldy+st),RGB(255,0,

34、0)/畫畫Y軸上的刻度軸上的刻度n End IfnNext yt nEnd SubVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.3 第第3步：編程實現(xiàn)坐標系的繪制步：編程實現(xiàn)坐標系的繪制n程序效果如圖程序效果如圖12-6所示：所示：圖12-6 項目中繪制的坐標系VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.4 第第4步：編寫三角函數(shù)菜單中的事件過程步：編寫三角函數(shù)菜單中的事件過程n編程思路：正弦函數(shù)和余弦函數(shù)的繪制則在編程思路：正弦函數(shù)和余弦函數(shù)的繪制則在For循環(huán)結構中利用循環(huán)結構中利用Pset函數(shù)函數(shù)繪制，步長

35、的值盡量取得小一些。繪制，步長的值盡量取得小一些。n 程序代碼如下程序代碼如下nPrivate Sub hs1_Click(Index As Integer)noldx=Picture1.ScaleWidth/2noldy=Picture1.ScaleHeight/2nSelect Case Indexn Case 0 /繪制正弦函數(shù)的方法如下繪制正弦函數(shù)的方法如下n For t=-oldx To oldx Step 0.01n xt=10*tn yt=10*Sin(t)n Picture1.PSet(xt+oldx,oldy-yt),RGB(0,127,127)n Next tVBVB程序設

36、計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.4 第第4步：編寫三角函數(shù)菜單中的事件過程步：編寫三角函數(shù)菜單中的事件過程nCase 1 /繪制余弦函數(shù)的方法如下繪制余弦函數(shù)的方法如下n For t=-oldx To oldx Step 0.01n xt=10*tn yt=10*Cos(t)n Picture1.PSet(xt+oldx,oldy-yt),RGB(0,127,127)n Next tn Case 2 /清除清除n Picture1.Clsn Form_Paint/調用調用Paint事件，重新繪制坐標系事件，重新繪制坐標系n Exit SubnEnd Se

37、lectnEnd SubVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.4 第第4步：編寫三角函數(shù)菜單中的事件過程步：編寫三角函數(shù)菜單中的事件過程n 效果如圖效果如圖12-7所示：所示：圖12-7 正余弦函數(shù)圖像VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.5 第第5步：編寫擺線菜單的事件過程步：編寫擺線菜單的事件過程n 編程思路：通過編程思路：通過a,b的值根據(jù)公式來確立擺線的形狀。的值根據(jù)公式來確立擺線的形狀。n 程序代碼如下：程序代碼如下：nPrivate Sub m_Click(Index As Intege

38、r)n n=Indexn Select Case nn Case 0n a=12:b=8n Case 1n a=12:b=4n Case 2 m取不同的值，取不同的值，a,b 對應的值的變化對應的值的變化n a=12:b=3n Case 3n a=12:b=2.4n Case 4n a=12:b=4VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.5 第第5步：編寫擺線菜單的事件過程步：編寫擺線菜單的事件過程nCase 5 /清除清除n Picture1.Clsn Form_Paintn Exit Subn End Selectn oldx=Picture1

39、.ScaleWidth/2n oldy=Picture1.ScaleHeight/2n For t=0 To 4*3.1415926 Step 0.01n xt=(a+b)*Cos(t)-b*Cos(a+b)*t/b)/根據(jù)公式計算點的橫坐標根據(jù)公式計算點的橫坐標n yt=(a+b)*Sin(t)-b*Sin(a+b)*t/b)/根據(jù)公式計算點的縱坐標根據(jù)公式計算點的縱坐標n Picture1.PSet(xt+oldx,oldy-yt),vbBluen Next tnEnd SubVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.5 第第5步：編寫擺線菜單的

40、事件過程步：編寫擺線菜單的事件過程n程序效果如圖程序效果如圖12-8：圖12-8 擺線圖像注意：內（外）擺線又稱“圓內（外）旋輪線”，是A圓周沿B圓周內（外）部滾動而無滑動時，A圓周上一固定點M所描成的軌跡。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.6 第第6步：編寫關閉菜單程序步：編寫關閉菜單程序n所用語句：所用語句：Unload meVBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.7 第第7步：程序測試，進行功能完善步：程序測試，進行功能完善 n待完善功能包括把擺線的形狀設計的更多一些，不同待完善功能包括把擺

41、線的形狀設計的更多一些，不同的擺線設計不同的顏色和線型以及正余弦函數(shù)顯示的的擺線設計不同的顏色和線型以及正余弦函數(shù)顯示的不同等。不同等。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.8 第第8步：程序打包，生成可執(zhí)行文件步：程序打包，生成可執(zhí)行文件EXEn單擊單擊【文件文件】菜單下的菜單下的“繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像.exe”，選，選擇適當?shù)奈恢帽４嫔傻膿襁m當?shù)奈恢帽４嫔傻膃xe文件，單擊文件，單擊“確定確定”。n當需要再次打開的時候，找到當需要再次打開的時候，找到“繪制數(shù)學函數(shù)圖像繪制數(shù)學函數(shù)圖像.exe”，雙擊運行即可產生正余弦函數(shù)和擺線

42、的圖像。，雙擊運行即可產生正余弦函數(shù)和擺線的圖像。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.8 第第8步：程序打包，生成可執(zhí)行文件步：程序打包，生成可執(zhí)行文件EXEn項目總結：項目總結：n繪制三角函數(shù)的方法：利用繪制三角函數(shù)的方法：利用Pset函數(shù)在循環(huán)結構下反函數(shù)在循環(huán)結構下反復畫點，步長要盡可能的小復畫點，步長要盡可能的小nWith 方法的結構：方法的結構：With 對象名對象名.End Widthn菜單數(shù)組的使用：設置菜單數(shù)組的使用：設置Index屬性值即可，下標從屬性值即可，下標從0開開始始n顏色的表示法：顏色的表示法：RGB函數(shù)函數(shù)nLin

43、e函數(shù)的使用：線型，填充色函數(shù)的使用：線型，填充色nPset函數(shù)的使用函數(shù)的使用VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.8 第第8步：程序打包，生成可執(zhí)行文件步：程序打包，生成可執(zhí)行文件EXEn操作練習：操作練習：n1、繪制同心圓、繪制同心圓n2、畫太極圖、畫太極圖n復習思考：復習思考：n一、填空題一、填空題n1.函數(shù)畫線方法的主要功能實在窗體或控件的指定位置處繪制直線函數(shù)畫線方法的主要功能實在窗體或控件的指定位置處繪制直線或者矩形等?；蛘呔匦蔚?。n2.RGB（R,G,B）分別代表）分別代表R紅色，紅色，G代表綠色，代表綠色，B代表藍色；每種顏色代

44、表藍色；每種顏色的取值范圍是的取值范圍是 ；三種顏色的；三種顏色的 形成新的顏色。形成新的顏色。n3.不同菜單項之間水平線分隔開，方法是：在菜單中插入一個菜單項，將不同菜單項之間水平線分隔開，方法是：在菜單中插入一個菜單項，將該菜單項控件的該菜單項控件的 屬性設置為一個屬性設置為一個 即可。即可。n4.可以為菜單項設置一個快捷鍵，快捷鍵由可以為菜單項設置一個快捷鍵，快捷鍵由 鍵和一個指定的字符組鍵和一個指定的字符組成。成。VBVB程序設計項目化教程程序設計項目化教程中國水利水電出版社中國水利水電出版社12.8 第第8步：程序打包，生成可執(zhí)行文件步：程序打包，生成可執(zhí)行文件EXEn二、思考題二、思考題 n1：為什么要把：為什么要把For循環(huán)的步長盡可能取小？循環(huán)的步長盡可能取??？n2：如何讓正弦和余弦函數(shù)圖像的顏色和線型不一樣？：如何讓正弦和余弦函數(shù)圖像的顏色和線型不一樣？n3：如何讓圖像隨窗口的變化而變化？：如何讓圖像隨窗口的變化而變化？n4：菜單編輯器中編輯菜單，如何設計菜單數(shù)組？：菜單編輯器中編輯菜單，如何設計菜單數(shù)組？