2017年計算機二級VB考試試題及答案
網(wǎng)絡(luò)管理軟件及網(wǎng)絡(luò)通信協(xié)議的管理和協(xié)調(diào)下，實現(xiàn)資源共享和信息傳遞的計算機系統(tǒng)。下面是小編整理的關(guān)于計算機二級VB考試試題及答案，歡迎大家參考!
一 、選擇題
(1)假設(shè)線性表的長度為n，則在最壞情況下，冒泡排序需要的比較次數(shù)為
A)log2n
B)n2
C)O(n1..5)
D)n(n-1)/2
正確答案: D
(2)算法分析的目的是
A)找出數(shù)據(jù)結(jié)構(gòu)的合理性
B)找出算法中輸入和輸出之間的關(guān)系
C)分析算法的易懂性和可靠性
D)分析算法的效率以求改進
正確答案: D
(3)線性表L=(a1,a2,a3,…ai，…an)，下列說法正確的是
A)每個元素都有一個直接前件和直接后件
B)線性表中至少要有一個元素
C)表中諸元素的排列順序必須是由小到大或由大到小
D)除第一個元素和最后一個元素外，其余每個元素都有一個且只有一個直接前件和直接后件
正確答案: D
(4)在單鏈表中，增加頭結(jié)點的目的是
A)方便運算的實現(xiàn)
B)使單鏈表至少有一個結(jié)點
C)標(biāo)識表結(jié)點中首結(jié)點的位置
D)說明單鏈表是線性表的鏈?zhǔn)酱鎯崿F(xiàn)
正確答案: A
(5)軟件工程的出現(xiàn)是由于
A)程序設(shè)計方法學(xué)的影響
B)軟件產(chǎn)業(yè)化的需要
C)軟件危機的出現(xiàn)
D)計算機的發(fā)展
正確答案: C
(6)軟件開發(fā)離不開系統(tǒng)環(huán)境資源的支持，其中必要的測試數(shù)據(jù)屬于
A)硬件資源
B)通信資源
C)支持軟件
D)輔助資源
正確答案: D
(7)在數(shù)據(jù)流圖(DF
D)中，帶有名字的箭頭表示
A)模塊之間的調(diào)用關(guān)系
B)程序的組成成分
C)控制程序的執(zhí)行順序
D)數(shù)據(jù)的流向
正確答案: D
(8)分布式數(shù)據(jù)庫系統(tǒng)不具有的特點是
A)數(shù)據(jù)分布性和邏輯整體性
B)位置透明性和復(fù)制透明性
C)分布性
D)數(shù)據(jù)冗余
正確答案: D
(9)關(guān)系表中的每一橫行稱為一個
A)元組B)字段
C)屬性D)碼
正確答案: A
(10)下列數(shù)據(jù)模型中，具有堅實理論基礎(chǔ)的是
A)層次模型
B)網(wǎng)狀模型
C)關(guān)系模型
D)以上3個都是
二、綜合應(yīng)用題
【審題分析】本題源程序已提供 Writedate 自定義過程，需編寫"讀數(shù)"、"計算"和"保存"命令的單擊事件過程。程序設(shè)計思路：在"讀數(shù)"按鈕的單擊事件過程中，用 Open 語句以 Input 方式打開數(shù)據(jù)文件 dr1.dat，** For 循環(huán)語句(初值為 1，終值為 100)將數(shù)據(jù)文件中的數(shù)據(jù)用 Input 語句依次讀出并賦值給數(shù)組元素 arr(i)，同時顯示在文本框中，為使數(shù)據(jù)間保持一定間隔，每個數(shù)據(jù)后用 Space(5)加入 5 個空格;在"計算"按鈕的 Click 事件過程中，利用 For 循環(huán)語句(循環(huán)變 i 的初值為 1，終值為 100)依次將數(shù)組 arr 中小于或等于 300 的元素的值顯示在文本框中(條件表達式為：arr(i)<=300)，并將其值累加到變Sum，循環(huán)結(jié)束后將結(jié)果顯示在窗體上。在"保存"按鈕的 Click 事件過程中，**調(diào)用WriteData 過程將文本框中的值寫入數(shù)據(jù)文件 dw1.dat。
【操作步驟】
步驟 1：新建一個"標(biāo)準(zhǔn) EXE"工程，按下表在窗體中畫出控件并設(shè)置其相關(guān)屬性。
步驟 2：選擇【工程】?【添加模塊】命令，打開添加模塊對話框，將考生文件夾下的model.bas 添加到當(dāng)前工程中。
步驟 3：在代碼編輯窗口編寫以下事件過程。
參考代碼：
Dim arr(1 To 100) As Integer
Private Sub Cmd1_Click()
Txt1.Text = ""
Open App.Path & "\dr1.dat" For Input As #1
′ó?ò??ì3?????úμè????ê?ר?? http://club.topsage.com/forum-49-1.html ê??ˉ??àí
For i = 1 To 100
Input #1, arr(i)
Txt1.Text = Txt1.Text & arr(i) & Space(5)
Next
Close #1
End Sub
Private Sub Cmd2_Click()
Dim sum As Integer
For i = 1 To 100
If arr(i) <= 300 Then
sum = sum + arr(i)
End If
Next
Txt1.Text = sum
End Sub
Private Sub Cmd3_Click()
writedata "dw1.dat", Txt1.Text
End Sub
步驟 4：按要求將文件保存至考生文件夾中。
【計算機二級VB考試試題及答案】相關(guān)文章：
計算機等級考試二級VB模擬試題及答案09-18
2017計算機二級VB考試試題07-17
2024計算機二級考試模擬試題及答案06-12
計算機二級考試C++試題及答案09-20
廣東省計算機二級考試題及答案07-20