2017年浙江省信息技術(shù)考前押寶試卷（1）
發(fā)布：2024/4/20 14:35:0
一、選擇題（共12小題，每小題2分，滿分24分）
-
1．關(guān)于信息安全與網(wǎng)絡(luò)道德，下列地正確的是（ ?。?/h2>
組卷：9引用：1難度：0.9 -
2．下列有關(guān)瀏覽器與網(wǎng)頁的說法，不正確的是（ ?。?/h2>
組卷：9引用：1難度：0.9 -
3．使用Word 軟件編輯某文檔，部分界面如圖所示，下列說法正確的是（ ?。?img alt src="https://img.jyeoo.net/quiz/images/201711/20/29ed8b3e.png" style="vertical-align:middle" />
組卷：5引用：1難度：0.9 -
4．使用UItraEdit 軟件觀察字符內(nèi)碼，部分界面如圖所示，下列說法正確的是（ ）
組卷：9引用：1難度：0.5 -
5．使用Access 軟件創(chuàng)建的數(shù)據(jù)表，其數(shù)據(jù)表視圖和設(shè)計視圖的部分界面如圖所示，下列說法正確的是（ ?。?img alt src="https://img.jyeoo.net/quiz/images/201711/20/0178a6a6.png" style="vertical-align:middle" />
組卷：8引用：1難度：0.5
二、解答題（共5小題，滿分26分）
-
16．[加試題]如果數(shù)據(jù)a的任意一個元素都是數(shù)組b的元素，那么數(shù)組a稱為數(shù)組b的子集．例如數(shù)組a的元素依次為[1，3，5]，數(shù)組b的元素依次為[1，2，3，4，5]，數(shù)組a的任意一個元素都是數(shù)組b的元素．所以數(shù)組a稱為數(shù)組b的字集．小杜編寫了一個VB程序，用于判斷數(shù)組a是否是數(shù)組b的子集，功能如下：程序運行時隨機產(chǎn)生na個不重復的隨機數(shù)存儲在數(shù)組a中，隨機產(chǎn)生vb個不重復的隨機數(shù)存儲在數(shù)組b中．單擊按鈕Command1，在標簽Labell上顯示判斷的結(jié)果，程序運行界面如圖所示．
實現(xiàn)上述功能的VB程序如下，但加框處代碼有錯，請改正．
Const na=5
Const nb=10
Dim a（1 To na） As Integer
Dim b（1 To nb） As Integer
Privae Sub Form-Load（ ?。?br />’產(chǎn)生隨機依次存儲在數(shù)組a和數(shù)組b中，并在列表框輸出，代碼略
End Sub
Private Sub Command1-Click（ ?。?br />Dim i As Integer,j As Integer
Dim flag As Boolean
flag=True
Do While i＜=na And flag
For j=1 To nb
If a （i）=b（j） Then
Exit For
End If
Next j
If
Then flag=False
i=i+1
Loop
If flag Then
Labell.Caption=“數(shù)組a是數(shù)組b的子集“
Elase
Labell.Caption=“數(shù)組a不是數(shù)組b的子集“
End If
End Sub.組卷：5引用：1難度：0.3 -
17．[加試題]RGB色彩模式是工業(yè)界的一種顏色標準，是通過對紅（R）、綠（G）、藍（B）三個顏色通道的變化以及它們相互之間的疊加來得到各式各樣的顏色．RGB顏色分量的值通常采用十進制數(shù)表示，而Flash軟件中顏色值采用十六進制數(shù)表示．比如RGB（100，255，10）等價于十六進制顏色碼#64FFOA，每個RGB顏色分量對應(yīng)兩位十六進制數(shù)．
小杜編寫一個RGB顏色值轉(zhuǎn)十六進制顏色碼的轉(zhuǎn)換程序，程序功能如下：程序運行時在文本框Text1輸入RGB顏色值，輸入格式為“RGB（x,y,z）”，x,y,z的范圍都是[0，255]．單擊“轉(zhuǎn)換”按鈕Command1，在標簽Labell上輸入對應(yīng)的十六進制顏色碼．程序運行界面如圖所示，實現(xiàn)上述功能的VB程序如下，請回答下列問題：顏色 R G B 十進制 100 255 10 十六進制 64 FF OA
（1）程序運行時，在文本框Text1輸入RGB（25，0，101），則標簽Labell上顯示的內(nèi)容是．
（2）請在橫線處填入合適的代碼．
Private Sub Command1-Click（ ?。?br />Dim s As String,ch As Integer
Dim ans As String
Dim a（1 To 3）As Integer’用于存儲RGB對應(yīng)的3個分量
Dim i As Integer,j As Integer
s=Mid （s,5，Len（s）-5）’取出括號內(nèi)的字符串
i=1：j=1
Do While i＜=Len（s）
ch=Mid （s,i,1）
If ch＞=“0“And ch＜=“9“Then
a（j）=
Else
j=j+1
End If
Loop
For i=1 To 3
Next i
Labell.Caption=“#“+ans
End Sub
Function btoh（x As Integer） As String’將十進制數(shù)轉(zhuǎn)換成兩位十六進制數(shù)
Const zf=“0123456789ABCDEF“
Dim r As Integer,h As String
h=““
Do While x＞0
r=x Mod 16
h=Mid （zf,r+1，1）+h
x=x\16
Loop
If Len （h）=1 Then h=“0“+h
If Len（h）=0 Then h=“00“
End Function.組卷：4引用：1難度：0.3