VBX 控件讓可視化組件的概念進入Visual Basic。Visual Basic 1.0 是革命性的 BASIC，它的誕生也是 VB 史上的一段佳話。下面是小編收集的計算機二級VB考試試題及答案，希望大家認真練習!
一、選擇題：
1、(C)二叉樹鏈表
2、(B)循環鏈表
3、(C)函數的遞歸調用
4、(D)軟件運行存在磨損和老化問題
5、(B)等價類劃分
6、(A)軟件的功能確定
7、(B)系統軟件
8、(A)矩形
9、(C)投影
10、(A)ISBN書號
11、(A)標準模塊中既有控件，也有代碼
12、(C)print_s
13、 (D)3avg
14、(C)i = 0: s = 0
Do
i = i + 1
s = s + i
Loop Until i = 100
Print s
15、(C)False
16、(B)方法和事件
17、(D)在程序運行期間，可以修改命令按鈕的Style屬性。
18、(B)4
19、(C)15 7
20、(A)15 9
21、(B)Lostfocus
22、(B)25 16 9 4 1 36
23、(C)不能在Form2中引用Form1中控件的屬性值，因此上述程序有錯誤
24、(B)Dir1_Change
25、(A)1 2 3
26、(B)變量x的作用域是Form1
27、(A)爲了滿足不同存取方式的需要，可以對同一個隨機文件用幾個不同的文件號打開
28、(B)雙擊命令按鈕，會觸發命令按鈕的DblClick事件
29、(C)對話框的“文件類型”框中顯示內容爲“文本文件(*)”
30、(D)菜單的Caption屬性不可以爲空字符串
31、(D)Sub Main過程能被Visual Basic自動識別並一定首先被執行
32、(C) afbecd
33、(C)在窗體上顯示“表達式1”
34、(A) 3 5 7 4 5
35、(D)For j=n to i+1 Step -1
二、簡單應用題
(1)爲職工表設計一個名爲zgb的快速報表。
(2)修改考生文件夾中的“工資查詢”文件，此文件的功能爲：
通過結構複製數據表文件“工資表”生成一個含有職工號和基本工資的新數據表文件gz
，將原數據庫中基本工資大於1 500的職工記錄添加到新表中並瀏覽結果。
修改程序中的錯誤行，不得刪除或添加程序行，使程序正確運行。
工資表的結構和內容如下：
職工號 部門號 基本工資 獎金
101001 101 1750 1200
101002 101 1000 400
102001 102 700 200
102002 102 900 350
103001 103 1500 600
103002 103 1200 400 參考答案:請參考解析 系統解析:【參考答案】
(1)具體步驟如下：
① 在“命令”窗口輸入命令：CREATE REPORT zgb。
② 彈出報表設計器，選擇菜單命令“報表”→“快速報表”。
③ 系統彈出“打開”對話框，選擇數據源表爲“職工表”。
④ 在“快速報表”對話框中單擊“字段佈局”左側的按鈕(此爲系統默認)，選中“標題”複選框，爲每一個字段添加一個字段名標題，再選中“將表添加到數據庫環境中”複選框，把“職工表”作爲數據源表添加到數據庫環境中，單擊“確定”按鈕，便爲職工表建立了一個快速報表。
⑤ 單擊工具欄中的`“打印預覽”圖標按鈕，查看報表效果。
(2)具體步驟如下：
① 根據題意，在“命令”窗口輸入命令：MODI COMM工資查詢。
② 打開考生文件夾下的工資查詢文件，查看程序中的錯誤行。
****工資查詢的源程序內容：****
SET TALK OFF
SET SAFE OFF
SELECT 1
USE 工資表
COPY STRU TO gz
職工號，基本工資 ****Error****
SELECT 2
USE gz
SELECT 1
GO TOP
DO WHILE ! BOF() ****Error****
IF 基本工資>=1500
SELECT 2
APPEND BLANK
REPLACE A->職工號WITH 職工號，A->基本工資 WITH 基本工資 &&*error*
SELECT 1
ENDIF
CONT ****Error****
ENDDO
SELECT 2
DISPLAY ALL
DELETE TABLE gz
****Error****
CLOSE DATABASE
SET SAFE ON
SET TALK ON
*************************************
③ 修改程序中的錯誤。
****下面是修改後的工資查詢的程序內容：****
SET TALK OFF
SET SAFE OFF
SELECT 1
USE 工資表
COPY STRU TO gz
FIELDS 職工號，基本工資
SELECT 2
USE gz
SELECT 1
GO TOP
DO WHILE ! EOF()
IF 基本工資>=1500
SELECT 2
APPEND BLANK
REPLACE 職工號WITH A-> 職工號， 基本工資 WITH A-> 基本工資
SELECT 1
ENDIF
SKIP
ENDDO
SELECT2
DISPLAY ALL
DROP TABLE gz
CLOSE DATABASE
SET SAFE ON
SET TALK ON
***********************************
④ 在“命令”窗口輸入：DO 工資查詢，運行程序。
【試題解析】
本試題主要考查了快速報表的建立和SQL語句的簡單應用。在(1)小題中可以通過菜單命令建立一個快速報表文件。
