四、綜合應用題

　　43

　　在考生文件夾下有一個工程文件sj5.vbp，在Form1的窗體中畫一個標簽，3個命令按鈕和一個計時器。要求程序運行時，單擊"開始計數(shù)"按鈕，就開始計數(shù)，每隔1秒，標簽中的數(shù)加1;單擊"暫停計數(shù)"按鈕，則停止計數(shù);單擊"停止計數(shù)"按鈕，則標簽中的計數(shù)變?yōu)?。

　　要求：修改適當?shù)目丶�屬性，并去掉程序中的注釋�?'"，把程序中的"?"改為正確的內(nèi)容，使其實現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件以原來的文件名存盤。

　　程序運行時的窗體界面如圖51-5所示。

　　圖51-5

　　參考答案:請參考解析 系統(tǒng)解析:根據(jù)題意，將一個標簽，一個計時控件和3個命令按鈕添加到窗體中，標簽的名稱為Label1，Caption屬性為0，Timer的名稱為Timer1，命令按鈕的屬性分別為Command1、Command2和Command3，Caption屬性分別為"開始計數(shù)"、"暫停計數(shù)"和"停止計數(shù)"。雙擊Command1進入代碼窗口，編寫如下代碼：

　　Private Sub Command1_Click()

　　Timer1.Interval = 1000 '按開始按鍵，將把Timer1的間隔設為1秒

　　End Sub

　　Private Sub Command2_Click()

　　Timer1.Interval = 0 '按暫停按鍵，將把Timer1的間隔設為0

　　End Sub

　　Private Sub Command3_Click()

　　Timer1.Interval = 0 '按暫停按鍵，將把Timer1的間隔設為0

　　Label1.Caption = "0" '將Label1初始化為0

　　End Sub

　　Private Sub Timer1_Timer()

　　Label1.Caption = Val(Label1.Caption) + 1 '每個一個周期，Label1的數(shù)字加1

　　End Sub

　　單擊

　　按鈕運行程序，并按要求保存。

　　相關推薦：

　　2014年全國計算機二級VB上機考試試題匯總

　　考試吧考后首發(fā)2014年3月計算機等考真題及答案通知

　　考試吧推薦：2014年3月計算機二級考前沖刺備考專題