亚洲国产福利在线一二三观看_精品国产伦一区二区三区欲臀_国产a∨视频精品视频护士_精品八戒人妻少妇av

江蘇省高校計算機(jī)等級考試命題研究院 江蘇省高校計算機(jī)等級考試輔導(dǎo)
2018年3月江蘇省計算機(jī)二級VB考試真題第1套

1.         根據(jù)不同的應(yīng)用需求,數(shù)字音頻采用的編碼方法有多種,文件格式也各不相同。下列的音頻格式中,由微軟公司開發(fā)的,采用未壓縮方法編碼的是____

A. WAV

B. MP3

C. AAC

D. WMA

A

解析:MP3是一種音頻壓縮技術(shù),由于這種壓縮方式的全稱叫MPEG Audio Layer3,所以人們把它簡稱為MP3,WMA是微軟制訂的音頻壓縮文件格式,比mp3標(biāo)準(zhǔn)晚,比mp3還小,比mp3音質(zhì)還好, WAV是微軟公司(Microsoft)開發(fā)的一種聲音文件格式, 采用未壓縮編碼方式。

5

2.         下列有關(guān)IP地址(IPv4)和路由器的敘述中,錯誤的是_____。

A. 每個IP地址使用32個字節(jié)的二進(jìn)制數(shù)表示,在使用中通常寫成“點(diǎn)分十六進(jìn)制”的形式

B. IP地址分為五類,其中A類、B類和C類是三個基本類,每類有不同長度的網(wǎng)絡(luò)號和主機(jī)號

C. IP地址空間的分配由國際組織ICANN負(fù)責(zé),目前IP地址空間已分配完畢

D. 路由器是連接異構(gòu)網(wǎng)絡(luò)的關(guān)鍵設(shè)備,一臺路由器會擁有(使用)多個不同的IP地址

A

解析: 每個IP地址使用32個字節(jié)的二進(jìn)制數(shù)表示,在使用中通常寫成“點(diǎn)分十進(jìn)制”的形式 

4

3.         字符集及其編碼是計算機(jī)中表示、存儲、處理和交換文本信息的基礎(chǔ),但由于歷史原因,目前不同系統(tǒng)或應(yīng)用中使用的字符編碼方案并不統(tǒng)一。下列編碼方案中,所有字符均采用等長編碼(編碼長度相同)的是______。

A. GB2312

B. GB18030

C. UTF-8

D. UTF-16

A

解析: GB2312編碼:是我國1981年頒布的第一個國標(biāo),該標(biāo)準(zhǔn)選出6763個常用漢字和682個非漢字字符,所有字符采用2字節(jié)編碼; GB18030:包含漢字23940,GB2312GBK保持兼容。同時與UCS也接軌,在我國信息處理產(chǎn)品中強(qiáng)制執(zhí)行,ASCII采用1字節(jié)編碼,漢字采用2字節(jié)編碼,其他采用4字節(jié)編碼; UCS:國際標(biāo)準(zhǔn)化組織(ISO)制定了一個將全世界所有文字與符號集中進(jìn)行統(tǒng)一編碼,稱為UCS,與其等同的是由微軟等公司共同制定的工業(yè)標(biāo)準(zhǔn)Unicode,UCS有兩種標(biāo)準(zhǔn)UTF-8UTF-16,UTF-8采用ASCII碼用1個字節(jié)編碼,拉丁字母,標(biāo)點(diǎn)符號等采用2字節(jié)編碼,漢字采用3個字節(jié)編碼,其他極少字符采用4字節(jié)編碼,UCS-16是指ASCII和漢字都采用2字節(jié)編碼,其他不常用字符采用4字節(jié)編碼,Windows中文版上現(xiàn)在使用UTF-16,也是Java,.NET軟件開發(fā)環(huán)境等默認(rèn)的編碼標(biāo)準(zhǔn)。

5

4.         TCP/IP模型將計算機(jī)網(wǎng)絡(luò)分成下列4層,每一層都包含若干個協(xié)議。在TCP/IP模型中,HTTP協(xié)議工作在______

A. 接口層

B. 互連層

C. 傳輸層

D. 應(yīng)用層

D

解析: TCP/IP包括了100多個協(xié)議,將通信問題劃分為四個層次,從高到低依次是應(yīng)用層、傳輸層、網(wǎng)絡(luò)互連層、網(wǎng)絡(luò)接口與硬件層,應(yīng)用層規(guī)定了運(yùn)行在不同主機(jī)上的應(yīng)用程序之間如何通過互連的網(wǎng)絡(luò)進(jìn)行通信,包括的協(xié)議如HTTP,SMTP,FTP,TELNET;傳輸層規(guī)定了怎樣進(jìn)行端-端的數(shù)據(jù)傳輸,TCPUDP兩個協(xié)議,TCP協(xié)議負(fù)責(zé)可靠的完成數(shù)據(jù)從發(fā)送計算機(jī)到接收計算機(jī)的傳輸,UDP是不可靠的數(shù)據(jù)傳輸協(xié)議, 例如音頻和視頻數(shù)據(jù)的傳輸;網(wǎng)絡(luò)互連層規(guī)定了在整個互連的網(wǎng)絡(luò)中所有計算機(jī)統(tǒng)一使用的編址方案和數(shù)據(jù)包格式(稱為IP數(shù)據(jù)報),以及IP數(shù)據(jù)報的轉(zhuǎn)發(fā)機(jī)制;網(wǎng)絡(luò)接口與硬件層規(guī)定了怎樣與各種不同的網(wǎng)絡(luò)進(jìn)行接口,并負(fù)責(zé)將IP包轉(zhuǎn)換成適合在特定網(wǎng)絡(luò)中傳輸?shù)膸袷?/SPAN> 

4

5.         下列有關(guān)計算機(jī)網(wǎng)絡(luò)組成、分類和工作模式等敘述中,錯誤的是______。

A. 按網(wǎng)絡(luò)所覆蓋的地域范圍來分,人們常將計算機(jī)網(wǎng)絡(luò)分為LAN、ATM、WLAN等類型

B. 有些廣域網(wǎng)是一些機(jī)構(gòu)或組織自行構(gòu)建的專用網(wǎng),有些是網(wǎng)絡(luò)運(yùn)營商構(gòu)建的公用數(shù)據(jù)網(wǎng)

C. 網(wǎng)絡(luò)協(xié)議是計算機(jī)網(wǎng)絡(luò)的重要組成部分,目前互聯(lián)網(wǎng)主要采用TCP/IP協(xié)議系列

D. 計算機(jī)網(wǎng)絡(luò)有兩種基本工作模式,即P2P工作模式和C/S工作模式

A

解析: 按網(wǎng)絡(luò)所覆蓋的地域范圍來分分為局域網(wǎng)(LAN)、城域網(wǎng)(MAN)、廣域網(wǎng)(WAN)  。

4

6.         下列有關(guān)計算機(jī)的邏輯組成和分類的敘述中,錯誤的是______

A. 一臺計算機(jī)中往往有多個處理器,它們各有其不同的處理任務(wù),其中CPU是核心部件

B. 主存儲器與CPU高速連接,用來存放已經(jīng)啟動運(yùn)行的程序代碼和需要處理的數(shù)據(jù)

C. 人們提及PC時,泛指臺式機(jī)、筆記本電腦、智能手機(jī)和平板電腦等個人使用的計算機(jī)

D. 嵌入式計算機(jī)是內(nèi)嵌在其他設(shè)備中的專用計算機(jī),許多嵌入式計算機(jī)都把軟件固化在芯片中

C

解析: 人們提及PC時,泛指臺式機(jī)、筆記本電腦等個人使用的計算機(jī)  。(: 一臺計算機(jī)中往往有多個處理器,CPU,圖形處理器等)

2

7.         字符集及其編碼是計算機(jī)中表示、存儲、處理和交換文本信息的基礎(chǔ),但由于歷史原因,目前不同系統(tǒng)或應(yīng)用中使用的字符編碼方案并不統(tǒng)一。下列編碼方案中,目前在我國信息處理產(chǎn)品中強(qiáng)制貫徹執(zhí)行的是____。

A. GB 2312

B. GBK

C. GB 18030

D. UCS/Unicode

C

解析: GB18030:包含漢字23940,GB2312GBK保持兼容。同時與UCS也接軌,在我國信息處理產(chǎn)品中強(qiáng)制執(zhí)行。

5

8.         在現(xiàn)代通信系統(tǒng)中,為了能有效地提高數(shù)據(jù)鏈路的利用率、降低通信成本,一般使用多路復(fù)用技術(shù)讓多路信號同時共用一條傳輸線進(jìn)行傳輸。用戶通過電話線使用ADSL技術(shù)接入互聯(lián)網(wǎng)時,ADSL技術(shù)接入方式主要是使用了______

A. TDM

B. WDM

C. FDM

D. CDM

C

解析:時分多路復(fù)用(TDM)是各終端設(shè)備按不同時間來輪流使用同一線路來傳輸數(shù)據(jù),是計算機(jī)網(wǎng)絡(luò)傳輸使用的主要方式,頻分多路復(fù)用(FDM)是將不同信源發(fā)出的信號調(diào)制在不同頻率的載波上,波分多路復(fù)用(WDM)是在一根光纖傳輸不同波長的光波。碼分是指每個用戶分配一個地址碼,各個碼型互不重疊,通信各方之間不會相互干擾,且抗干攏能力強(qiáng)  。

4

9.         光盤是目前常見的輔助存儲器。下列相關(guān)敘述中,錯誤的是____。

A. 光盤存儲器由光盤驅(qū)動器和光盤片兩部分組成,光盤的基片是鋁合金材料

B. 從接口來看,目前內(nèi)置DVD光驅(qū)與主機(jī)的接口主要是SATA,外置的主要是USB

C. DVD光盤分為單面單層、單面雙層等多種類型,目前最常用的是單面單層的盤片

D. BD光驅(qū)采用波長較短的藍(lán)色激光在光盤上進(jìn)行數(shù)據(jù)讀寫,因而提高了光盤存儲容量

A

解析: 光盤的基片是耐熱的有機(jī)玻璃 。

2

10.     在微軟公司的Office軟件中內(nèi)置了一種程序設(shè)計語言,用戶可以使用它來編寫程序以擴(kuò)展功能。該語言是_____。

A. VBA

B. VBScript

C. Java

D. C#

A

解析: VBA用于編寫程序來擴(kuò)展Office軟件的功能,VBScript用于嵌入到Html文檔中以擴(kuò)充網(wǎng)頁的功能,Java用于網(wǎng)絡(luò)編程,包括編寫安卓智能手機(jī)的App,Object-C語言是iPhoneiPad編程的語言, Lisp語言與PROLOG語言主要用于人工智能,Ada語言用于飛行器控制,MATLAB是一種面向向量和矩陣運(yùn)算的數(shù)值計算語言。

3

 

 

1(單選題):

可以作為VB應(yīng)用程序啟動對象的是______。
①標(biāo)準(zhǔn)模塊   ②窗體模塊   Sub Main   ④事件過程

A. ①④

B. ①②

C. ③④

D. ②③

D

解析:VB,能作為啟動對象的包括窗體模塊,sub main過程。

3

表達(dá)式37.6 Mod 5的結(jié)果數(shù)據(jù)類型為______。

A. 整型

B. 長整型

C. 單精度

D. 雙精度

B

解析:Mod運(yùn)算符的作用是取余數(shù),要求Mod左右兩邊都是整型或長整型,首先將雙精度類型37.6轉(zhuǎn)換為長整型38,然后再執(zhí)行38 Mod 5,根據(jù)VB約定,兩個不同的類型的數(shù)值運(yùn)算時返回的是占字節(jié)多的類型,因?yàn)殚L整型數(shù)值384個字節(jié),整型52個字節(jié),所以得到結(jié)果長整型3,如果直接寫 37 mod 5因?yàn)?/SPAN>375都是整型,所以返回結(jié)果整型2 。

3

在多窗體程序中,僅用于將窗體Form2從內(nèi)存中卸載的語句是______

A. Form2.Unload

B. Unload Form2

C. End

D. Form2.Hide

B

解析:A選項(xiàng)沒有這種寫法,C選項(xiàng)是結(jié)束整個程序運(yùn)行,D選項(xiàng)是Form2隱藏。

2

下列關(guān)于Len函數(shù)的敘述,錯誤的是________。

A. 該函數(shù)可以接收數(shù)值型常量作為其參數(shù)

B. 該函數(shù)可以接收數(shù)值型變量作為其參數(shù)

C. 該函數(shù)可以接收字符型常量作為其參數(shù)

D. 若該函數(shù)的參數(shù)為非字符型變量,則其返回該類型變量所占用的存儲空間的大小

A

解析: 該函數(shù)不可以接收數(shù)值型常量作為其參數(shù) 。

3

Sub過程與Function過程最根本的區(qū)別是____。

A.  Sub過程使用Call語句或直接使用過程名調(diào)用,而Function過程不可以

B.  Function過程可以有參數(shù),Sub過程不可以

C.  兩種過程參數(shù)的傳遞方式不同

D.  Sub過程的過程名不能返回值,而Function可以

D

解析: Sub過程的過程名不能返回值,而Function過程名可以返回值是兩者最根本的區(qū)別。

7

 

6 (填空題 <2>

執(zhí)行下面程序,單擊Command1按鈕,則a(1)的值是____________   ,a(4)的值是____________   。

 

Option Explicit

Option Base 1

Private Sub Command1_Click()

    Dim a(4) As Integer, i As Integer

    For i = 1 To 4

        a(i) = F1(a, i) + a(i)

    Next i

    For i = 1 To 4

        Print a(i)

    Next i

End Sub

 

Private Function F1(a() As Integer, x As Integer) As Integer

    Dim i As Integer

    If i Mod 2 <> 0 Then

        a(x) = x

    Else

        F1 = F1 + x

    End If

End Function

 

1@4

解析: 因?yàn)槲淖置枋霾蝗缫曨l清晰,具體見視頻詳細(xì)講解

7

 

7 (填空題 <2>

執(zhí)行下面程序,單擊Command1按鈕,則窗體上顯示的數(shù)組元素a(2)的值是____________   a(3)的值是____________   。

 

Option Explicit

Option Base 1

Private Sub Command1_Click()

    Dim a(3) As Integer, b As Integer, i As Integer

    For i = 1 To 3

        a(i) = i

    Next i

    b = UBound(a)

    Call sub1(a, b)

    For i = 1 To 3

        Print a(i);

    Next i

End Sub

 

Private Sub sub1(m() As Integer, n As Integer)

    If n > 1 Then

        m(n) = m(n) + n

        Call sub1(m, n - 1)

    End If

End Sub

 

4@6

解析: 因?yàn)槲淖置枋霾蝗缫曨l清晰,具體見視頻詳細(xì)講解

7

 

 

8 (填空題 <3>

執(zhí)行下面程序,單擊命令按鈕Command1,窗體上顯示的第一行內(nèi)容是____________   ,a數(shù)組元素的個數(shù)是____________   ,其中a(2)的值是____________   。

 

Option Explicit

Option Base 1

Private Sub Command1_Click()

    Dim St As String, i As Integer

    Dim a() As String, j As Integer, k As Integer

    St = "abcd"

    Call Sub1(St)

    Print St

    For i = 1 To Len(St)

        For j = i + 1 To Len(St)

            If Mid(St, i, 1) = Mid(St, j, 1) Then Exit For

        Next j

        If j <= Len(St) Then

            k = k + 1

            ReDim Preserve a(k)

            a(k) = Mid(St, i, 1)

            Print a(k)

        End If

    Next i

End Sub

Private Sub Sub1(S As String)

    Dim i As Integer

    For i = 1 To Len(S) \ 2

        Mid(S, i, 1) = Mid(S, Len(S) - i + 1, 1)

    Next i

End Sub

 

dccd@2@c

解析: 因?yàn)槲淖置枋霾蝗缫曨l清晰,具體見視頻詳細(xì)講解

7

 

 

9 (填空題 <3>

執(zhí)行下面程序,單擊命令按鈕Command1,則a(1,2)的值是____________   a(2,3)的值是____________   ,a(3,3)的值是____________   。

 

Option Explicit

Option Base 1

Private a(3, 3) As Integer

Private Sub Form_Activate()

    Dim i As Integer, j As Integer, k As Integer

    k = 1

    For i = 1 To 3

        For j = 1 To 3

            a(i, j) = k

            k = k + 1

        Next j

    Next i

End Sub

Private Sub Command1_Click()

    Dim b(4) As Integer, i As Integer, j As Integer, t As Integer

    b(1) = 2

    For i = 2 To 4

        b(i) = i - 1

    Next i

    t = a(b(1), b(4))

    a(b(1), b(4)) = a(b(2), b(1))

    a(b(2), b(1)) = a(b(3), b(2))

    a(b(3), b(2)) = a(b(4), b(3))

    a(b(4), b(3)) = t

    For i = 1 To 3

        For j = 1 To 3

            Print a(i, j);

        Next j

        Print

    Next i

End Sub

 

4@2@9

解析: 因?yàn)槲淖置枋霾蝗缫曨l清晰,具體見視頻詳細(xì)講解

7

 

 

1(完善程序):

【要求】

1)打開T盤中P1.vbp文件,完善程序后,直接保存所有文件。

【題目】

下面程序的功能是,隨機(jī)生成10個不含數(shù)字0且由5位不同數(shù)字組成的整數(shù),再將所生成的五位整數(shù)轉(zhuǎn)換為由組成該數(shù)的數(shù)字構(gòu)成的最小整數(shù)后輸出。

Option Explicit

Private Sub Command1_Click()

    Dim a(1 To 10) As Long, b(0 To 9) As Boolean, c(1 To 5) As Integer

    Dim i As Integer, j As Integer, k As Integer, n As Long

    For i = 1 To 10

        n = Int(Rnd * 90000) + 10000

        Erase b

b(0) = True

        For j = 1 To 5

            c(j) = Mid(n, j, 1)

            If b(c(j)) = False Then

                b(c(j)) = True

            Else

                    (1)   

            End If

        Next j

        If j = 6 Then

            Call Sort(c)

            For k = 1 To 5

                a(i) = a(i) * 10 + c(k)

            Next k

            List1.AddItem a(i)

        Else

                (2)   

        End If

    Next i

End Sub

Private Sub Sort(a() As Integer)

    Dim i As Integer, t As Integer, ub As Integer, f As Boolean

    ub = UBound(a)

    f = True

    Do While f

            (3)   

        ub = ub - 1

        For i = 1 To ub

            If a(i) > a(i + 1) Then

                f = True

                    (4)   

                a(i) = a(i + 1)

                a(i + 1) = t

            End If

        Next i

    Loop

End Sub

 

Exit For@i=i-1@f=false@t=a(i)

 

(1)Exit For

(2)i=i-1

(3)f=false

(4)t=a(i)

因?yàn)槲淖置枋霾蝗缫曨l清晰,請查看自帶的本題目的視頻詳細(xì)講解

 

 

2(改錯題):

【要求】

(1)打開T盤中P2.vbp文件按參考界面形式編輯窗體界面改正程序中的錯誤后,直接保存所有文件

(2)改錯時,不得增加或刪除語句,但可適當(dāng)調(diào)整語句位置。

【題目】本程序的功能是:生成一個4×4的數(shù)組,并根據(jù)數(shù)組中元素的大小生成一個標(biāo)記數(shù)組。在標(biāo)記數(shù)組中字母L表示數(shù)組的對應(yīng)位置元素為最大,字母S表示隨組的對應(yīng)位置元素為最。ㄈ舸嬖诙鄠相等的最大或最小元素也用字母LS標(biāo)記),其他非最大最小元素均用0表示。

Option Explicit

Dim a(4, 4) As Variant, i As Integer, j As Integer

Private Sub Command1_Click()

    For i = 1 To 4

        For j = 1 To 4

            a(i, j) = Int(Rnd * 90) + 10

        Next j

    Next i

    Call printsz(Picture1)

End Sub

Private Sub Command2_Click()

    Dim Max As Integer, Min As Integer, a(4, 4) As Integer

    Max = 0

    Min = 0

    For i = 1 To 4

        For j = 1 To 4

            If a(i, j) > Max Then Max = a(i, j)

            If a(i, j) < Min Then Min = a(i, j)

        Next j

    Next i

    Call bj(Max, Min)

End Sub

Private Sub bj(m As Integer, n As Integer)

    For i = 1 To 4

        For j = 1 To 4

            If a(i, j) = m Then

                a(i, j) = L

   ElseIf a(i, j) = n Then

                a(i, j) = S

            Else

                a(i, j) = "0"

            End If

        Next j

    Next i

    Call printsz(Picture2)

End Sub

Private Sub printsz(pic As Control)

    pic.Cls

    For i = 1 To 4

        For j = 1 To 4

            pic.Print a(i, j); " ";

        Next j

        pic.Print

    Next i

End Sub

 

Dim Max As Integer, Min As Integer, a(4, 4) As Integer修改為Dim Max As Integer, Min As Integer@ Max = 0修改為Max=a(1,1) Min = 0修改為Min=a(1,1)@ a(i, j) = L修改為a(i, j) = L@ a(i, j) = S修改為a(i, j) = S

 

(1)Dim Max As Integer, Min As Integer, a(4, 4) As Integer修改為Dim Max As Integer, Min As Integer@

(2)Max = 0修改為Max=a(1,1) Min = 0修改為Min=a(1,1)

(3)a(i, j) = L修改為a(i, j) = L

(4)a(i, j) = S修改為a(i, j) = S

 

因?yàn)槲淖置枋霾蝗缫曨l清晰,請查看自帶的本題目的視頻詳細(xì)講解

 

3(編程題):

【要求】

(1)打開T盤中P3.vbp文件,根據(jù)題目要求編寫和調(diào)試程序后,直接保存所有文件;

(2)程序代碼書寫應(yīng)呈鋸齒形,否則適當(dāng)扣分。

【題目】

找出任意給定的兩個自然數(shù)的相同因子(因子中不包含1和該數(shù)本身)。

【編程要求】

(1)程序參考界面如圖所示,編程時不得增加或減少界面對象或改變對象的種類,窗體及界面元素大小適中,且均可見;

(2)運(yùn)行程序,單擊查找按鈕,根據(jù)文本框1和文本框2中給定的數(shù)字,分別求出它們除1和本身外的因子,并最終求出這兩個數(shù)的相同因子輸出在文本框3中,若兩個數(shù)沒有相同因子,則在文本框3中輸出沒有相同因子;單擊退出按鈕,則結(jié)束程序運(yùn)行;

(3)程序中必須包含一個求因子的通用過程。

 

Option Explicit

Option Base 1

 

Private Sub Command1_Click()

  Dim a() As Integer, b() As Integer, c() As Integer

  Dim n1 As Integer, n2 As Integer

  Dim i As Integer, j As Integer, k As Integer

  n1 = Text1.Text

  n2 = Text2.Text

  Call yinzi(n1, a)

  Call yinzi(n2, b)

  For i = 1 To UBound(a)

     For j = 1 To UBound(b)

         If a(i) = b(j) Then

             k = k + 1

             ReDim Preserve c(k)

             c(k) = a(i)

         End If

     Next j

  Next i

 

  Text3.Text = n1 & "的因子:  "

 

  For i = 1 To UBound(a)

    Text3.Text = Text3.Text & a(i) & "  "

   Next i

 

  Text3.Text = Text3.Text & vbCrLf

  Text3.Text = Text3.Text & n2 & "的因子:  "

 

  For i = 1 To UBound(b)

     Text3.Text = Text3.Text & b(i) & "  "

  Next i

 

  Text3.Text = Text3.Text & vbCrLf

   If k = 0 Then

     Text3.Text = Text3.Text & "沒有相同的因子數(shù):"

  Else

    Text3.Text = Text3.Text & "相同的因子數(shù):"

    For i = 1 To UBound(c)

     Text3.Text = Text3.Text & c(i) & "  "

    Next i

  End If

End Sub

 

Private Sub Command2_Click()

  End

End Sub

 

Private Sub yinzi(n As Integer, c() As Integer)

   Dim i As Integer, k As Integer

   For i = 2 To n - 1

      If n Mod i = 0 Then

         k = k + 1

         ReDim Preserve c(k)

         c(k) = i

      End If

   Next i

End Sub

 

因?yàn)槲淖置枋霾蝗缫曨l清晰,請查看自帶的本題目的視頻詳細(xì)講解