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

          2017-2018學年浙江省杭州市西湖高級中學高二(下)月考信息技術試卷(5月份)

          發布:2024/4/20 14:35:0

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

          • 1.下列有關信息和信息技術的說法不正確的是(  )

            組卷:28引用:3難度:0.9
          • 2.小張對A.bmp圖象文件(如圖所示)進行如下處理,利用Winrar將A.bmp進行壓縮,得到B.rar文件;利用Photoshop軟件將A.bmp另存為C.jpg;把A.bmp重命名為D.jpg,下列說法正確的是(  )

            組卷:2引用:3難度:0.5
          • 3.小丁利用Word軟件編輯了一篇關于中國文字的文檔,部分界面如圖所示,下列說法正確的是(  )

            組卷:9引用:4難度:0.9
          • 4.已有Access軟件創建的“部分食品進貨數據”表結構及數據表如圖所示,下列四個選項中能作為記錄添加進該表的是(  )

            組卷:21引用:4難度:0.9
          • 5.某算法的部分流程圖如圖所示,執行這部分流程圖,變量i,s的值分別是(  )

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

          【加試題】

          • 16.數字頻率統計:小王編寫VB 程序,實現如下功能:在Text1 中輸入一串任意字符串(含數字),單擊“統計”按鈕Command1,在列表框List1 中統計并輸出數字0~9 出現的次數。運行界面如圖所示,VB 程序代碼如下。為實現上述功能,請在橫線處填入合適的代碼。
            Private Sub Command1_Click (  )
            Dim a(0To 9)As Integer,s As String
            Dim k As String,i As Integer
            s=Text1.Text
            List1.Clear
            For i=1To Len(s)
             

            If k>=“0“And k<=“9“Then
             

            End If
            Next i
            For i=0To 9
            List1.AddItem Str(i) &“出現了:“& a(i) &“次“
            Next i
            End Sub

            組卷:3引用:1難度:0.6
          • 17.小馬正在看一本偵探小說,想了解其中一段案情的解析,卻發現了一串字符“#2017-2018go:)”,并附有文字提示:①答案所在的頁碼是這串字符中最大數字字串(若值相同則取后面的數字字串)的起始位置*10+結束位置②答案所在行號是最大數值除以100的余數。例如:“#17a18#”字符串中,最大數字字串“18”,起始位置是5,結束位置是6,其頁碼是56,行號是18.小馬編寫了一個VB程序幫他尋找答案,程序運行界面如第16題圖所示。在文本框Text1中輸入這段字符串s1,單擊“揭秘”按鈕Command1,在文本框Text2中輸出頁碼,在Text3中輸出行號。
            實現上述功能的VB程序代碼如下,但加框處代碼有錯,請改正。
            Private Sub Command1_Click (  )
            Dim s1As String,s2As String
            Dim ch As String,ch2As String
            Dim max As Double
            Dim n As Integer,page As Integer
            Dim i As Integer,j As Integer
            s1=Text1.text:s2=““
            n=Len(s1)
            i=1:   (1)
            Do While i<=n
            ch=Mid(s1,i,1)
            If ch>=“0“And ch<=“9“Then
            j=i
            ch2=Mid(s1,j,1)
            Do While ch2>=“0“And ch2<=“9“
            j=j+1
            ch2=Mid(s1,j,1)
            Loop
            s2='(2)-(1)
            If
             
            Then'(2)-(2)
            max=Val(s2)
            page=i*10+j-1
            Text2.Text=Str(page)
            Text3.Text=Str(max Mod 100)
            End If
            i=j
            End If
            i=i+1
            Loop
            End Sub

            組卷:2引用:1難度:0.5
          APP開發者:深圳市菁優智慧教育股份有限公司| 應用名稱:菁優網 | 應用版本:5.0.7 |隱私協議|第三方SDK|用戶服務條款
          本網部分資源來源于會員上傳,除本網組織的資源外,版權歸原作者所有,如有侵犯版權,請立刻和本網聯系并提供證據,本網將在三個工作日內改正