第 1 頁:單選題 |
第 5 頁:操作題 |
第 8 頁:參考答案 |
三、簡單應用題
(1)本題主要考查列茅,框控件的使用。
列表框控件用于顯示可供單一或多個選擇的列表項。。給列表框添加列表項既可以在設計階段通過其List屬性設置加入(注意每輸入完一項后按Ctrl+Enter鍵換行再輸入下一項),也可以在程序運行時通過代碼:列表框名.Addhem“項目”加入;List(Index)屬性用于設置或返回指定索引號的列表項的內容;ListIn dex屬性用于設置或返回刈表框中當前所選列表項的索引號;Sorted屬性用于設置或返回列表框中的列表項是否按字母順序排序,值為True時保持排序;RemoveItem方法用于刪除指定索引號的列表項。
根據題意,新建“標準EXE”工程,將一個List控件和一個文本框控件添加到窗體上,列表框的名稱為List1,List屬性加入以下項“AAAAA”、“BBBBB”、“CCCCC”、“DDDDD”、“11111”、“22222”、“33333”和“44444”,文本框的名稱為Text1、MuhiLine屬性為True、ScrollBar屬性為2。雙擊List1進入代碼編寫窗口,補充后的具體代碼如一:
Private Sub List1_DbtClick()
Text1.Text=Text1.Text+Listl.List(List1.ListIndex)+vbCrLf ’將選中的項加到Text1中顯 示
List1.Removehem List1.Listlndex’刪除選中項
End Sub
單擊 按鈕運行程序,并按要求保存。
(2)本題主要考查計時器控件的使用。計時器是否啟用通過Enabled屬性設置,值為True時啟用,值為False不啟用。啟用后間隔多長時間觸發一次其Timer事件由其Interval屬性設置,Interval屬性的單位
為毫秒,缺省值為0,此時計時器也不啟用。
根據題意,將一個標簽、兩個命令按鈕和一個計時控件添加到窗體中,標簽的名稱為Label1、Caption屬性為60,命令按鈕的名稱分別為Command1和Command2,Caption屬性分別為“開始”和“停止”,Timer的名稱為Timer1。雙擊Commandl進入代碼窗口,補充后的代碼如下:
Private Sub Command1_Click()
Timer1.Interval=1000
’將Timer1的間隔_乏為l秒
End Sub
Private Sub Command2_Click()
Timer1.Interval=0 ’將Timer1的間隔設為0
End Sub
Private Sub Timer1_Timer()
Label1.Caption=Val(Label1.Caption)-1
’每個間隔Label1的計數減l
If Label1.Caption=0 Then
Label1.Caption=60
’當Label1的計數等于0時,Label1重新回到60
End Sub
單擊 按鈕運行程序,并按要求保存。
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |