2016年浙江省普通高校高考信息技術(shù)模擬試卷（3）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分．在每小題給出的四個(gè)選項(xiàng)中，只有一個(gè)符合題目要求）
-
1．天貓某店在雙11來(lái)臨之前發(fā)行了很多電子優(yōu)惠券，如圖所示，圖中“即日至11月12日”體現(xiàn)信息的（ ?。?/h2>組卷：7引用：2難度：0.9 -
2．ASCII碼表中’Q’的編號(hào)為81，如果用內(nèi)碼觀察軟件觀察’O’的內(nèi)碼，顯示出來(lái)的十六進(jìn)制值為（ ?。?/h2>
組卷：5引用：1難度：0.9 -
3．某張JPEG格式照片的詳細(xì)信息如圖所示，其實(shí)際容量為5.32MB．則該圖象容量的壓縮比大小約為（ ?。?br />
組卷：4引用：1難度：0.9 -
4．小俞同學(xué)使用Word軟件編輯文檔，部分界面如圖所示．下列說(shuō)法正確的是（ ）
組卷：3引用：1難度：0.7 -
5．以下VB表達(dá)式的值是13的是（ ）
組卷：8引用：2難度：0.7
二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題4分，第17小題5分，共26分）
-
16．下列VB程序用于求2個(gè)正整數(shù)（均小于10000的最大公約數(shù)）：
Private Sub Command1_Click （ ?。?br />Dim x As Integer
Dim y As Integer
Dim z As Integer
x=Val（Text1．Text）
y=Val（Text2．Text）
z=gcd（a,b）
Text3．Text=Str（z）
End Sub
Function gcd（a As Integer,b As Integer） As Integer
Do While a＞b
If a＞b Then a=a-b Else b=b-a
Loop
gcd=b
End Function
其中，劃線①，②部分有錯(cuò)，應(yīng)改為，．組卷：1引用：1難度：0.3 -
17．小林想用VB實(shí)現(xiàn)以下功能：輸入一個(gè)十進(jìn)制正整數(shù)（10000以內(nèi)），輸出其二進(jìn)制形式．效果圖如圖1所示，完成以下填空．
Private Sub Command1_Click （ ）
Dim a As Long
Dim b As String
Dim c As String
a=Val（Text1．Text）
b=““
Do While a＞0
c=Str（a Mod 2）
a=
Loop
Text2．Text=b
End Sub
（1）完善代碼，空格①部分應(yīng)填入，空格②部分應(yīng)填入．
（2）小林為了使得代碼功能更強(qiáng)大，希望修改代碼，添加一個(gè)文本框輸入整數(shù)k（范圍在2到9之間），使得程序能實(shí)現(xiàn)十進(jìn)制到k進(jìn)制的轉(zhuǎn)化．得到的界面和代碼如圖2所示：
Private Sub Command1_Click （ ）
Dim a As Long
Dim b As String
Dim c As String
Dim k As Long
a=Val（Text1．Text）
k=Val（Text3．Text）
b=““
Do While a＞0
c=Str（）
b=c+b
a=
Loop
Text2．Text=b
End Sub
其中③部分應(yīng)填入，④部分應(yīng)填入．組卷：9引用：1難度：0.1