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

          2016年浙江省金華十校高考信息技術模擬試卷

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

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

          • 1.下列有關信息的說法,正確的是(  )

            組卷:15引用:4難度:0.9
          • 2.關于信息的表達與交流,下列說法正確的是(  )

            組卷:8引用:3難度:0.9
          • 3.王老師將刊登在期刊上的一篇文章掃描后,通過OCR軟件識別出文字,并用Word軟件編輯處理.下列說法不正確的是(  )

            組卷:6引用:6難度:0.9
          • 4.某商場的用戶信息表如下(  )
            會員基本信息表
            編號 姓名 性別 出生年月 賬戶余額 貴賓等級
            090101 王天明 1989-12-03 100.00 普通會員
            090102 張利明 1987-01-03 3287.00 黃金會員
            090103 孫云華 1978-08-01 8567.00 鉆石會員
            若使用Access數據表來存儲會員信息,下列部分字段設計中合理的是(  )

            組卷:4引用:4難度:0.9
          • 5.某算法的部分流程如圖所示,若流程執行時,輸入x的值為13,那么輸出的依次是(  )

            組卷:7引用:3難度:0.5

          二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題3分,第17小題6分,共26分)

          • 16.在數據庫的兩張數據表中有各有一批學生的考試成績,小吳要將兩張表中的數據讀取并按成績從高到低排列輸出.成績相同時,第一批學生優先輸出.小吳編寫了一個VB程序,程序運行時,將相關信息分別讀入數組cj和xm的前后兩段,單擊按鈕 Command1 后,在列表框List1中輸出運行結果.實現上述功能的 VB 代碼如下,但加框處代碼有錯,請改正:
            Dim  xm(1to 1000)as string'存儲學生姓名
            Dim  cj(1to 1000)as integer'存儲學生成績
            Dim  rs1  as  integer'第一批學生人數
            Dim  rs2  as  integer'第二批學生人數
            Private Sub Form_Load'該處具體代碼省略
            '第1步:從數據庫讀取第1批學生的人數rs1,按成績從高到低的順序將成績存入cj(1)、'cj(2)…cj(rs1)中,姓名存入xm(1)、xm(2)…xm(rs1)中
            '第2步:從數據庫讀取第2批學生的人數rs2,按成績從高到低的順序將成績存入'cj(rs1+1)、cj(rs1+2)…cj(rs1+rs2)中,姓名存入xm(rs1+1)、xm(rs1+2)…xm(rs1+rs2)中
            End Sub
            Private Sub Command1_Click
            i=1'i表示第一批中,尚未輸出的學生中成績最高學生的序號
            j=rs1+1'j表示第二批中,尚未輸出的學生中成績最高學生的序號
            ‘以下程序開始按成績高低逐個輸出,每次輸出前后兩段中,尚未處理的學生中成績最高的
            n=1
             
            ‘(1)
            Do While   i<=rs1And j<=rs1+rs2‘兩段都有未輸出的情況,輸出兩段中最大值
            n=n+1
            If  cj(i)>=cj(j)  Then
            k=i:i=i+1
            Else
            k=j:j=j+1
            End If
            List1.AddItem (“第“+Str(n)+“名“+xm(k)+“成績:“+Str(cj(k)))
            Loop
            Do While i<=rs1‘剩下第一段還有未輸出的,逐個輸出
            n=n+1
            List1.AddItem (“第“+Str(n)+“名“+xm(i)+“成績:“+Str(cj(i)))
            i=i+1
            Loop
            Do While
            j<=rs2
             
            ‘(2)若第二段還有未輸出的,逐個輸出
            n=n+1
            List1.AddItem (“第“+Str(n)+“名“+xm(j)+“成績:“+Str(cj(j)))
            j=j+1
            Loop
            End Sub.

            組卷:8引用:1難度:0.3
          • 17. 某單位招考公務員,2010年和2011年各有4020名和2000名考生報名,下列VB程序用于統計兩次考試都參加的考生信息.程序界面設計如圖所示,2010年和2011年的考生信息分別顯示在List1和List2中,點擊“統計”按鈕,在List3中顯示兩次考試都參加的考生信息和總人數.
            (1)實現上述功能的 VB 程序如下,請在橫線處填入合適代碼.
            Dim a (1To 4020 )  As  String
            Dim b (1To 2000 )  As  String
            Private  Sub  Form_Load
            Dim conn   As New ADODB.Connection
            Dim rs As New ADODB.Recordset
            Dim constr as string
            Constr=“Provider=Microsoft.ace.OLEDB.12.0;“
            Constr=constr &“Data Source=“& App.Path+“\data\KaoSheng.jye.ai“
            conn.ConnectionString=constr
            conn.open
            Dim sql As String
            ‘將參加2010年下半年考試的考生的身份證號碼按升序存放在a數組中
            sql=“select*from  kaoshengInfo  where  year=’2010’order by sfzh asc“
            rs.Open sql,conn
            i=0
            Do While Not rs.EOF
            i=i+1
            a(i)=rs(“sfzh”)
            List1.additem(a(i))
            rs.MoveNext
            Loop
            ‘將參加2011年下半年考試的考生的身份證號碼按升序存放在b數組中
            sql=“select*from kaoshengInfo  where year=‘2011’order by sfzh asc“
            rs.Open sql,conn
            i=0
            Do While Not rs.EOF
            i=i+1
            b(i)=rs(“sfzh”)
            List2.additem(b(i))
            rs.MoveNext
            Loop
            rs.Close
            End Sub
            Private Sub Command1_Click
            Dim  bot  As Integer,top  As  Integer,m  As  Integer
            Dim  i  As  Integer,ans  As  integer
            ans=0
            For  i=1  To  2000
            bot=1
             

            Do  While   bot<=top
            m=Fix ( ( bot+top )/2 )
            If  a ( m )=b ( i )  Then
            List3.AddItem   a ( m )
             

            Exit  Do
            ElseIf ②
             
            Then
            Top=m-1
            Else
            bot=m+1
            End If
            Loop
            Next  i
            List3.AddItem“總計”+str(ans)+“人次”
            End  Sub
            (2)分析上述代碼,在數據庫中用于存放考試信息的數據表名稱是
             

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