2011年浙江省高中信息技術(shù)會考試卷(11)
發(fā)布:2024/4/20 14:35:0
一、選擇題(共7小題,每小題3分,滿分21分)
-
1.在Visual Basic中,用變量code存儲學(xué)生的借閱卡編碼(如“CH20130036”),則變量code的數(shù)據(jù)類型應(yīng)說明為( ?。?/h2>
組卷:6引用:5難度:0.9 -
2.將數(shù)學(xué)表達式a≤b≤c寫成Visual Basic表達式,正確的是( ?。?/h2>
組卷:3引用:3難度:0.9 -
3.在Visual Basic中,表達式Len(“-100“)+100的值是( ?。?/h2>
組卷:1引用:2難度:0.7
二、填空題(共3小題,每小題3分,滿分9分)
-
10.鄭均收集了某公司生豬生長各階段的產(chǎn)肉比數(shù)據(jù),他設(shè)計了如下Visual Basic程序進行數(shù)據(jù)處理.程序運行界面如圖所示,左邊列表框List1中顯示生豬生長的各階段編號及對應(yīng)的產(chǎn)肉比,單擊“排序”按鈕Command1后,右邊的列表框List2中顯示按產(chǎn)肉比從高到低排序后的數(shù)據(jù).所收集到的不同生長階段編號和對應(yīng)的產(chǎn)肉比數(shù)據(jù)已分別保存在數(shù)組a和數(shù)組b中.
排序部分程序如下:
Dim a(1To 10)As String′數(shù)組a用于存儲階段編號
Dim b(1To 10)As Single′數(shù)組b用于存儲產(chǎn)肉比
Private Sub Command1-Click ( ?。?br />Dim i As Integer,j As Integer,k As Integer,t As Single,s As String
For i=1To 9
k=i
For j=i+1To 10
If ① Then k=j
Next j
If k<>i Then
s=a(i):a(i)=a(k):a(k)=s
t=b(i):②:b(k)=t
End If
Next i
For i=1To 10
List2.AddItem a(i)+””+Str(b(i))
Next i
End Sub
Private Sub Form Load ( ?。浯诉^程用于對數(shù)組a和數(shù)組b進行賦值,并顯示在List1中,代碼略
End Sub
(1)解決此問題采用的算法是
(2)在程序①和②畫線處填入適當(dāng)?shù)恼Z句或表達式,將程序補充完整:
程序中①畫線處應(yīng)填入
程序中②畫線處應(yīng)填入組卷:20引用:3難度:0.1
三、解答題(共1小題,滿分0分)
-
11.打開考生文件夾下“VB”文件夾中的“test.jye.ai”,該VB程序的功能是:單擊“開始”按鈕Command1,小熊開始“滑冰”;單擊“停止”按鈕Command2,“滑冰”動作停止;單擊“退出”按鈕Command3,結(jié)束并退出程序。程序運行界面如圖所示:
完成以下操作:
(1)將命令按鈕Command1的Caption屬性值設(shè)置為“開始”;
(2)為“停止”按鈕Command2添加Click事件過程,并將“VB”文件夾下“code.jye.ai”文件中的所有代碼復(fù)制到該事件過程中。調(diào)試程序正確,并保存窗體文件test。frm和工程文件test。vbp。組卷:0引用:1難度:0.9