VB可视化程序设计实例分析

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

Visual Basic可视化开发环境是一种系统开发工具。它集合了程序的设计、调试、运行等各种工具。该环境中提供许多现成的控件（如窗体、文本框、标签、命令按钮等），程序员不必再为界面的设计而编写大量程序代码，只需按设计的要求，利用系统提供的各种控件在窗体上“画出”各种对象，然后对这些对象进行一些属性的设置。程序员所需要编写的代码只是实现程序功能的那部分，从而大大提高了编程的效率。下面分析实例（实例选自教材：《信息技术》八年级上册——《信息技术》教材编写组 编著、福建教育出版社出版，“VB程序设计基础”单元中的创新活动），来体会VB可视化程序设计的一般过程。

例：（选自教材P103的创新活动）在12小时制的时间中，在钟表正常走动的时候，有多少个时针和分针成直角的位置？它们分别表示什么时刻（精确到秒即可）？

请编写一个“时钟的时针和分针成直角的问题”程序，单击“开始计算”按钮，程序计算并显示出答案，单击“退出”按钮，结束程序运行。

1.程序界面设计

新建一个标准exe工程，添加如表2所示的控件，并设置控件相应的属性。（程序界面参见教材P103图9-4）

2.算法分析

由于在“时钟的时针和分针成直角的问题”程序中，用户单击“开始”按钮后，就在List框中显示出时针和分针成直角的位置时刻，因此我们在“开始”按钮处编写Click事件过程，算法如下：

① 给变量赋初值：minute=0，second=0，hour=1。

② 依次计算1到11时的时针和分针成直角的时刻，并进行处理：

当秒数大于或等于60时，要进到分；当分大于或等于60时，要进到小时。

这里用到了：For <循环变量＞ = <初值＞ To <终值＞

<语句组＞

Next <循环变量＞

的循环语句和分支结构语句。需要注意的是：在时钟走一个小时的过程中，时针与分针会出现两次成直角的情况。

③ 分别逐行输出最后结果：时、分、秒。

3.编写事件过程：

⑴ Command1“开始计算”按钮的Click事件过程中程序代码如下：

⑵ 对于Command2 “退出”按钮，我们只要在它的Click事件过程中写下一个语句“end”即可。

当程序编写完成后，可以通过选择“运行”菜单中的“启动”命令或单击工具栏上的运行按钮 或直接按F5来运行程序。运行结束后，按工具栏上的结束按钮 ，结束VB应用程序的运行。

如果程序中出现错误，系统会弹出一个“实时错误”对话框，单击其中的“调试”按钮，程序会在错误语句前停止运行。出现错误的语句被标记成黄色。这时，我们可以先结束程序运行，检查错误原因，修改后再次运行，直到程序运行结果正确无误。

总之，要多调试，直致设计出完整的程序。