2016年浙江省寧波市高考信息技術(shù)模擬試卷(3月份)
發(fā)布:2024/12/11 18:30:2
一、選擇題(本大題共12小題,每小題2分,共24分.每小題列出的四個備選項(xiàng)中只有一個是符合題目要求的,不選、多選、錯選均不得分)
-
1.《我是歌手》是廣大觀眾十分喜愛的綜藝節(jié)目,工作人員在節(jié)目現(xiàn)場拍攝視頻,并經(jīng)過后期剪輯,再通過衛(wèi)星信號或網(wǎng)絡(luò)信號傳遞到千家萬戶,那么拍攝視頻的過程屬于( ?。?/h2>
組卷:11引用:3難度:0.9 -
2.小張的QQ號被盜,經(jīng)過申訴后取回,為了保障QQ號的安全,下列做法合理的是( ?。?br />①通過申訴取回就表示QQ號是我專用的,不用進(jìn)行任何操作
②把QQ號與自己的常用手機(jī)綁定
③更改QQ密碼為自己的生日
④重新設(shè)置QQ密保問題
⑤購買QQ令牌并綁定
⑥更新殺毒軟件并進(jìn)行完全掃描.組卷:6引用:2難度:0.9 -
3.在word文檔中輸入“computeir”時,發(fā)現(xiàn)其立即變?yōu)椤癱omputer”,這是因?yàn)閃ord軟件具有( ?。?/h2>
組卷:9引用:3難度:0.9 -
4.字符“A”比“a”的ASCII碼值小32(十進(jìn)制),已知字符“K”的二進(jìn)制為1001011,則字符“k”的二進(jìn)制ASCII碼值是( )
組卷:16引用:6難度:0.7 -
5.小紅從網(wǎng)上下載了一個Wave格式的高保真音頻文件,并用GoldWave軟件轉(zhuǎn)換成了MP3格式,下列說法正確的是( )
組卷:4引用:2難度:0.5
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題4分,第17小題5分,共26分)
-
16.【加試題】有一英文單詞處理的Visual Basic程序,程序運(yùn)行效果如第16題圖所示.在界面上方的文本框 Text1 中輸入英文語句,單擊“統(tǒng)計(jì)”按鈕(Command1),在右下方的列表框 List1 中顯示英文單詞及其在語句中出現(xiàn)的位置,并在按鈕上方的標(biāo)簽框 Label2中顯示單詞個數(shù)(假定每個單詞中不包含英文字母以外的其他字符).
實(shí)現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯,請改正.
Private Sub Command1_Click( ?。?br />Dim a(1To 1000)As String
Dim d(1To 1000)As Integer
List1.Clear s=Text1.Text
slen=Len(s) j=0 k=1
b=1
For i=1To slen
c=Mid(s,i,1)
If Then'(1)
If j<>0 Then
a(k)=Mid(s,b,j)
d(k)=b
k=k+1
j=0
End If
b=i+1
Else
j=j+1
End If
Next i
For i=1To k-1
List1.AddItem +““+a(i)'(2)
Next
Label2.Caption=Str(k-1)+“個“
End Sub.組卷:2引用:1難度:0.1 -
17.【加試題】小張為了處理2015年中國主要城市的GDP數(shù)據(jù),他把2015年中國主要城市的GDP據(jù)存儲在數(shù)據(jù)庫文件gdp.jye.ai中.他設(shè)計(jì)了一個Visual Basic程序,程序運(yùn)行效果如第17題圖所示.在界面的左側(cè)列表框List1中顯示按各城市GDP數(shù)值,單擊“按人均GDP排序”按鈕(Command1),在右側(cè)列表框List2中顯示排序完成后的結(jié)果
(按人均GDP值從高到低排序).
實(shí)現(xiàn)上述功能的VB代碼如下:
(1)請?jiān)诳崭裉幪钊牒线m代碼.
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim n As Integer,i As Integer,j As Integer
Dim t As Long,ts As String
Dim a(1To 200)As Integer
Dim c(1To 200)As String
Dim g(1To 200)As Long
Dim p(1To 200)As Long
Private Sub Form_Load ( ?。?br />conn.ConnectionString=“Provider=Microsoft.ACE.OLEDB.12.0;Data Source=“_
& App.Path &“\gdp.jye.ai“
'上面語句中的“_“為語句換行符,表示下一行內(nèi)容為本行的繼續(xù) conn.Open
Set rs.ActiveConnection=conn rs.Open“SELECT*FROM dGDP“
n=0'Ⅰ處代碼
Do While Not rs.EOF n=n+1 a
(n)=rs.Fields(“GDP排名“).Value c(n)=rs.Fields(“城市“).Value
g(n)=rs.Fields(“GDP“).Value p(n)=rs.Fields(“人均GDP“).Value
List1.AddItem Str(a(n))+““+c(n)+““+_
Str(g(n))+““+Str(p(n))
'上面語句中的“_“為語句換行符,表示下一行內(nèi)容為本行的繼續(xù)
rs.MoveNext Loop rs.Close conn.Close
Set rs=Nothing
Set conn=Nothing
End Sub
Private Sub Command1_Click ( ?。?br />For i=1To n-1
For j=①
If p(i)<p(j) Then
a(i)=a(i)+a(j)
a(j)=a(i)-a(j)
②
ts=c(i)
c(i)=c(j)
c(j)=ts
t=g(i)
g(i)=g(j)
g(j)=t
t=p(i)
p(i)=p(j)
p(j)=t
End If
Next j
Next i
List2.Clear
For i=1To n
List2.AddItem Str(a(i))+““+c(i)+““+_
Str(g(i))+““+Str(p(i))
'上面語句中的“_“為語句換行符,表示下一行內(nèi)容為本行的繼續(xù)
Next i
End Sub
(2)若Ⅰ處代碼n=0改為 n=1程序運(yùn)行結(jié)果將不正確,其原因是組卷:3引用:1難度:0.1