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

会计考友

　5.2 按钮控件　　在应用程序中，按钮控件常常被用来启动、中断或结束一个进程，用户可以通过简单的单击按钮来执行操作。只要用户单击按钮，就会触发它的Click事件过程，通过编写按钮的Click事件过程，就可以指定它的功能了。
- o  t) b( x$ p9 G  k　　按钮控件的常用属性如表5.3所示。

　　
& [% n9 d+ B# r+ @) U- @+ C9 m　　5.2.1按钮的有效性在某些应用程序界面中，按钮会根据用户的操作情况呈现两种不同的状态，一种是"有效",一种是"无效".在"无效"状态时，按钮通常以浅灰色显示，不能响应用户的任何操作。Windows系统自带的录音机程序界面，其中的【停止】与【后退】按钮无效(以浅灰色显示).按下【播放】按钮后，【播放】按钮变为无效，而【停止】按钮变为有效。按下【停止】按钮后，【停止】按钮变为无效，【播放】按钮恢复有效。
, W% X* G$ E( T7 }4 P　　通过按钮的有效性可以看出当前程序的状态，从而避免一些不需要的或重复的操作。如在录音机处于停止状态时(【停止】按钮无效),用户就不需要再去单击【停止】按钮来停止播放了。这里给出一个实例，来模拟录音机的停止与播放按钮。

会计考友

　实例5.2按钮的有效性　　在窗体中放置一个标签控件和两个按钮控件，如图5.5所示，其中各控件的属性设置如表5.4所示。

8 a& y9 g! q! m7 \+ I+ G- I+ r  T　　
　　注意：按钮控件添加到窗体上后，在默认情况下，它们的Enabled属性为Ture,在运行程序前，请在【属性】窗口中确认两个按钮的Enabled属性均为Ture,以防止用户在操作中谋改变了这个属性。
　　双击第一个按钮，打开【代码】窗口，将下列代码添加到ComPlay_Click事件过程中：
9 s& n! I; d! p; M, i! q　　Private Sub ComPlay_Click()
  s- ?2 q8 r5 A　　Labell.Caption="正在播放歌曲"
; Q9 n! Z, K! Q8 v　　Complay.Enabled=False
+ h4 N0 k' l* Y. |# M1 c3 G- C　　ComStop.Enabled=Ture
　　End Sub
# z/ J5 J( N* t; I　　当用户单击【播放】按钮时，触发ComPlay_Click事件，该事件过程中的第一行代码是在标签中显示文本，第二行代码是将【播放】按钮变为无效，第三行代码是将【停止】按钮变为有效。
4 Z- x3 C3 j# N4 }　　与此类似，将下列代码添加到Comstop_Click事件过程中：
3 E& W8 ^( J6 ~% u7 U　　Private Sub Comstop_Click()
　　Labell.Caption="歌曲播放停止"
: q* }% ^- h: B, C- e6 `7 G　　ComPlay.Enabled=Fasle
　　ComPlay.Enabled=Ture
　　End Sub

会计考友

　运行该程序，单击【播放】按钮，则在标签中显示"正在播放歌曲",并且【播放】按钮变为无效，如图5.6所示。单击【停止】按钮，则在标签中显示"歌曲播放停止",【停止】按钮变为无效，同时，【播放】按钮又恢复有效，如图。5.7所示。