試卷征集
加入會(huì)員
操作視頻
當(dāng)前位置: 試卷中心 > 試卷詳情

2016-2017學(xué)年浙江省“七彩陽光”新高考研究聯(lián)盟高二(上)期中信息技術(shù)試卷

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

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

  • 1.下列關(guān)于信息的說法,不正確的是(  )

    組卷:7引用:2難度:0.9
  • 2.下列關(guān)于網(wǎng)站和網(wǎng)頁說法不正確的是(  )

    組卷:3引用:3難度:0.9
  • 3.下列應(yīng)用中,沒有使用光學(xué)字符識(shí)別(OCR)技術(shù)的是( ?。?/h2>

    組卷:6引用:2難度:0.9
  • 4.關(guān)于Access數(shù)據(jù)庫的說法,不正確的是( ?。?/h2>

    組卷:3引用:2難度:0.7
  • 菁優(yōu)網(wǎng)5.某算法流程圖如圖所示:執(zhí)行該算法,輸出變量s和變量i的值分別為(  )

    組卷:0引用:2難度:0.5

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

  • 菁優(yōu)網(wǎng)16.刪除重復(fù)字符的程序。程序功能如下:在文本框Text1中輸入字符串,單擊“刪除重復(fù)字符”按鈕,在文本框Text2中輸出處理后的結(jié)果。程序運(yùn)行效果如圖所示。實(shí)現(xiàn)上述功能的VB代碼如下,但加框處代碼有錯(cuò),請改正。
    Private Sub Command1_ Click ( ?。?br />x=TextI Text
    n=Len(x)
    s=s+Mid(x,1.1)
    For i=2 To n
    flag=0
    For j=1 To Len(s)
    If 菁優(yōu)網(wǎng)Then
    flag=1:Exit For
    End If
    Next  j
    If 菁優(yōu)網(wǎng)Then
    s=s+Mid(x,i.D
    End If
    Next i
    Text2,Text=s
    End Sub

    組卷:0引用:1難度:0.3
  • 17.小明編寫了一個(gè)查名次的程序。程序功能如下:運(yùn)行程序,讀取數(shù)據(jù)庫,將相關(guān)信息讀入到數(shù)組中(xh存放學(xué)號(hào),xm存放姓名,zf存放總分,mc存放名次)并在列表框 list I中顯示學(xué)生的相關(guān)信息,單擊“排名次”按鈕,在列表框list2中顯示帶有名次的學(xué)生相關(guān)信息(總分相同的名次一樣)。在文本框中輸入學(xué)生的學(xué)號(hào),單擊“查名次”按鈕,則在窗體中顯示該學(xué)號(hào)對(duì)應(yīng)的學(xué)生姓名與名次。程序運(yùn)行效果如圖所示。
    菁優(yōu)網(wǎng)
    實(shí)現(xiàn)上述功能的VB程序如下:
    (1)通過分析代碼可知該數(shù)據(jù)表的名稱為
     

    (2)實(shí)現(xiàn)上述功能的VB程序如下:請?jiān)跈M線處填入合適代碼。
    Dim xh(n) As Strin
    Dim xm(n)As String
    Dim zf(n) As Integer
    Dim mc(n) As Integer
    Private Sub Form _Load (  )
    Dim conn As New AlXODB Connection
    Dim rs as new adodb,recordset
    Dim n As Integer i As Integer,k As Integer
    conn,ConncctionString-“Provider=Microsoft.ACE OLEDB,12.0:Data Source=
    +App.Path+“\student.jye.ai”
    conn open
    Set rs,ActiveConnection=conn
    rs,“Open SELECT*FROM score“
    ListI.Additem“學(xué)號(hào)”+“”+“姓名”+”“”+“總分“
    n=0
    Do While not rs EOF'到最后一條記錄后退出循環(huán)
    n=n+1
    xh(n)=rs.Fields(“學(xué)號(hào)”)
    xm(n)=s.Fields(“姓名“)
    zf(n)=rs.Fields(“總分“)
    ListI,AddItem xh(i)+“”+xm(i)+“”+Str(zf(i))
     
    ‘移動(dòng)到下一條記錄
    Loop
    rs Close
    conn.Close
    Set rs=Nothing
    Set conn=Nothing
    Private Sub Commandl Click( ?。?br />For i=I To n
    k=i
    For j=i+I To n
    If zf(j)<zf(k) Then k=j
    Next j
    If
     
    Then
    Templ xh(i):xh(i)=xh(k):xh(k)=Templ
    Temp2=xm(i):xm(i)=xm(k):xm(k)=Temp2
    Temp3=zf(i):zf(i)=zf(k):zf(k)=Temp3
    End If
    Next i
    mc(1)=1
    For i=2 To n
    If zf(i)=zf(i-1)Then
     

    Else
    mc(i)=i
    End If
    Next i
    List2.AddItem“學(xué)號(hào)“+“”+“姓名”+“總分”+“名次”
    For i=I To n
    List2 AddItem xh(i)+“”+xm(i)+“”+Str(zf(i))+“”+
     

    Next i
    End Sub

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