2015年计算机等级考试二级VB复习指导(26)
发布时间:2011/1/7 10:14:21 来源:城市学习网 编辑:ziteng
5.2.2 多功能按钮
通常,每个按钮都有一个固定的标题(Caption)和一个特定的功能,用户也可以设计出多功能按钮。单击这样的按钮,按钮的名称会发生变化,并且会执行与按钮标题相应的操作。
实例5.3多功能按钮。
在该程序中,窗体上只有一个按钮,单击该按钮,按钮的标题会在"显示日期"与"显示时间"间切换,并且在窗体中将显示出与当前按钮标题相应的内容。
在窗体上放置一个标签控件和一个按钮控件,其中各对象的属性设置如表5.5所示。
双击【显示日期】按钮,打开【代码】窗口,将下列代码添加到Commandl_Click事件过程中:
Private Sub Command1_Click()
If Commandl.Caption-“显示日期”Then
Labell.Caption=Date
Command1.Caption=“显示时间”
Else
Labell.Caption =Time
Command1.Caption=“显示日期”
End if
End Sub
在该段代码中,使用了一个If语句来判断当前按钮的标题,然后做出相应的操作。
运行该程序,单击【显示日期】按钮,则在标签中显示当前的系统日期,并将按钮的标题改变为“显示时间”;再次单击按钮。则在标签中显示当前的系统时间,并且按钮的标题恢复为"显示日期"。这样,通过一个按钮就可以循环显示当前系统的时间与日期了。