試卷征集
加入會員
操作視頻
當前位置: 試卷中心 > 試卷詳情

2015-2016學(xué)年浙江省紹興一中高二(下)期末信息技術(shù)試卷

發(fā)布:2024/4/20 14:35:0

一、選擇題(本大題共9小題,每小題2分,共24分.在每小題給出的四個選項中,只有一個符合題目要求)

  • 1.備受中外矚目的上海迪士尼內(nèi)部測試啟動后有一些帖子在微博微信上熱轉(zhuǎn),有聲稱來自浙江、南京、重慶等全國近20個省市的“第一批體驗上海迪士尼的人”發(fā)文吐嘈迪士尼消費太高,表示“哭暈在廁所”.有人梳理對比發(fā)現(xiàn),這些文章使用的是同一組照片,文章內(nèi)容幾乎相同,僅僅只是客源地不同.下列說法正確的是
    ( ?。?/h2>

    組卷:9引用:1難度:0.9
  • 2.把校園卡放在食堂讀卡機上馬上會顯示出當前卡內(nèi)余額,此時一卡通系統(tǒng)對數(shù)據(jù)庫進行的操作是( ?。?/h2>

    組卷:6引用:1難度:0.9
  • 3.劉明在使用OCR軟件進行文字識別時出現(xiàn)如圖所示情況,為提高識別正確率,在重新識別前他應(yīng)該先進行的操作是( ?。?/h2>

    組卷:6引用:2難度:0.9
  • 4.小明要創(chuàng)作一個主題為“讓文明成為習慣”的多媒體作品.在創(chuàng)作之前對這個作品的使用頻度、所需資金及產(chǎn)生的經(jīng)濟效益進行分析,這屬于( ?。?/h2>

    組卷:11引用:4難度:0.9
  • 5.如果a,b,c均為整型變量,其中a=3,b=4,執(zhí)行以下語句,變量a,b的結(jié)果與其他幾項不同的是( ?。?/h2>

    組卷:8引用:2難度:0.7

四、加試題

  • 16.小劉想編寫一個字符串轉(zhuǎn)換程序,在文本框Text1中輸入原始字符串,單擊“轉(zhuǎn)換”按鈕Command1后,將其中的小寫英文字母轉(zhuǎn)換為大寫,并在文本框Text2中顯示.程序運行效果如圖所示.

    實現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯,請改正.
    Private Sub Command1_Click ( ?。?br />Dim a As String,b As String
    Dim i As Integer,c As String
    a=Text1.Text
    For i=1To Len(a)
    c=Mid(a,i,1)

    b=upcase(c)+b'(1)
    Next i

    Text2.Text=Str(b)'(2)
    End Sub
    '將小寫字母轉(zhuǎn)換為大寫字母
    Private Function upcase(c As String) As String
    If c>=“a“And c<=“z“Then
    upcase=Chr(Asc(c)-32)
    Else
    upcase=c
    End If
    End Function.

    組卷:2引用:1難度:0.1

加試題

  • 17.下列VB程序的功能是:程序運行時,單擊命令按鈕Commandl后,產(chǎn)生10個[1,999]范圍內(nèi)互不相同的隨機整數(shù),依次顯示在列表框List1中,然后將它們按從小到大的順序排序,排序結(jié)果顯示在列表框List2中.數(shù)組a用于存儲產(chǎn)生的10個隨機整數(shù),變量f用于標記隨機整數(shù)x與已生成的整數(shù)是否有重復(fù),如有則為True,沒有則為False.
    為實現(xiàn)上述功能,請在橫線處填入合適的代碼.
    Dim a(1To 10)As Integer
    Private Sub Command1_Click ( ?。?br />Dim n As Integer'n用于統(tǒng)計已經(jīng)產(chǎn)生的隨機整數(shù)個數(shù)
    Dim i As Integer,j As Integer
    Dim x As Integer,k As Integer
    Dim f As Boolean
    Randomize
    n=0
    List1.Clear
    List2.Clear
    Do While n<10
    x=
     
    '產(chǎn)生[1,999]范圍內(nèi)的隨機整數(shù)
    f=False
    For i=1To n
    If
     
    Then f=True
    Next i
    If f=False Then
    n=n+1
    a(n)=x
    List1.AddItem Str(a(n))
    End If
    Loop
    For i=1To 9
    For j=10To i+1Step-1
    If
     
    Then
    k=a(j):a(j)=a(j-1):a(j-1)=k
    End If
    Next j
    Next i
    For i=1To 10
    List2.AddItem Str(a(i))
    Next i
    End Sub.

    組卷:11引用:1難度:0.3
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司| 應(yīng)用名稱:菁優(yōu)網(wǎng) | 應(yīng)用版本:5.0.7 |隱私協(xié)議|第三方SDK|用戶服務(wù)條款
本網(wǎng)部分資源來源于會員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個工作日內(nèi)改正