2018-2019學(xué)年浙江省杭州市臨安區(qū)於潛中學(xué)高二(上)期末模擬信息技術(shù)試卷
發(fā)布:2024/4/20 14:35:0
一.選擇題(本大題共12小題,每小題2分,共24分.在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求)
-
1.如圖是某軟件管家對(duì)系統(tǒng)工具類(lèi)軟件提供的評(píng)價(jià)排名,這種評(píng)價(jià)屬于( ?。?br />
組卷:14引用:2難度:0.9 -
2.某協(xié)議的主要功能是完成對(duì)數(shù)據(jù)包的確認(rèn)、流量控制和網(wǎng)絡(luò)擁塞;自動(dòng)檢測(cè)數(shù)據(jù)包,并提供錯(cuò)誤重發(fā)的功能,該協(xié)議的簡(jiǎn)稱(chēng)是( ?。?/h2>
組卷:12引用:3難度:0.9 -
3.使用WinHex軟件查看字符“2017第一學(xué)期”的內(nèi)碼,部分界面如圖所示。下列說(shuō)法正確的是( )
組卷:36引用:3難度:0.9 -
4.使用Access軟件打開(kāi)數(shù)據(jù)庫(kù),部分界面如圖所示,下列說(shuō)法正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/202003/163/05a7952f.png" style="vertical-align:middle" />
組卷:4引用:3難度:0.7 -
5.目前很多的網(wǎng)絡(luò)電視都能實(shí)現(xiàn)視頻點(diǎn)播,點(diǎn)什么就播什么,這主要體現(xiàn)了多媒體的( ?。?/h2>
組卷:14引用:2難度:0.9
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)
-
16.編寫(xiě)VB程序,實(shí)現(xiàn)如下功能:?jiǎn)螕簟伴_(kāi)始”按鈕Command1,文本框Text1、Text2中自動(dòng)產(chǎn)生[0,99]的隨機(jī)整數(shù),用戶(hù)在文本框Text3中輸入兩數(shù)之和,單擊“檢測(cè)”按鈕Command2,在列表框List1中輸出計(jì)算結(jié)果是“正確”或“錯(cuò)誤”,到此完成第1題測(cè)試。單擊“下一題”按鈕Command3,文本框Text1和Text2中重新生成隨機(jī)整數(shù),進(jìn)行第2題測(cè)試……練習(xí)10題,一輪測(cè)試完成,每做對(duì)1題加10分,全部做對(duì)得100分。運(yùn)行界面如圖所示,程序代碼如下:
Dim c As Integer,Dim s As Integer
Private Sub Command1_Click ( ?。?br />c=0:s=0
Randomize
List1.Clear
Text1.Text=Str(Int(Rnd ( ?。?51))
Text2.Text=Str(Int(Rnd ( )*51))
Command1.Enabled=False
Command3.Enabled=True
End Sub
Private Sub Command2_Click ( ?。?br />If Val(Text3.Text)=Val(Text1.Text)+Val(Text2.Text) Then
List1.AddItem“正確“
s=s+10
Else
List1.AddItem“錯(cuò)誤“
End If
If c=10 Then
Command3.Enabled=False
Command1.Enabled=True
List1.AddItem“您的得分是“+
End If
End Sub
Private Sub Command3_Click ( ?。?br />代碼略'文本框Text1和Text2中重新生成數(shù)據(jù)
End Sub組卷:0引用:1難度:0.6 -
17.某倉(cāng)庫(kù)物品代碼格式為“X-XXX-XXXXX-Y”,其中“X”和“Y”均為0到9之間的數(shù)字,“Y”為校驗(yàn)碼.校驗(yàn)碼由前面9個(gè)X計(jì)算得到,計(jì)算方法為:從左邊開(kāi)始,第1個(gè)數(shù)字乘以1加上第2個(gè)數(shù)字乘以2…依此類(lèi)推,直到加上第9個(gè)數(shù)字乘以9,將該結(jié)果除以10,所得余數(shù)即為校驗(yàn)碼.
小吳設(shè)計(jì)一個(gè)根據(jù)校驗(yàn)碼校驗(yàn)物品代碼的VB程序,功能如下:在文本框Text1中輸入物品代碼,單擊“校驗(yàn)”按鈕Command1,如果輸入的校驗(yàn)碼與計(jì)算所得的校驗(yàn)碼一致,就輸出“校驗(yàn)通過(guò)”(如圖甲所示),否則輸出“校驗(yàn)不通過(guò)!”(如圖乙所示).
實(shí)現(xiàn)上述功能的VB程序如下,加框處代碼有錯(cuò),請(qǐng)改正.
Dim s As String′用于存儲(chǔ)輸入的物品代碼
Dim t As String
Dim i As Integer,j As Integer
Dim sum As Integer′用于存儲(chǔ)計(jì)算校驗(yàn)碼的累加和
Dim check-old As Integer′用于存儲(chǔ)輸入物品代碼中的校驗(yàn)碼Y
Dim check-new As Integer′用于存儲(chǔ)按照前面9個(gè)數(shù)字X計(jì)算所得的新校驗(yàn)碼
Dim a(1To 10)As Integer
Private Sub Command1-Click ( ?。?br />′從物品代碼中取出9個(gè)數(shù)字X依次存儲(chǔ)到a(1)到a(9)中,取出校驗(yàn)碼Y存儲(chǔ)到a(10)中
s=(1)
j=0
For i=1To 13
t=Mid(s,i,1)
If (t>=”0”) And(t<=”9”) Then
j=j+1
a(j)=Val(t)
End If
Next i
′計(jì)算新的校驗(yàn)碼并和輸入的校驗(yàn)碼進(jìn)行比較
sum=0
For i=1To 9
sum=sum+(2)
Next i
check-new=(3)
check-old=a(10)
If check-old=check-new Then
Label1.Caption=”校驗(yàn)通過(guò).”
Else
Label1.Caption=”校驗(yàn)不通過(guò)!”
End If
End Sub.組卷:22引用:3難度:0.5