數(shù)學(xué)課上經(jīng)常繪制一些圖案，手繪不夠精確而且還不美觀，除了我們可以借助于常規(guī)的繪圖軟件外，也可以使用編程的方式繪制一些特殊的圖案，不但精確而且還美觀，下面小編就以自己制作菱形圖案的過(guò)程為例來(lái)說(shuō)明如何利用編程繪制圖案。僅供參考。

1、啟動(dòng)vb6，新建一個(gè)標(biāo)準(zhǔn)的exe文件，拖動(dòng)窗體周邊的小正方形調(diào)節(jié)窗體的大小，直至合適為止。

2、選擇窗體，找到右邊的屬性窗口，設(shè)置boderstyle屬性為0-none，設(shè)置startupposition屬性為屏幕中心。

3、在左邊工具箱里找到標(biāo)簽工具然后雙擊標(biāo)簽工具，在窗體上就會(huì)出現(xiàn)一個(gè)標(biāo)簽，選擇該標(biāo)簽設(shè)置其caption屬性為菱形圖案，設(shè)置font屬性，字體設(shè)為華文新魏，字號(hào)為三號(hào)。

4、在工具箱里連續(xù)兩次雙擊按鈕工具，在窗體出現(xiàn)兩個(gè)按鈕，調(diào)節(jié)按鈕在窗體上的位置，修改兩個(gè)按鈕的caption屬性，一個(gè)為繪圖，一個(gè)為退出。

5、雙擊繪圖按鈕進(jìn)入代碼區(qū)域，在對(duì)象中選擇commmand1，在過(guò)程中選擇click，然后就可以在此輸入代碼了。

6、根據(jù)分析我們可以把菱形分成上下兩個(gè)三角形，首先繪制上部的三角形，輸入相應(yīng)的代碼。點(diǎn)擊運(yùn)行，如果有錯(cuò)誤要進(jìn)行修改，修改之后通過(guò)的圖案如下：

7、接著繪制下部分的三角形，在下面接著輸入相應(yīng)的代碼，輸入過(guò)程要仔細(xì)并且要反復(fù)運(yùn)行進(jìn)行調(diào)試。調(diào)試運(yùn)行結(jié)果如下所示。

8、雙擊commmand2按鈕進(jìn)入退出按鈕的代碼區(qū)域，由于該按鈕的功能是點(diǎn)擊之后退出程序，所以只要輸入end語(yǔ)句即可。

9、運(yùn)行調(diào)試成功后，對(duì)該文件進(jìn)行保存，執(zhí)行文件-保存工程命令，首先要保存窗體，然后接著保存工程，如果有需要的話把它生成exe文件。

10、執(zhí)行文件-生成工程命令，工程的名稱為菱形圖案，這樣就自動(dòng)生成了exe文件，它可以實(shí)現(xiàn)跨平臺(tái)運(yùn)行。

相關(guān)推薦：

VB 6.0 怎么一次性注釋多行? VB 6.0多行注釋的使用方法