6[單選題] 以下說法中正確的是( )。
A.當焦點在某個控件上時,按下一個字母鍵,就會執(zhí)行該控件的KeyPress事件過程
B.因為窗體不接受焦點,所以窗體不存在自己的KeyPress事件過程
C.若按下的鍵相同,KeyPress事件過程中的KeyAscii參數(shù)與KeyDown事件過程中的KeyCode參數(shù)的值也相同
D.在KeyPress事件過程中,KeyAscii參數(shù)可以省略
參考答案:A
參考解析:B選項錯誤原因:窗體有自己的KeyPress事件過程;c選項錯誤原因:KeyPress事件過程中的KeyAscii參數(shù)返回按鍵的ASCIl碼值,大小寫字母返回值不同;而KeyDown事件過程中的KeyCode參數(shù)返回的是按鍵代碼,大小寫字母返回值相同。故按下的鍵相同時,keyAscii和KeyCode參數(shù)不一定返回相同值;D選項錯誤原因:KeyPress事件中的KeyAscii參數(shù)不能省。A選項正確。
7[單選題] 窗體上有一個名稱為Optionl的單選按鈕數(shù)組,程序運行時,當單擊某個單選按鈕時,會調用下面的事件過程:
Private Sub Optionl_Click(Index As Integer)End Sub
下面關于此過程的參數(shù)Index的敘述中,正確的是( )。
A.Index為1表示單選按鈕被選中,為0表示未選中
B.Index的值可正可負
C.Index的值用來區(qū)分哪個單選按鈕被選中
D.Index表示數(shù)組中單選按鈕的數(shù)量
參考答案:C
參考解析:
Index參數(shù)值返回的是單選按鈕數(shù)組中各單選按鈕的索引值,用它來區(qū)分各單選按鈕。故A、D選項錯誤,C選項正確;
Index的值只能是非負數(shù),故B選項錯誤。
8[單選題] 窗體上有l(wèi)個名稱為Command1的命令按鈕;1個名稱為List1、沒有列表項的列表框。編寫如下程序:
程序運行后,單擊命令按鈕Command1,并輸入“Happynewyear”,則在Listl中顯示的內容為
參考答案:A
參考解析:Listl.Addltem可以為列表框添加列表項。For循環(huán)中通過Mid函數(shù)從字符串中倒序取出字符,碰到空格時添加新列表項。選A.。
9[簡答題](1)在考生文件夾下有工程文件sj3.vbp及窗體文件sj3.frm,該程序是不完整的。本程序只有一個窗體,當把鼠標光標移到窗體上時,每雙擊一次鼠標,就變換一種鼠標光標的形狀,依次顯示鼠標光標的15種屬性。程序運行后的窗體如圖59-4所示。
注意:請在有“?”的地方填入正確內容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。存盤時不得改變文件名和文件夾。
(2)在考生文件夾下有工程文件sj4.vbp,窗體文件sj4.frm,該程序是不完整的。在窗體上已經(jīng)畫出一個圖像框,名稱為Image1;一個水平滾動條,名稱為HScroll1。要求考生不改動Image1的Height與Width屬性。當運行程序時,圖像框中加載考生文件夾下的圖片test.bmp。滾動水平滾動條中的滾動塊時,圖片會隨著滾動條的滾動進度逐漸顯露出來,如圖59-5所示。
注意:請在有“?”的地方填入正確內容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。修改后的工程及窗體文件,均以原名保存在考生文件夾下。
參考解析:
(1)本題主要考查考生對鼠標的MousePointer屬性的掌握情況。
MousePointer屬性用于設置鼠標經(jīng)過某對象時光標的形狀類型,既可以在屬性窗口設置,也可以通過代碼設置。MousePointer屬性值可以是0~15的任一整數(shù),不同的值代表不同的形狀。MousePointer屬性值通過代碼設置的一般格式為:對象名.MousePointer=n(n為0~15的整數(shù))。
根據(jù)題意,將兩個標簽添加到窗體中,名稱分別為Label1和Label2、Caption屬性分別為“當前鼠標形狀為:”和“1”,并設置MousePointer屬性為1。雙擊Form1進人代碼窗口,補充后的具體代碼如下:
(2)窗體加載時觸發(fā)Form_Load事件。滾動條的事件主要有Scroll和Change事件。當在滾動條內拖動滑塊時觸發(fā)Scroll事件(單擊滾動箭頭或滾動條時不發(fā)生Scroll事件),而改變滑塊的位置后會觸發(fā)Change事件。Scroll事件用于跟蹤滾動條中的動態(tài)變化,Change事件則用來得到滾動條最后的值。加載圖片可以在屬性窗口的Picture屬性中設置,也可以在代碼中通過LoadPicture(“圖像文件路徑”)圖片加載函數(shù)加人圖片。
根據(jù)題意,將一個水平滾動條控件和一個圖像控件添加到窗體中,水平滾動條的名稱為HScroll1、Min屬性為400、Max屬性為2295,Image的名稱為Image1,并在其Pic-ture屬性中加載考生文件夾下的“test.bmp”圖片。雙擊HScroll1進入代碼窗口,編寫如下代碼:
10[簡答題] 在考生文件夾中有一個工程文件sjt4.vbp。該程序的功能是將文件in4.txt中的文本讀出并在文本框Textl中顯示。輸入一個英文字母到文本框Text2中,然后單擊“統(tǒng)計”命令按鈕,統(tǒng)計該字母(大小寫被認為是不同的字母)在文本中出現(xiàn)的次數(shù),統(tǒng)計結果在標簽Label3中顯示。
給出的窗體文件中已經(jīng)有了全都控件,如圖所示。程序不完整,要求:去掉程序中的注釋符,把程序中的?改為正確的內容。
注意:不能修改程序的其他部分和控件屬性,最后將修改后的文件按原文件名進行存盤。
參考解析:
通過文件操作和“&”連接符將文件ins.txt中的文本讀出并顯示在文本框1鈕1中,在C0㈣dl eli&事件過程中,在文本框Text2中輸入一個英文字母,然后單擊“統(tǒng)計”命令按鈕,統(tǒng)計該字母(大小寫被認為是不同的字母)在文本中出現(xiàn)的次數(shù),統(tǒng)計結果顯示在標簽Imbel3中。
【操作步驟】
步驟l:打開本題工程文件。步驟2:分析并編寫程序代碼。程序提供代碼
Privale Sub Fonn_lJ0ad()
Open App.Path&”\in4.瞰”For Input As囂1
Line Input{I}1.S’Textl.Text=?Close#l
End Sub
Privatd Sub Commandl—Click()
Dim n AsIntegerS=Textl.Text
sl=RTrim(Text2.Text、Do
p=Instr(?)
IfP<>0 Then n=n+1s=Mid(S,P+I)
Loop While P?0
Labels.Caption=?
End Sub
程序結束
參考答案
第1個?處填人:S.第2個?處填入:S,sl
第3個?處填入:<>第4個?處填入:n
步驟3:調試并運行程序,關閉程序后按題目要求存盤。
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |