6[單選題] 下面哪個屬性肯定不是框架控件的屬性( )。
A.TextB.CaptionC.LeftD.Enabled
參考答案:A
7[單選題]編寫如下程序:
程序運行后,單擊命令按鈕Commandl,并輸入數(shù)值lO和15,則輸出結(jié)果為
A.10115B.20115C.3515D.2015
參考答案:D
參考解析:程序中過程f的參數(shù)a默認為按址傳遞,參數(shù)b指定按值傳遞,因此調(diào)用f(x,y)時,x的值會受到影響,y的值不會。程序中輸入10和15,則x=10,y=15。調(diào)用f(x,y),在過程中a=a*2,即a=10*2=20,變量x是過程f中的局部變量,沒有用處可不用理會,b=b+100,即b=15+100=115。a的值即按鈕單擊事件中變量x的值,因此x=20,而y的值仍是原來的值l5,因此Printx,y輸出2015。
8[簡答題]在名稱為Form1,標(biāo)題為“圖片”的窗體上添加l個名稱為Image1的圖像框,其高為2500,寬為2000。請通過屬性窗口設(shè)置適當(dāng)屬性,將考生文件夾下的圖片文件pic1.jPg插入圖像框,并使圖片自動適應(yīng)圖像框的大小(如圖所示)。
注意:存盤時必須存放在考生文件夾下,工程文件名保存為sjt1.vbp,窗體文件名保存為sit1.frm。
參考解析:
【考點分析】本題考點有:圖像框的Name、Picture、Stretch、Height和Width屬性以及窗體的Caption屬性。
【解題思路】圖像框(Image)的Picture屬性用于在設(shè)計階段設(shè)置圖像框中顯示的圖片,它的Stretch(自動伸縮)屬性返回/設(shè)置一個值,決定是否調(diào)整圖形的大小以適應(yīng)圖像框控件。圖像框的寬和高分別由其Width屬性和Height屬性設(shè)置。
【操作步驟】
步驟1:新建一個窗體,按照題目要求建立控件并設(shè)置其屬性,如表3.33所示。
步驟2:調(diào)試并運行程序,關(guān)閉程序后按題目要求存盤。
9[簡答題]在考生文件夾下有一個工程文件sjt3.vbp,窗體中有兩個圖片框,名稱分別為P1、P2,其中的圖片內(nèi)容分別是一架航天飛機和一朵云彩,一個命令按鈕,名稱為Cl,標(biāo)題為“發(fā)射”,還有一個計時器,名稱為Timer1。并給出了兩個事件過程,但并不完整,要求:
、僭O(shè)置Timerl的屬性,使其在初始狀態(tài)下不計時;
、谠O(shè)置Timerl的屬性,使其每隔0.1秒調(diào)用Timer事件過程一次:
、廴サ舫绦蛑械淖⑨尫,把程序中的?改為正確的內(nèi)容,使得在運行時單擊“發(fā)射”按鈕,則航天飛機每隔0.1秒向上移動一次,當(dāng)?shù)竭_P2的下方時停止移動,如圖所示。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。
參考解析:
【考點分析】本題考點有:計時器控件的Enabled和Interval屬性,圖片框的Move方法,圖片框的Height、Width、Top和Left屬性以及命令按鈕的Caption屬性,If判斷語句。
【解題思路】工程文件中已建立全部控件,只需編寫事件過程即可。Timerl控件的Imen:-al屬性用來控制計時器事件發(fā)生的時間間隔,通過題意可知,該屬性設(shè)置為100(Interval是以毫秒為單位)。當(dāng)單擊“發(fā)射”按鈕時開始計時,將計時器控件的Enabled屬性設(shè)置為True。如果使航天飛機即Pl停止移動,則將計時器控件的Enabled屬性設(shè)置為False。
【操作步驟】
步驟1:按題目要求打開工程文件,設(shè)置計時器屬性,如圖3.14所示。
步驟2:打開代碼編輯窗口,去掉程序中的注釋符“´”,將問號改為正確的內(nèi)容。
參考答案(陰影部分是需考生填入的內(nèi)容)
Private Sub C1-click()
Timerl.Enabled=_True_________’單擊”發(fā)射”按鈕,則
Timer生效
End Sub
Private Sub Timer1_Timer()
Static a%
a=a+1
If P1.Top>P2.Top+P2.__Height________Then’判定P1是否接觸到P2
P1.Move P1.Left,Pl.Top-5-a,
P1.Width,Pl.Height
ElSe
Timer1.Enabled=__False________’當(dāng)P1接觸到P2時Timer事件停止
End If
End Sub
步驟3:調(diào)試并運行程序,關(guān)閉程序后按題目要求存盤。
10[簡答題] 在考生文件夾下有一個工程文件sjt4.vbp,相應(yīng)的窗體文件為sit4.frm,在窗體上有一個文本框和一個命令按鈕。程序運行后,單擊命令按鈕,即可計算出0~1000范圍內(nèi)不能被7整除的整數(shù)的個數(shù),并在文本框中顯示出來。在窗體的代碼窗口中,已給出了部分程序,其中計算不能被7整除的整數(shù)的個數(shù)的操作在通用過程Fun中實現(xiàn),請編寫該過程的代碼。
要求:請勿改動程序中的任何內(nèi)容,只在FunctionFun()和EndFunction之間填入你編寫的若干語句。最后將修改后的文件按原文件名存盤。
參考解析:
【考點分析】本題考點有:Mod運算符、文件編輯、For循環(huán)語句、If判斷語句以及過程函數(shù)。
【解題思路】可通過求余運算符Mod來計算某數(shù)M能否被7整除,如果MMod7=0,那么M能被7整除;如果MMod7<>0,那么M不能被7整除?衫肍or循環(huán)語句來逐個判斷0~1000范圍內(nèi)的整數(shù)能否被7整除,然后用一個變量來統(tǒng)計不能被7整除的整數(shù)個數(shù)。
【操作步驟】
步驟1:打開本題工程文件。
步驟2:打開代碼編輯窗口,在代碼編輯窗口指定位置編寫以下代碼。
參考答案
Function Fun()
Dim S As Integer,i As Integer
For i=0 To 1000。求0~1000中滿足條件的數(shù)
If i Mod 7<>O Then
s=s+1´將滿足條件的數(shù)的個數(shù)累加
End If
Next i
Fun=s’返回結(jié)果
End Function
步驟3:調(diào)試并運行程序,關(guān)閉程序后按題目要求存盤。
相關(guān)推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |