三、簡單應(yīng)用題

　　(1)本題主要考查列茅，框控件的使用。

　　列表框控件用于顯示可供單一或多個選擇的列表項。。給列表框添加列表項既可以在設(shè)計階段通過其List屬性設(shè)置加入(注意每輸入完一項后按Ctrl+Enter鍵換行再輸入下一項)，也可以在程序運(yùn)行時通過代碼：列表框名.Addhem“項目”加入;List(Index)屬性用于設(shè)置或返回指定索引號的列表項的內(nèi)容;ListIn dex屬性用于設(shè)置或返回刈表框中當(dāng)前所選列表項的索引號;Sorted屬性用于設(shè)置或返回列表框中的列表項是否按字母順序排序，值為True時保持排序;RemoveItem方法用于刪除指定索引號的列表項。

　　根據(jù)題意，新建“標(biāo)準(zhǔn)EXE”工程，將一個List控件和一個文本框控件添加到窗體上，列表框的名稱為List1，List屬性加入以下項“AAAAA”、“BBBBB”、“CCCCC”、“DDDDD”、“11111”、“22222”、“33333”和“44444”，文本框的名稱為Text1、MuhiLine屬性為True、ScrollBar屬性為2。雙擊List1進(jìn)入代碼編寫窗口，補(bǔ)充后的具體代碼如一：

　　Private Sub List1_DbtClick()

　　Text1.Text=Text1.Text+Listl.List(List1.ListIndex)+vbCrLf ’將選中的項加到Text1中顯 示

　　List1.Removehem List1.Listlndex’刪除選中項

　　End Sub

　　單擊 按鈕運(yùn)行程序，并按要求保存。

　　(2)本題主要考查計時器控件的使用。計時器是否啟用通過Enabled屬性設(shè)置，值為True時啟用，值為False不啟用。啟用后間隔多長時間觸發(fā)一次其Timer事件由其Interval屬性設(shè)置，Interval屬性的單位

　　為毫秒，缺省值為0，此時計時器也不啟用。

　　根據(jù)題意，將一個標(biāo)簽、兩個命令按鈕和一個計時控件添加到窗體中，標(biāo)簽的名稱為Label1、Caption屬性為60，命令按鈕的名稱分別為Command1和Command2，Caption屬性分別為“開始”和“停止”，Timer的名稱為Timer1。雙擊Commandl進(jìn)入代碼窗口，補(bǔ)充后的代碼如下：

　　Private Sub Command1_Click()

　　Timer1.Interval=1000

　　’將Timer1的間隔_乏為l秒

　　End Sub

　　Private Sub Command2_Click()

　　Timer1.Interval=0 ’將Timer1的間隔設(shè)為0

　　End Sub

　　Private Sub Timer1_Timer()

　　Label1.Caption=Val(Label1.Caption)-1

　　’每個間隔Label1的計數(shù)減l

　　If Label1.Caption=0 Then

　　Label1.Caption=60

　　’當(dāng)Label1的計數(shù)等于0時，Label1重新回到60

　　End Sub

　　單擊 按鈕運(yùn)行程序，并按要求保存。

　　相關(guān)推薦：

　　2014年計算機(jī)等級考試時間調(diào)整通知

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

　　2014計算機(jī)等級《二級VB》上機(jī)預(yù)測題及答案匯總

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