<source id="v77gz"></source>
    <u id="v77gz"><p id="v77gz"></p></u>

      <samp id="v77gz"></samp>

      <var id="v77gz"><td id="v77gz"><ins id="v77gz"></ins></td></var>

      <video id="v77gz"></video>
      <source id="v77gz"></source>
    1. 江蘇省高校計算機等級考試命題研究院 江蘇省高校計算機等級考試輔導
      2011年春季江蘇省二級VB考試真題與答案

      第一部分計算機基礎知識

      1.下列有關通信技術的敘述中,錯誤的是___(1)___ 。

        A  無論是模擬通信還是數字通信,目前都是通過載波技術實現遠距離的信息傳輸

        B  多路復用技術可以降低信息傳輸的成本,常用的多路復用技術有TDMFDM

        C  衛星通信屬于微波通信,它是微波接力通信技術和空間技術相結合的產物

        D  目前3G移動通信有多種技術標準,我國三大電信運營商均采用同一標準

      2.使用存儲器存儲二進位信息時,存儲容量是一項很重要的性能指標。存儲容量的單位

          有多種,下面不是存儲容量單位的是___(2)___    。

          A  TB

          B  XB

          C  GB   

          D  MB  

      3.設有補碼表示的兩個單字節帶符號整數a=01001110b=01001111。則a-b的結果用補碼表示為___(3)___  。

          A  11111111

          B  10011101

          C  00111111

          D  10111111

      4  下列有關PC機主板上BIOSCMOS的敘述中,錯誤的是___(4)___  。

        A  BIOS芯片是一塊閃爍存儲器,其存儲的信息關機后不會丟失

        B  BIOS中包含加電自檢程序、系統自舉程序等

        C  CMOS芯片屬于易失性存儲器,它使用電池供電

        D  CMOS中存放著與硬件相關的一些配置信息,以及CMOS設置程序

      5  下列有關PC機中央處理器(CPU)和內存(內存條)的敘述中,錯誤的是___(5)___  。

        A  目前PC機所使用的PentiumCore 2微處理器的指令系統有數百條不同的指令

        B  所謂雙核CPU或四核CPU,是指CPU由兩個或四個芯片組成

        C  DDR內存條、DDR2內存條在物理結構上有所不同,例如它們的引腳數目不同

        D  通常臺式機中的內存條與筆記本電腦中的內存條不同,不能互換

      6  下列有關PCIO總線與IO接口的敘述中,正確的是___(6)___  。

        APC機中串行總線的數據傳輸速率總是低于并行總線的數據傳輸速率

        B  SATA接口主要用于連接光驅,不能連接硬盤

        c  通過USB集線器,一個USB接口理論上可以連接127個設備

        D  IEEEl394接口的連接器與USB連接器完全相同,均有6根連接線

      7  藍光光盤(BD)是全高清影片的理想存儲介質,其單層盤片的存儲容量大約為___(7)___ 。

        A4.7GB

        B. 8.5GB

        C17GB

        D25GB

      8  下列有關PC機常用IO設備(性能)的敘述中,錯誤的是___(8)___。

        A  通過掃描儀掃描得到的圖像數據可以保存為多種不同的文件格式,例如JPEG、

          TIF

        B  目前數碼相機的成像芯片均為CCD類型,存儲卡均為SD

          C  刷新速率是顯示器的主要性能參數之一,目前PC顯示器的刷新速率一般在60Hz

          以上

          D  從彩色圖像輸出來看,目前噴墨打印機比激光打印機有性價比優勢

      9  下列有關計算機軟件的敘述中,錯誤的是___(9)___   ·

          A  軟件的主體是程序,單獨的數據和文檔資料不能稱為軟件

          B  軟件受知識產權(版權)法的保護,用戶購買軟件后僅得到了使用權

          C  軟件的版權所有者不一定是軟件的作者(設計人員)

          D  共享軟件允許用戶對其進行修改,且可在修改后散發

      10PC機從硬盤啟動Windows XP操作系統是一個比較復雜的過程·在這個過程中,它需

        要經過以下這些步驟:

        I.裝入并執行引導程序

        .讀出主引導記錄

        Ⅲ.裝入并執行操作系統

        .加電自檢

      在上述步驟中,正確的工作順序是___(10)___

      A  I、、、

      B  、I、lI、

      C  、II、I、

      D  、、II、I

      11.下列有關算法和程序關系的敘述中,正確的是___(11)___

        A  算法必須使用程序設計語言進行描述

        B  算法與程序是一一對應的

        C  算法是程序的簡化

        D  程序是算法的具體實現

      12.采用ADSL方式接入因特網時,ADSLModem將電話線傳輸信道分為三個信息通道:

        語音通道、上行數據通道、下行數據通道。下列有關這三個信息通道的敘述中,錯誤

      的是 ___(12)___ ·

      A  語音通道的頻帶最寬、采用的頻率最高,以保證電話通話的質量

      B  通常上行數據通道的數據傳輸速率低于下行數據通道的數據傳輸速率

      C  ADSL的數據傳輸速率是根據線路情況自動調整的

      D  這三個信息通道可以同時工作,即可以同時傳輸信息(數據)

      13.無線局域網是以太網與無線通信技術相結合的產物,其采用的網絡協議主要是IEEE

      制訂的___(13)___   。

      A  IEEE 8023

      B  IEEE 80211

      C  IEEE 1394

      D  IEEE 1394b

      14.在因特網中目前主要采用IPv4協議,IP地址長度為32位,只有大約36億個地址。新

      的第6IP協議(IPv6)已經將IP地址的長度擴展到___(14)___ 位,幾乎可以不受限制地提供地址。

          A  48

          B  64

          C  128

          D  256   

      15·因特網由大量的計算機和信息資源組成,它為網絡用戶提供了非常豐富的網絡服務。

        下列與www服務相關的敘述中,錯誤的是___(15)___    。

        A.  WWW采用客戶機服務器工作模式

        B  網頁到網頁的鏈接信息由URL指出

        C  瀏覽器是客戶端應用程序  

        D  所有的網頁均是HTML文檔

      16·目前Windows操作系統支持多種不同語種的字符集,即使同一語種(例如漢語)也可

        有多種字符集。下列字符集中,不包括、等繁體漢字的是___(16)___    。

        A  GBK

        B  Big5

        C  GB2312

        D  GBl8030

      17·下列與數字圖慟圖形相關的敘述中,錯誤的是___(17)___    。

        彩色圖像在數字化過程中需進行分色處理,然后對不同的基色進行取樣和量化

        如果某RGB圖像的像素深度為12,則可表示的顏色數目為2

        數碼相機常用JPEG格式保存圖像文件,該格式的圖像大多采用有損壓縮編碼

      D·’圖形是計算機合成的圖像,也稱為矢量圖形

      18.文件的擴展名用于標記文件的類型,用戶應該盡可能多地知曉各類文件的擴展名。下列文件中,屬于數字視頻的文件是___(18)___

        A  ABCRMVB

        B  ABCDLL

        C  ABCPDF

        D  ABCMIDI

      19.下列幾種類型的系統軟件中,不屬于計算機集成制造系統(CIMS)范疇(或者說,CIMS無直接關系)的是___(19)___。

        A  GIS

        B  CAM

        C  MRP

        D  ERP

      20下列有關Microsoft PowerPoint 2003Microsoft FrontPage 2003軟件的敘述中,錯誤的是  20  。

        型用PowerPoint編輯演示文稿時,可以將每張幻燈片保存為JPEG圖片

        利用PowerPoint編輯演示文稿時,可以錄制聲音    。

        利用FrontPage制作網頁時,無法直接查看網頁的HTML代碼

        利用FrontPage制作網頁時,背景圖片可以設置為水印效果

      第二部分 Visual Basic程序設計

      一、選擇題(用答題卡答題,答案依次填在2130答題號內)

      21.以下說法中,正確的是    21    。

      A.屬性是對象的特征,所有的對象都有相同的屬性

      B.屬性值只能在屬性窗口中設置

      C.在程序中可以用賦值語句給對象的任何一個屬性賦值

      D.對象的運行時屬性不出現在對象屬性窗口中

      22.下面4個語句中,錯誤的是___(22)___

        AN=InputBox(輸入N:,,5)

        B.InputBox(輸入N:,,5)

        CMsgBox請回答

      DK=MsgBox(”請回答”)

      23.若設X=1,Y=2,則不能在窗體上顯示出”A=3”的語句是___(23)___

      APrint  A=X+Y

      BPrint ”A=”;X+Y

       CPrint ”A=”+Str(X+Y)

      DPrint ”A=”& X+Y

      24表達式InStr(4,”abcabca”,”c”)+Int(2.5)的值為___(24)___

        A7    B8    C5  D9

      25.以下有關數組的說法中,錯誤的是___(25)___

      A.用ReDim語句重新定義動態數組時,其下標的上下界可以使用賦了值的變量

      B.用ReDim語句重新定義動態數組時,不能改變已經說明過的數組的數據類型

      C.使用ReDim語句一定可以改變動態數組的上下界

      D.定義數組時,數組維界值可以不是整數

      26.以下有關過程的說法中,錯誤的是___(26)___   。

      A.不論在Function過程中是否給函數名賦過值,都會返回一個值

      B.不能在FunctionSub過程內部,再定義FunctionSub過程

      CFunction過程與Sub過程,都可以是無參過程

      D.過程名可以和主調過程的局部變量同名

      27.下列關于菜單的說法中,錯誤的是___(27)___。.

      A.除了Click事件之外,菜單項不能響應其他事件

      B.菜單的名稱項(Name屬性)不可缺省

      C.只有當代碼窗口為當前活動窗口時,才能打開菜單編輯器

      D.菜單項的快捷鍵不能任意設置

      28.設a=1,b=2,c=3,邏輯表達式ab Xor c的值是___(28)___

        AFalse    B-1    CTrue   D  1

      29.在窗體Form1中用“Public Sub Fun(x As Integer,Y As Single)”定義過程Fun,在窗體Form2的某事件過程中定義了變量IJ均為Integer,若要在此過程中調用Form1中的Fun過程,則下列語句中正確的___(29)___    。

      ACall Fun(I,J)

      BCall Forml.Fun(I,J)

      CFun I,(J)

      DForm1.Fun I,(J)

      30.以下有關文件操作的說法中,正確的是  30    。

      A.在某過程中用Open語句打開的文件,只能在這個過程中使用

      B.不能用Output、Append方式打開一個不存在的順序文件

      C.在Input方式下,可以使用不同的文件號同時打開同一個文件

      D.在不同的過程中,可以用同一個文件號同時打開不同的文件

      二、填空題(請將答案填寫在答題紙的相應答題號內,每個答案只占一行)

      執行下列程序,單擊按鈕Command1,窗體上顯示的第一行內容是___(1)___,第二行是___(2)___,第三行內容是___(3)___    。

      Option Explicit

      Private Sub Command1_Click()

        Dim a As Integer,b As Integer

        a=4

        b=3

        Do Until a>10

          b=b2

          Do Until b>10

            a=(a+b)\2+b

            b=b+5

            Print a,b

          Loop

          a=a-3

        Loop

      End Sub

      2.執行下面程序,當單擊Cmd1時,在窗體上顯示的第一行內容是___(4)___第二行的內容是___(5)___,第四行的內容是___(6)___    。

      Option Explicit

      Private Sub Cmd1_Click()

        Dim a As Integer,b As Integer

        a=1

        b=2

        Print fun(2*b,fun(a,(b)))

        Print a;b

      End Sub

      Private Function fun(x As Integer,y As Integer) As Integer

          x=x+2

          y=x-y+3

          fun=x+y

          Print fun

      End Function

      3.執行下面的程序,單擊CmdRun后,數組元素a(1,2)的值是___(7)___,a(2,1)的值是

      ___(8)__,a(3,2)的值是___(9)___

          Option Explicit

          Option Base 1

          Private Sub CmdRun_Click()

             Dim A(3,3)As Integer,i As Integer,j As Integer,k As Integer,n As Integer

             n=3

             i=1j=n

             A(i,j)=1

             For k=2 To n*n

               If i+1>n Then

                  i=n-j+2j=1   

               ElseIf i+1<=n And j+1>n Then

                  j=j-ii=1

               Else

                  i=i+1j=j+1

               End If

               A(i,j)=k

             Next k

             For i=1 To n

                For j=1 To n

                   Print A(i,j);

                Next J

                Print

             Next i

          End Sub

      4.運行程序,在文本框Text1中輸入用空格分隔的4位二進制數1001、01010110。單擊處理按鈕,在多行文本框Text2中第一行顯示___(10)___,第二行顯示___(11)___    ,第三行顯示___(12)___

      Option Explicit

      Private Sub Cmd1_Click0

        Dim S(3) As String,n As Integer

        Dim i As Integer,k As Integer

        k=1

        For i=1 T0 3

          S(i)=Mid(Text1,k,4)

          k=k+5

          Call Transform(n,S(i))

          Text2=Text2 & n & vbCrLf

        Next i

      End Sub

      Private Sub Transform(n As Integer,S As String)

        Dim k As Integer,i As Integer,L As Integer

        L=Len(S)

        If Val(Mid(S,1,1))=1 Then

          n=-(2^(L-1))

        Else

          n=0

        End  If

       For i=2 To L

          k=Mid(S,i,1)

          n=n+k*2^(L-i)

       Next i

      End  Sub

        

      5.執行下列程序,單擊CmdRun按鈕,則窗體上顯示的第一行是___(13)___ ,第二行是___(14)___最后一行是___(15)___

      Option Explicit

      Private Sub Command1_Click()

        Dim n As Integer

        For n = 4 To 7

          If Fun1(n, Sqr(n)) Then

            Print n; "SS"

          Else

            Print n; "HS"

          End If

        Next n

      End Sub

      Private Function Fun1(n As Integer, i As Integer) As Boolean

          If i = 1 Then

            Fun1 = True

          ElseIf n Mod i <> 0 Then

            Fun1 = Fun1(n, i - 1)

          Else

            Fun1 = False

          End If

      End Function

      6.下面程序的功能是求S的值。

      計算到第k項的值小于等于1O 為止.請完善本程序。

        Option Explicit

        Private Sub CmdSum_Click()

          Dim s As Single,x As Single,k As Integer,t As Single

      x=CSng(Text1.Text)

         ___(16)___

      DO

           t=pt(x,k)

           s=s+t

           k=k+1

        Loop Until t<=0.000001

        Text2.Text=CStr(s)

      End Sub

      Private Function pt(x As Single,n As Integer)As Single

        Dim iAs Integer

        ___(17)___

      For i=1 To n

          pt=___(18)___

      Next i

      pt=pt/x^n

      End Function

      7.下面程序的功能是,找出100---999之間具有以下特點的整數:其全部真因子(1和自身除外的因子)中,所有素數因子之和的2倍等于其余因子的和數.請完善本程序。

        Option Explicit

        Option Base 1

        Private Sub Command1_Click()

          Dim i As Long,J As Long,m As Integer,st As String

          Dim a() As Integer

          For i=100 To 999

           ___(19)___

      For j=2 To i-1

             If i Mod j=0 Then

               m=m+1

               ___(20)___

               a(m)=J

             End If

      Next j

      If m>O Then

            If yzh(a,st) Then List1.AddItem i & “” & st

           End If

           Erase a

          Next i

      End Sub

      Private Function yzh(a() As Integer,st As String)As Bocllean

        Dim i As Integer,j As Integer

        Dim suml As Long,sum2 As Long,stl As String,st2 As String

        For i=1 To UBound(a)

          For j=2 To Sqr(a(i))

            If a(i) Mod j=0 Then Exit For

          Next j

          If ___(21)___ Then

            sum1=sum1+a(i)

            st1=st1 & a(i) & ”+”

      EIse

        sum2=sum2+a(i)

            st2=st2 & a(i) & ”+”

          End If

      Next i

      If sum1*2=sum2 Then

         ___(22)___

         st=”(” & Left(st1,Len(st1)-1) & ”)*2=”& Left(st2,Len(st2)-1)

      End If

      End Function

      8.本程序的功能是求-128+127之間整數n82進制補碼。采用的算法是:若n≥O,則直接將其轉換為相應的72進制數,前面的符號位設定為“O”;若n<0,則將n+128轉換為相應的72進制數,前面的符號位設定為1”。請完善本程序。

      Option Explicit

       Private Sub Command1_Click0

          Dim dec As Integer

      dec=Textl

      If  ___(23)___ Then

      MsgBox ”無效數據,請重輸!”,,求補碼

      Text1=””

      Text1SetFOCUS

         Eise

          Text2=bm(dec)

         End If

      End Sub

      Private Function bm(n As Integer) As String

        If Sgn(n)>=0 Then

          bm=”0”& d2b(n)

        Else  

          n=n+128

          bm=___(24)___

       End If

      End Function

      Private Function d2b(n As Integer)As String

        Dim p As Integer

        Do

          p=n Mod 2

          d2b=CStr(p) & d2b

          n=n\2

      Loop Until ___(25)___

      d2b=Right(”000000”& d2b,7)

      End Function

      9.本程序的功能是,按從大到小的次序給一組正整數標記序次。程序的算法是:先找出原數組中所有的最大數,假如有n個最大數,它們序次均標記為1,已處理的數據值改為-99:再找出所有的次大數,它們的序次標記為n+1……直到所有數據處理完畢。請完善本程序。(說明:數組sn用于存放數組a中相應的各個元素的序次,數組b用來保留原始數據)

        Option Explicit

        Option Base 1

        Private Sub Cmd1_Click()

          Dim a(10)As Integer,sn(10)As Integer,b(10)As Integer,i As Integer

          For i=1 To lO

            a(i)=Int(Rnd*61)+40

            b(i)=___(26)___

            Text1=Text1 & Str(a(i))

      Next i

      Call order(a,sn)

         For i=1 To 10

           List1.Addltem b(i) & “--“ & sn(i)

         Next i

      End Sub

      Private Sub order(a() As Integer,sn() As Integer)

        Dim i As Integer,j As Integer

        Dim n As Integer,maxi As Integer

        i=1

        Do While i<=UBonnd(a)

          n=___(27)___

      maxi=a(1)

      For J=2 To UBound(a)

             If ___(28)___ Then

               maxi=a(j)

             End If

          Nextj

          For j=1 To UBound(a)

             If  ___(29)___ Then

                sn(j)=i

                a(j)=-99

                n=n+1

             End If

          Nextj

          i=___(30)___

        Loop

      End Sub

      中文在线字幕第一页_中文字幕高跟丝袜作品番号_亚洲中文无无码第_日本亚洲欧美国产日韩a??y_在线观看亚洲av无码专区