2011年度计算机等级考试二级VB复习指导(26)

会计考友

　　5.2.2 多功能按钮
　　通常，每个按钮都有一个固定的标题(Caption)和一个特定的功能，用户也可以设计出多功能按钮。单击这样的按钮，按钮的名称会发生变化，并且会执行与按钮标题相应的操作。
　　实例5.3多功能按钮。
+ L0 U+ w8 O+ `" X# H' I5 H　　在该程序中，窗体上只有一个按钮，单击该按钮，按钮的标题会在"显示日期"与"显示时间"间切换，并且在窗体中将显示出与当前按钮标题相应的内容。
　　在窗体上放置一个标签控件和一个按钮控件，其中各对象的属性设置如表5.5所示。
2 m9 |0 P$ n* m( k0 B
6 W& x' V  \, ~* f! D8 X　　
　　双击【显示日期】按钮，打开【代码】窗口，将下列代码添加到Commandl_Click事件过程中：
　　Private Sub Command1_Click()
　　If Commandl.Caption-“显示日期”Then
) R9 ~3 O: M: T- y　　Labell.Caption=Date
& X) c1 P) T2 q& i　　Command1.Caption=“显示时间”
　　Else
　　Labell.Caption =Time
+ M" Z/ }9 Z" Y$ i" {& x( v0 P" \　　Command1.Caption=“显示日期”
　　End if
6 L! M4 C# @8 r: u3 m　　End Sub
　　在该段代码中，使用了一个If语句来判断当前按钮的标题，然后做出相应的操作。
9 N+ o) F& }- Q  X　　运行该程序，单击【显示日期】按钮，则在标签中显示当前的系统日期，并将按钮的标题改变为"显示时间",如图5.9所示;再次单击按钮。则在标签中显示当前的系统时间，并且按钮的标题恢复为"显示日期",如图5.10所示。这样，通过一个按钮就可以循环显示当前系统的时间与日期了。