VB可視化程序設(shè)計實例分析

福建省尤溪一中文公分校 陳正光

Visual Basic可視化開發(fā)環(huán)境是一種系統(tǒng)開發(fā)工具。它集合了程序的設(shè)計、調(diào)試、運行等各種工具。該環(huán)境中提供許多現(xiàn)成的控件（如窗體、文本框、標(biāo)簽、命令按鈕等），程序員不必再為界面的設(shè)計而編寫大量程序代碼，只需按設(shè)計的要求，利用系統(tǒng)提供的各種控件在窗體上“畫出”各種對象，然后對這些對象進行一些屬性的設(shè)置。程序員所需要編寫的代碼只是實現(xiàn)程序功能的那部分，從而大大提高了編程的效率。下面分析實例（實例選自教材：《信息技術(shù)》八年級上冊——《信息技術(shù)》教材編寫組 編著、福建教育出版社出版，“VB程序設(shè)計基礎(chǔ)”單元中的創(chuàng)新活動），來體會VB可視化程序設(shè)計的一般過程。

例：（選自教材P103的創(chuàng)新活動）在12小時制的時間中，在鐘表正常走動的時候，有多少個時針和分針成直角的位置？它們分別表示什么時刻（精確到秒即可）？

請編寫一個“時鐘的時針和分針成直角的問題”程序，單擊“開始計算”按鈕，程序計算并顯示出答案，單擊“退出”按鈕，結(jié)束程序運行。

1.程序界面設(shè)計

新建一個標(biāo)準(zhǔn)exe工程，添加如表2所示的控件，并設(shè)置控件相應(yīng)的屬性。（程序界面參見教材P103圖9-4）

2.算法分析

由于在“時鐘的時針和分針成直角的問題”程序中，用戶單擊“開始”按鈕后，就在List框中顯示出時針和分針成直角的位置時刻，因此我們在“開始”按鈕處編寫Click事件過程，算法如下：

① 給變量賦初值：minute=0，second=0，hour=1。

② 依次計算1到11時的時針和分針成直角的時刻，并進行處理：

當(dāng)秒數(shù)大于或等于60時，要進到分；當(dāng)分大于或等于60時，要進到小時。

這里用到了：For <循環(huán)變量＞ = <初值＞ To <終值＞

<語句組＞

Next <循環(huán)變量＞

的循環(huán)語句和分支結(jié)構(gòu)語句。需要注意的是：在時鐘走一個小時的過程中，時針與分針會出現(xiàn)兩次成直角的情況。

③ 分別逐行輸出最后結(jié)果：時、分、秒。

3.編寫事件過程：

⑴ Command1“開始計算”按鈕的Click事件過程中程序代碼如下：

⑵ 對于Command2 “退出”按鈕，我們只要在它的Click事件過程中寫下一個語句“end”即可。

當(dāng)程序編寫完成后，可以通過選擇“運行”菜單中的“啟動”命令或單擊工具欄上的運行按鈕 或直接按F5來運行程序。運行結(jié)束后，按工具欄上的結(jié)束按鈕 ，結(jié)束VB應(yīng)用程序的運行。

如果程序中出現(xiàn)錯誤，系統(tǒng)會彈出一個“實時錯誤”對話框，單擊其中的“調(diào)試”按鈕，程序會在錯誤語句前停止運行。出現(xiàn)錯誤的語句被標(biāo)記成黃色。這時，我們可以先結(jié)束程序運行，檢查錯誤原因，修改后再次運行，直到程序運行結(jié)果正確無誤。

總之，要多調(diào)試，直致設(shè)計出完整的程序。