VB可视化程序设计实例 - 小时钟

VB可视化程序设计实例——小时钟

本例专门针对程序设计初学者而设计，尤其适合第一次接触VB的学生学习。通过用VB来设计如图3.39所示的时钟程序，初步感受一下可视化和面向对象的程序设计过程。

图3.39 时钟程序运行效果

小时钟程序中包含窗体控件、标签控件和计时器控件等3个控件。窗体控件是小时钟程序运行时的窗口，标题栏上的标题是“时钟”，在右上角有最小化、最大化和关闭按钮。标签控件可以用来显示文本，本例中用来显示时间，如“9:48:57”。计时器控件每秒一次把计算机的当前系统时间显示到标签控件中，使得小时钟不停地运行。

时钟窗体控件 小时钟 在时钟窗体控件中用来显示时间的标签控件 每秒一次把计算机系统时间显示到标签控件中的计时器控件

启动VB，首先显示“新建工程”对话框（图3.40），在选择“新建”选项卡中的“标准EXE”项后，单击“打开”按钮，进入VB编程环境，如图3.41所示。

图3.40 “新建工程”对话框

工具箱 属性窗口 窗体窗口 窗体布局窗口 工程资源管理器窗口 图3.41 VB可视化编程环境

除了标题栏、菜单栏和标准工具栏外，编程环境中还有工具箱、窗体和属性等窗口。 双击工具箱（图3.42）中的标签控件，在窗体Form1中放置可以显示文本信息的标签控件Label1，见图3.43。时钟的时、分和秒以后就显示在Label1中。拖曳Label1可以移动它，拖曳它的八个控制点，可以改变它的大小。

标签 计时器

图3.42 工具箱 图3.43 label1控件 图3.44 计时器控件

双击工具箱中的计时器控件，在窗体Form1中放置计时器控件Timer1，见图3.44。计时器控件以一定的时间周期，调用一个事件。计时器控件只有在设计阶段出现在窗体上，程序运行时是不可见的，它的位置和大小无关紧要。

到目前为止，已经建立了窗体Form1、标签控件Label1和计时器控件Timer1等3个对象。下面，将设置它们的属性。

图3.45 窗体Form1属性 图3.46 窗体Form1

单击窗体Form1，属性窗口中出现Form1的属性，见图3.45。在Caption（标题）属性内，输入“时钟”，Form1的标题栏就显示“时钟”，见图3.46。

图3.47 控件Label1的属性 图3.48 “字体”对话框

单击控件Label1，属性窗口中出现Label1的属性，见图3.47。单击font（字体）属性右侧的省略号，出现字体设置对话框，如图3.48所示，把大小设置为48。适当调整控件Label1的位置和大小，见图3.49。

图3.49 窗体Form1 图3.50 计时器控件的属性

单击计时器控件，属性窗口出现计时器Timer1的属性，见图3.50。把Interval（时间间隔）设置为1000，计时器每隔1000毫秒发生一个计时器事件。

图3.51 程序代码 图3.52 程序代码

双击计时器控件，出现程序代码窗口，对象是计时器控件Timer1，事件为Timer（计时），程序代码的第一行和最后一行由系统自动产生，见图3.51。在上下两行之间输入程序代码“Label1.Caption=time”，让Label1控件显示系统时间，如图3.52所示。因为计时器每隔1秒发生一个计时器事件，所以本段程序每秒运行一遍，时钟内容每秒刷新一次。

执行“运行”菜单中的“启动”命令，运行程序。执行“运行”菜单中的“结束”命令，结束程序的运行。不断调整Label1控件的位置和大小以及窗体Form1的大小，使运行结果达到图3.39所示的效果。

如果要保存此项工程，可以执行“文件”菜单中的“保存工程”命令。如果要生成脱离VB集成环境，单独运行的EXE文件，执行“文件”菜单中的“生成”命令，出现“生成工程”对话框，如图3.53所示。在文件名处输入“时钟.exe”，然后单击“确定”按钮。

图3.53 “生成工程”对话框

属性、方法和事件是Visual Basic程序设计中的三个要素。简单说，可以把属性看作是一个对象的性质，把方法看作对象所具有的动作，对象的动作产生事件，事件过程可看作对象的响应。

本文来源：https://www.bwwdw.com/article/74q5.html