2015年浙江省杭州市高考信息技術(shù)模擬試卷(8)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共有10小題,每小題2分,共20分)在每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的,不選、多選、錯(cuò)選均不得分.
-
1.支付寶付款碼是開發(fā)出的配合支付寶使用的付款的新方式.付款碼給收銀員掃一下就可以完成支付.支付寶付款碼產(chǎn)生二維碼的過程屬于( ?。?/h2>
組卷:8引用:2難度:0.9 -
2.用UltraEdit觀察字符內(nèi)碼,結(jié)果如圖所示:則字符“PPt”的十六進(jìn)制內(nèi)碼值為( ?。?br />
組卷:3引用:5難度:0.9 -
3.某文檔有文檔評(píng)價(jià)如3圖,其中該文檔獲得的4星半的評(píng)分屬于( ?。?br />
組卷:6引用:3難度:0.9 -
4.用Word軟件在修訂狀態(tài)下編輯“兩會(huì)”代表經(jīng)典語錄,部分界面如圖如全部接受圖中所示的修訂內(nèi)容,則最后一行的文字將變?yōu)椋ā 。?/h2>
組卷:2引用:3難度:0.9 -
5.某Access數(shù)據(jù)表打開后如圖所示,則字段設(shè)計(jì)正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="http://img.jyeoo.net/quiz/images/201706/15/351831da.png" style="vertical-align:middle" />
組卷:9引用:4難度:0.7 -
6.如圖是用于實(shí)現(xiàn)S=1*2+3*4+5*6+7*8+9*10的算法的流程圖,則橫線處分別應(yīng)填寫( ?。?br />
組卷:6引用:3難度:0.5 -
7.成功的多媒體作品,創(chuàng)作前都會(huì)進(jìn)行應(yīng)用和創(chuàng)作需求分析,在進(jìn)行創(chuàng)作需求分析時(shí),一般不需要考慮的是( ?。?/h2>
組卷:10引用:3難度:0.9
二、綜合題
-
20.小王設(shè)計(jì)了一個(gè)程序來列舉仁川亞運(yùn)會(huì)的獎(jiǎng)牌前三的國家.下列VB程序?qū)崿F(xiàn)如下功能:單擊命令按鈕Command1后,在列表框List1中按獎(jiǎng)牌數(shù)由多到少顯示國家名稱,如圖.
請根據(jù)算法將下列程序補(bǔ)充完整.
Dim a(1To 45)As String
Dim b(1To 45)As Integer
Private Sub Form_Load ( )
a(1)=“中國“
b(1)=308
‘45個(gè)代表團(tuán)名稱及獎(jiǎng)牌數(shù)分別放在a(1)到a(45)及b(1)到b(45)中
End Sub
Private Sub Command1_Click
Dim i As Integer,j As Integer
Dim t As Integer,f As Integer
List1.Clear
For i=1 To 3
For j=①
If ②
f=a(j):a(j)=a(j-1):a(j-1)=f
t=b(j):b(j)=b(j-1):b(j-1)=t
End If
Next j
Next i
For i=1 To 3
List1.AddItem“第“+Str(i)+“名“+a(i)+“獎(jiǎng)牌數(shù)“+Str(b(i))
Next i
End Sub.組卷:6引用:2難度:0.1 -
21.王五為學(xué)生們設(shè)計(jì)了學(xué)校食堂學(xué)生校園卡查詢系統(tǒng),在終端機(jī)上輸入學(xué)生的校園卡卡號(hào),可以查出該卡對(duì)應(yīng)的學(xué)生姓名及相應(yīng)的余額.
校園卡信息存儲(chǔ)在一個(gè)綜合的數(shù)據(jù)庫“school.jye.ai”,其中的“Yue”數(shù)據(jù)表用來存儲(chǔ)學(xué)生的校園卡基本信息,包括學(xué)號(hào)(num)、姓名(name)、余額(money),括號(hào)內(nèi)的為對(duì)應(yīng)字段名.下列VB程序用來實(shí)現(xiàn)根據(jù)學(xué)號(hào)查詢并顯示學(xué)生姓名及余額,運(yùn)行界面如圖所示:
數(shù)據(jù)庫文件與應(yīng)用程序在同一文件夾中,在文本框Text1中輸入學(xué)生的學(xué)號(hào),單擊“查詢”按鈕,在標(biāo)簽Label4、Label5中分別顯示學(xué)生姓名和余額.
Private Sub Command1_Click ( ?。?br />Dim adocn As new connection
Dim adors As new recordeset
Dim str1As string,str2as string
Str1=”driver=microsoft access driver(*.mdb);dbq=”&app.jye.ai&”\①
Adon.jye.ai str1
Str2=”select*from Yue where②____=’”+text1.text+”’”
Adors.jye.ai str2,adocn,adOpenDynamc,adLockOptimistic
If adors.jye.ai then
Msgbox”你輸入的學(xué)號(hào)不存在!”
Else
Label4.caption=adors.Fields(“name”).value
③_____=adors.Fields(“money”).value
Endif
Adors.close
Adocn.close
End Sub
為了實(shí)現(xiàn)上述目標(biāo),在橫線處填入合適的語句或表達(dá)式:
①
②
③組卷:7引用:2難度:0.1