計算機二級vb的學習內容：按照新大綱，需要學習的內容有：VB基本概念、整合開發環境、視覺化程式設計方法、基本輸入輸出、常用控制元件功能及使用、VB控制結構語句等。
以下是計算機二級vb的考試模擬試題，希望對大家的複習有所幫助!
單選題
1、
A.n As Integer j As Integer
B.n As Integer Static j As Integer
l n As Integer J As Integer
l n As Integer Static j As Integer
2、 下列各種窗體事件中，不能由使用者觸發的事件是( )。
事件和Unload事件
k事件和Unload事件
k事件和DblClick事件
事件和Initialize事件
3、
A.4321
B.12
C.34
D.1234
4、 在窗體上用複製、貼上的方法建立了一個命令按鈕陣列，陣列名為ComTest1。設窗體Form1標題為“MyForm1”.雙擊控制元件陣列中的第3個按鈕，開啟程式碼編輯器，編寫如下程式碼：
Privae Sub ComTest 1_Click(Index As Integer)
ion=”MyForm2”
End Sub
執行時，單擊按鈕陣列中的第1個按鈕，則窗體標題顯示為( )。
1
est1
rm1
rm2
5、 下列操作中不能向工程中新增窗體的是( )。
A.執行“工程”選單中的“新增窗體”命令
B.單擊工具欄上的“新增窗體”按鈕
C.右擊窗體，在彈出的選單中選擇“新增窗體”命令
D.右擊工程資源管哩器，在彈出的選單中選擇“新增”命令，然後在下一級選單中選擇“新增窗體”命令
6、 下面程式執行時，若輸入“Visual Basic Programming”，則在面體上輸出的是( )。
A.3
B.2
C.1
D.0
7、 下列關於窗體的描述中，錯誤的是( )。
A.窗體的Height、Width屬性用於設定窗體的高和寬
B.窗體的Load事件在載入窗體時發生
C.當窗體的Enabled屬性為False時，通過滑鼠和鍵盤對窗體的操作都被禁止
D.執行UnLoad Form1語句後，窗體Form1消失，但仍在記憶體中
8、 設已經在窗體上添加了一個通用對話方塊控制元件CommonDialogl，以下語句正確的是( )。
er=ALLL Files |*.*|=|Pictures(*.Bmp)|*.Bmp
er="ALLL Files"|*.*|"Pictures(*.Bmp)"|*.Bmp
er={ALLL Files{|*.*|Pictures(*.Bmp)|*.Bmp}
er="ALLL Files |*.*|Pictures(*.Bmp)|*.Bmp"
9、 窗體上建立了一個名為CommonDialong1的通用對話方塊，用下面的語句建立一個對話方塊：
Comm,on=2，則以下語句與之等價的是( )。
Open
Save
Color
Font
10、如果一個直線控制元件在窗體上呈現為一條垂直線，則可以確定的是( )。
A.它的`Y1、Y2屬性的值相等
B.它的X1、X2屬性的值相等
C.它的X1、Y1屬性的值分別與X2、Y2屬性的值相等
D.它的X1、X2屬性的值分別與Y1、Y2屬性的值相等
11、窗體上有一個名稱為Framel的框架(如圖)，若要把框架上顯示的“Framel”改為漢字“框架”，下面正確的語句是( )
{Page}
12、以下關於過程及過程引數的描述中，錯誤的是( ){Page}
13、
14、
15、 下列控制元件屬性中，屬性值的型別不相同的一項是( )。
l控制元件的Enabled屬性與TextBox控制元件的Enabled屬性
onBraon控制元件的Value屬性與CheckBox控制元件的Value屬性
antt控制元件的Default屬性與Command控制元件的Cancel屬性
and控制元件的Ⅵsible屬性與Frame控制元件的Ⅵsible屬性
16、 下列不能開啟]：具箱視窗的操作是( )。
A.執行“檢視”選單中的“工具箱”命令
B.按Alt+F8鍵
C.單擊工具欄上的“工具箱”按鈕
D.按Alt+V，然後按Alt+X鍵
17、
A.9 8 7 6 3 2
B.2 3 6 7 8 9
C.9 8 7 6 3
D.2 3 6 7 8
18、為達到把a、b中的值交換後輸出的目的，某人程式設計如下：{Page}
Private Sub Command1_Click()
a%=10：b%=20
Call swap(a，B.：Print a，b
End Sub
Private Sub swap(ByVal aAs Integer，ByVal bAs Integer)
c=a：a=b：b=c
End Sub
在執行時發現輸出結果錯了，需要修改。下面列出的錯誤原因和修改方案中正確的是。
A.呼叫swap過程的語句錯誤，應改為：Call swap a，b
B.輸出語句錯誤，應改為：Print “a”，“b”
C.過程的形式引數有錯，應改為：swap(ByRef a As Integer，ByRef b As Integer)
中3條賦值語句的順序是錯誤的，應改為a=b：b=c：c=a
19、
填空題
20、下面的程式執行時，可以從鍵盤輸入一個正整數，然後把該數的每位數字按逆序輸出。例如：輸入7685，則輸出5 8 6 7;輸人1000，則輸出0 0 0 1。請填空。
Private Sub Command1_Click()
Dim x As Integer
X=InputBox(“請輸入一個正整數”)
While x> 【11】
Print x Mod 10;
x=x10
Wend
Print 【12】
End Sub
