- 相關推薦
3月全國計算機等級考試二級VB筆試真題
在日復一日的學習、工作生活中，許多人都需要跟考試真題打交道，借助考試真題可以為主辦方提供考生某方面的知識或技能狀況的信息。那么一般好的考試真題都具備什么特點呢？以下是小編為大家整理的3月全國計算機等級考試二級VB筆試真題，歡迎閱讀與收藏。
3月全國計算機等級考試二級VB筆試真題 1
一、 選擇題
(1)下列敘述中正確的是(B)
A)算法的效率只與問題的規模有關，而與數據的存儲結構無關
B)算法的時間復雜度是指執行算法所需要的計算工作量
C)數據的邏輯結構與存儲結構是一一對應的
D)算法的時間復雜度與空間復雜度一定相關
(2)在結構化程序設計中，模塊劃分的原則是(D)
A)各模塊應包括盡量多的功能
B)各模塊的規模應盡量大
C)各模塊之間的聯系應盡量緊密
D)模塊內具有高內聚度、模塊間具有低耦合度
(3)下列敘述中正確的是(A)
A)軟件測試的主要目的是發現程序中的錯誤
B)軟件測試的主要目的是確定程序中錯誤的位置
C)為了提高軟件測試的效率，最好由程序編制者自己來完成軟件的測試工作
D)軟件測試是證明軟件沒有錯誤
(4) 下面選項中不屬于面向對象程序設計特征的是(C)
A)繼承性
B)多態性
C)類比性
D)封裝性
(5) 下列對隊列的敘述正確的是(D)
A)隊列屬于非線性表
B)隊列按“先進后出”原則組織數據
C)隊列在隊尾刪除數據
D)隊列按“先進先出”原則組織數據
(6) 對下列二叉樹(C)
A
B C
D E F X
Y Z
進行前序遍歷的結果為
A)DYBEAFCZX
B)YDEBFZXCA
C)ABDYECFXZ
D)ABCDEFXYZ
(7)某二叉樹中有n個度為2的結點,則該二叉樹中的葉子結點數為(A)
A)n+1
B)n-1
C)2n
D)n/2
(8)在下列關系運算中,不改變關系表中的屬性個數但能減少元組個數的是(B)
A)并
B)交
C)投影
D)笛卡兒乘積
(9)在E—R圖中,用來表示實體之間聯系的圖形是(C)
A)矩形
B)橢圓形
C)菱形
D)平行四邊形
(10)下列敘述中錯誤的是(A)
A)在數據庫系統中,數據的物理結構必須與邏輯結構一致
B)數據庫技術的根本目標是解決數據共享問題
C)數據庫技術是指己有數據管理系統的基礎上建立數據庫
D)數據庫系統需要操作系統的支持
(11)下面可以正確定義2個整形變量和1個字符串變量的語句的是(D)
A)Dim n,m AS Interger,s AS String
B)Dim a%,b$,c AS String
C)Dim a AS Integer,b,c AS String
D)Dim x%,y AS Integer,z AS String
(12)下列表述中不能判斷x是否為偶數的是(D)
A)x/2=Int(x/2)
B)x Mod 2=0
C)Fix(x/2)=x/2
D)x\2=0
13)設在名稱為Myform的窗體上只有1個名稱為C1的命令按鈕,下面敘述中正確的是(B)
A)窗體的Click事件過程的過程名是Myform_Click
B)命令按鈕的Click事件過程名是C1_Click
C)命令按鈕的Click事件過程的過程名是Command1_Click
(14)設窗體上有1個滾動條,要求單擊滾動條右端的◢按鈕一次,滾動條移動一定的刻度值,決定此刻度的屬性是(C)
A)Max
B)Min
C)SmallChange
D)LargeChang
(15)1個二維數組可以存放1個矩形.在程序開始有語句Option Base 0,則下面定義的數組中正好可以存放1個4*3矩陣(即只有12個元素)的是(B)
A)Dim a(-2 To 0,2) AS Integer
B)Dim a(3,2) AS Ingeger
C)Dim a(4,3)AS Ingeger
D)Dim a(-1 To -4,-1 To -3)AS Ingeger
(16)若設置了文本框的屬性PasswordChar=”$”,則運行程序時向文本框中輸入8個任意字符后,文本框中顯示的是(A)
A)8個”$”
B)1個”$”
C)8個”*”
D)無任何內容
(17)設在窗體上有1個名稱為Combo1的組合框,含有5個項目,要刪除最后一項,正確的語句是(B)
A)Combo1.RemoveItem Combo1.Text
B) Combo1.RemoveItem4
C) Combo1.RemoveItem Combo1.ListCount
D) Combo1.RemoveItem5
(18)工程中有2個窗體,名稱分別為Form1.Form2,Form1為啟動窗體,該窗體上有命令按鈕Command1,要求程序運行后單擊該命令按鈕時顯示Form2,則按鈕的Click事件過程應該是(A)
A)Private Sub Command1_Click( ) B) Private Sub Command1_Click( )
Form2.Show Form2.Visible
End Sub End Sub
C) Private Sub Command1_Click( ) D)Private Sub Command1_Click( )
Load Form2 Form2.Load
End Sub End Sub
(19)若在某窗體模塊中有如下事件過程(D)
Private Sub Command1_Click(Index AS Integer)
……
End Sub
則以下敘述中正確的是
A) 此事件過程與不帶參數的事件過程沒有區別
B) 有1個名稱為Command1的窗體,單擊此窗體則執行此事件過程
C) 有1個名稱為Command1的空件數組,數組中有多個不同類型控件
D) 有1個名稱為Command1的空件數組,數組中有多個相同類型控件
(20)以下循環語句中在任何情況下都至少執行一次循環體的是(C)
A)Do While <條件> B)While <條件>
循環體 循環體
Loop Wend
C)Do D)Do Until <條件>
循環體 循環體
Loop Until <條件> Loop
(21)在窗體上有1個名為Cd1的通用對話框,為了在運行程序時打開保存文件對話框,則在程序總應使用的語句是(A)
A)Cd1.Action=2
B)Cd1.Action=1
C)Cd1.ShowSave=Ture
D)Cd1.ShowSave=0
(22)下面關于菜單的敘述中錯誤的'是(B)
A)各級菜單中的所有菜單項的名稱必須唯一
B)同一子菜單中的菜單項名稱必須唯一,但不同子菜單中的菜單項名稱可以相同
C)彈出式菜單也用菜單編輯器編輯
(23)已知有下面的過程(D)
Private Sub proc1(a As Integer,b As String,Optional x As Boolean)
……
End Sub
正確調用此過程的語句是
A)Call procl(5)
B)Call proc1 5,”abc”,False
C)proc1(12,”abc”,True)
D)proc1 5, “abc”
(24)在窗體上有一個文件名稱為Text1的文本框和1個名稱為Command1的命令按鈕，要求在程序執行時，每單擊命令按鈕一次，文本框向右移動一定距離。下面能夠正確實現上述功能的程序是(C)
A)Private Sub Command1_Click() B) Private Sub Command1_Click()
Text1.Left=100 T ext1.Left= Text1.Left-100
End Sub End Sub
C)Private Sub Command1_Click() D) Private Sub Command1_Click()
Text1.Move.Text.Left+100 Text1.Move.Text.Left
End Sub End Sub
(25)某人創建了1個工程，其中的窗體名稱為Form1;之后又添加了1個名為Form2的窗體，并希望程序執行時先顯示Form2窗體，那么，他需要做的工作是(A)
A)在工程屬性對話框中把“啟動對象”設置為Form2
B)在Form1的Load事件過程中加入語句 Load Form2
C)在Form2的Load事件過程中加入語句Form2.Show
D)在Form2的TabIndex屬性設置為1，把Form1的TabIndex屬性設置為2
(26)窗體上有1個名稱為Text1的文本框和1個名稱為Command1的命令按鈕。要求程序運行時，單擊命令按鈕，就可以把文本框中的內容寫到文件out.txt中，每次寫入的內容附加到文件原有內容之后。下面能夠實現上述功能的程序是(C)
A)Private Sub Command1_Click() B) Private Sub Command1_Click()
Open “out.txt” For Inpit As#1 Open “out.txt” For Outpit As#1
Print#1,Text1.Text Print#1,Text1.Text
Close#1 Close#1
End Sub End Sub
C) Private Sub Command1_Click() D) Private Sub Command1_Click()
Open “out.txt” For Append As#1 Open “out.txt” For Random As#1
Print#1,Text1.Text Print#1,Text1.Text
Close#1 Close#1
End Sub End Sub
(27)為計算1+3+5+……+99的值，某人編程如下
k=1
s=0
While k<=99
k=k+2 : s=s+k
Wend
Print s
在調試時發現運行結果有錯誤，需要修改。下列錯誤原因和修改方案中正確的是(D)
A)While …Wend循環語句錯誤，應改為For k=1 To 99 …Next k
B)循環條件錯誤，應改為Whlie k<99
C)循環前的賦值語句k=1錯誤，應改為k=0
D)循環中兩條賦值語句的順序錯誤，應改為s=s+k : k=k+2
(28)下面程序在調試時出現了死循環
Private Sub Command1_Click()
n=InputBox(“請輸入一個整數”)
Do
If n Mod 2=0 Then
n=n+1
Else
n=n+2
Else If
Loop Until n=1000
End Sub
下面關于死循環的敘述中正確的是(D)
A)只有輸入的n是偶數時才會出現死循環，否則不會
B)只有輸入的n是奇數時才會出現死循環，否則不會
C)只有輸入的n是大于1000的整數時才會出現死循環，否則不會
D)輸入任何整數都會出現死循環
(29)在窗體上有1個名稱為CommonDialog1的通用對話框和1個名稱為Command1的命令按鈕，以及其他一些控件。要求在程序運行時，單擊Command1按鈕，則顯示打開文件對話框，并在選擇或輸入了1個文件名后，就可以打開該文件。以下是Command1_Click事件過程的兩種算法
算法1：
Private Sub Command1_Click()
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As#1
End Sub
算法2：
Private Sub Command1_Click()
CommonDialog1.ShowOpen
IfCommonDialog1.FileName<>””Then
Open CommonDialog1.FileName For Input As#1
End If
End Sub
下面關于這兩種算法的敘述中正確的是(B)
A) 顯示打開文件對話框后若未選擇或輸入任何文件名，則算法2會出錯，算法1不會
B) 顯示打開文件對話框后若未選擇或輸入任何文件名，則算法1會出錯，算法2不會
C) 兩種算法的執行結果完全一樣
D) 算法1允許輸入的文件名中含有空格，而算法2不允許
(30)窗體上有1個名稱為List的列表框，其中已經輸入了若干個項目(如圖所示)：還有2個文本框，名稱分別為Text1、Text2, 1個名稱為 Command1的命令按鈕，并有以下程序
Private Sub Command1_Click()
Dim str As String, s As String, k As Integer
s=Text1
Str=””
For k=List1.ListCount-1 to 0 Step-1
If InStr(List.List(k),s)>0 then
str=str&List.List(k)&” ”
End If
Next k
If str=””Then
Text2=”沒有匹配的項目”
Else
Text2=str
End If
End Sub
程序運行時，在Text1中輸入“京”，單擊命令按鈕，則在Text2中顯示的內容是(C)
A) 京
B) 北京 南京
C) 南京
D) 沒有匹配的項目
(31)在窗體上畫1一個名稱為Command1的命令按鈕，并編寫以下程序
Private Sub Command1_Click()
Print fun(“ABCDEFG”)
End Sub
Function fun(st As String) As String
stlen=Len(st)
temp=””
For k
fun=temp
End Function
程序運行時，單擊命令按鈕，則窗體上顯示的是(B)
A)ABCDEFG
B)AGBFCE
C)GFEDCBA
D)AGBFCED
(32)在窗體上先后畫2個圖片框，名稱分別為Picture1和banana,banana中添加了香蕉圖片(見圖1)，且將banana.DragMode屬性設置為1。要求程序運行時，可以用鼠標把banana拖拽到Picture1中(見圖2)。能實現此功能的事件過程是(C)
A) Priate Sub Form_DragDrop(Source As Control,X As Single,Y As Single banana.Move Picture1.Left+X,Picture1.Top+Y)
End Sub
B)Private Sub banana _DragDrop(Source As Control,X As Single,Y As Single )
Source.Move Picture1.Left+X.Picture1.Top+Y
End Sub
C) B)Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )
Source.Move Picture1.Left+X.Picture1.Top+Y
End Sub
D) B)Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )
banana.Move banana.Left+X, banana.Top+Y
End Sub
(33)在窗體上畫1個名稱為Command1的命令按鈕，然后編寫如下事件過程
Option Base 1
Pribate Sub Command1_Click()
Dim a(5.5) As Integer
For i=1 To 5
a(I,j)*5\10
Next j
Next i
S=0
For i=1 To 5
S=s+a(i,i)
Next i
Print s
End Sub
程序運行后，單擊命令按鈕，輸出結果是(A)
A) 15
B)13
C)11
D)9
(34)在窗體上從左到右有Text1、Text2兩個文本框(見圖)，要求程序運行時，在Text1中輸入1個分數后按回車鍵，則判斷分數的合法性，若分數為0~100中的1個數，周圍光標移到Text2中;否則光標不動，并彈出對話框顯示“分數錯”，下面程序中正確的是(D)
A)Private Sub Text1__KeyPress(KeyAscii AS Integer)
If KeyAscii=13 Then ‘回車符的ACSII碼是13
a=Val(Text1)
If a>=0 or a<=100 Then
Text2.SetFocus
Else
Text1. SetFocus ; MsgBox(“分數錯”)
End If
End If
End Sub
B) Private Sub Text1__KeyPress(KeyAscii AS Integer)
If KeyAscii=13 Then ‘回車符的ACSII碼是13
a=Val(Text1)
If a>=0 And a<=100 Then
Text1.SetFocus
Else
Text2. SetFocus ; MsgBox(“分數錯”)
End If
End If
End Sub
C) Private Sub Text1__KeyPress(KeyAscii AS Integer)
If KeyAscii=13 Then ‘回車符的ACSII碼是13
a=Val(Text1)
If a<0 and="" a="">100 Then
Text2.SetFocus
Else
Text1. SetFocus ; MsgBox(“分數錯”)
End If
End If
End Sub
D) Private Sub Text1__KeyPress(KeyAscii AS Integer)
If KeyAscii=13 Then ‘回車符的ACSII碼是13
a=Val(Text1)
If a>=0 And a<=100 Then
Text2.SetFocus
Else
Text1. SetFocus ; MsgBox(“分數錯”)
End If
End If
End Sub
(35)在窗體上畫2個命令按鈕，名稱分別為Command1、command2，并編寫如下程序
Const n=5,m=4
Dim a(m,n)
Private Sub Command1_Click()
K=1
For i=1 To m
For j=1 To n
a(i,j)=k
k=k+1
Next j
Next i
Private Sub Command2_Click()
Summ=0
For i=1 To m
For j=1 To n
If i=1 Or i=m Then
Summ=summ+a(i,j)
Else
If j=I Or j=n Then
Summ=summ+a(i,j)
End If
End If
Next j
Next i
Print summ
End Sub
過程Command1_Click()的作用是二維數組a 中存放1個 m行n列的矩陣;過程Command2_Click()的作用是(A)
A) 計算矩陣外圍一圈元素的累加和
B) 計算矩陣除外一圈以外的所有元素的累加和
C) 計算矩陣第1列和最后一列元素的累加和
D) 計算矩陣第1行和最后一行元素的累加和
二、填空題(每空2分，共30分)請將每一個空的正確答案寫在答題紙上[1]~[15]序號的橫線上，答在試卷上，答在試卷上不得分，
注意：以命令關鍵字填空的必須寫完整
(1) 在深度為7的滿二叉樹中，度為2的結點個數為___63_____。
(2) 軟件測試分為白箱(盒)測試和黑箱(盒)測試，等價類劃分法屬于__黑箱(或黑盒) 測試。
(3) 在數據庫系統中，實現各種數據管理功能的核心軟件稱為 數據庫管理系統(DBMS)_____。
(4) 軟件生命周期可分為多個階段，一般分為定義階段、開發階段和維護階段。編碼和測試屬于 開發_____階段。
(5)在結構化分析使用的數據流圖(DFD)中，利用 數據字典 對其中的圖形元素進行確切解釋。
(6)1+ + + +…….n 最大的n。請填空
Private Sub Command1__Click()
Dim s ,m,n AS Integer
m=Val(InputBox(“請輸入一個大于100的整數”))
n= 0
s=0
Do While s N=n+1
S=s+n*n
Loop
Print “滿足不等式的最大n是 n-1
End Sub
(7)下面程序的功能是把文件file11.txt中重復字符去掉后(即若有多個字符相同，則只保留1個)寫入文件file2.txt。請填空。
Private Sub Command1__Click()
Dim inchar AS String,temp AS String,outchar AS String
Outchar=” ”
Open=”file1.txt” For Input AS #1
Open=”file2.txt” For Output AS #2
n=LOF( 1 )
inchar=Input$(n,1)
For k=1 To n
temp=Mid(inchar,k,1)
If InStr(outchar,temp)= 0 Then
outchar=outchar & temp
End If
Next k
print #2, outchar
close #2
close #1
End Sub
(8)在窗體上先畫1個名為Text1的文本框和平個名為Label1的標簽,再畫1個名為OP1的有4個單選按鈕數組,其Index屬性按季度順序為0∽3(見圖1)。在文件sales.txt中按月份順序存有某企業某年12個月的銷售額。要求在程序執行時，鼠標單擊1個單選按鈕，則Text1中顯示相應季度的銷售總額，并把相應的文字顯示在標簽上。圖2是單擊“第3季度”單選按鈕產生的結果。請填空。
Dim sales(12) As Long
Private Sub Form__Load()
open “sales.txt” For Input AS #1
For k=1 To 12
Input #1,sales(k)
Next k
Close #1
End Sub
Private Sub Op1_Click (Index, AS Integer)
Dim sum AS Long ,k AS Ingeger,month AS Ingeger
sum=0
month=Index* 3
For k=1 To 3
month=month+1
sum=sum+sales(month)
Next k
Label1.Caption=Opl(Index). Caption & “銷售總額：”
Text1=sum
End Sub
(9)某人編寫如下函數來判斷a是否為素數，若是，則函數返回True;否則返回False
Function Prime(a As Integer)AS Boolean
Dim k As Interger,isprime AS Boolean
If a<2 Then
isprime=False
Else
isprime=True
k=2
Do While k If a Mod k=0 Then
isprime=False
ELSE
k=k+1
End IF
LOOP
End If
prime=isprime
End Function
在測試時發現有1個非素數也被判斷為素數，這個錯判的數是 4
3月全國計算機等級考試二級VB筆試真題 2
填空題（每題2分,計20分）
1．在Visual Basic中可以建立（ ）菜單和（ ）菜單。
2．建立打開文件、顏色對話框所使用的方法分別為（ ）和（ ）。如果使用action屬性，則應把該屬性的值分別設置為（ ）和（ ）。
3．數學表達式 的`VB算術表達式為（ ）。
4．表達式Ucase(right(“abcdefgh”,5)的值是( )。
5．以下程序的功能是：從鍵盤上輸入學生的考試分數，統計并輸出最高分數和最低分，當輸入負數時結束輸入，輸出結果。請填空。
Private Sub Form_click()
Dim x As Single, amax As Single, amin As Single
x = InputBox("enter a score")
amax = x
amin = x
Do While x > 0
If () Then
amax = x
End If
If () Then
amin = x
End If
x = InputBox("enter a score")
Loop
Print "max="; amax, "min="; amin
End Sub
【答案】
1．下拉式彈出式
2．Showopen showcolor 1 3
3．Sqr(x)/(2*a)+3^2-3*x
4．DEFGH
5．amaxx
3月全國計算機等級考試二級VB筆試真題 3
1、VB是一種面向對象的程序設計語言，（ ）不是面向對象系統所包含的三要素。
Ａ.屬性 Ｂ.變量 Ｃ.方法 Ｄ.事件
2.不論何控件，共同具有的是( )屬性。
A．Caption B.Text C. Name D.ForeColor
3. 程序代碼如下：
Command1.Caption=”確定”，則Command1、Caption、“確定”分別代表（ ）
A.屬性、對象、值 Ｂ.對象、值、屬性
C.對象、方法、屬性 Ｄ.對象、屬性、值
4.下面( )是不合法的整型常數。
A．278 B. &O278 C. &H278 D. 278％
5.為了給x、y、z三個變量賦初值1，下面正確的賦值語句是( )。
A．x=y=z=1 B．x=1，y＝1，z＝1
C．x=1：y＝1：z＝1 D．xyz=1
6.賦值語句：a=123+Mid(“123456”，3，2)執行后，變量a中的值是( )。
A．”12334” B．12334 C．157 D．123
7. 數學關系3≤x<10表示成正確的VB表達式為（ ）
Ａ、3<=x<10 Ｂ、3<=x AND x<10
Ｃ、x>=3 OR x<10 Ｄ、3<=x AND <10
8.產生[10，37]之間的隨機整數的VB表達式（ ）
Ａ.Int(Rnd(1)*27)+10 Ｂ.Int(Rnd(1)*28)+10
Ｃ.Int(Rnd(1)*27)+11 Ｄ.Int(Rnd(1)*28)+11
9. 表達式16/4-2^5*8/4 MOD 52的值為（ ）。
A.20 B.14 C.4 D.2
10.對命令按鈕的Picture屬性裝入.bmp圖形文件后，命令按鈕上并沒有顯示圖形，原因是沒有對（ ）屬性設置為1。
A.MousePictrue B.Style
C.DownPicture D.DisabledPicture
11．下列對象中不能作為容器的控件是( )。
A．窗體 B． PictureBox控件
C．Image控件 D． Frame控件
12.下面程序段運行后，顯示結果是( )。
Dim x
If x Then Print x Else Print x+1
A．0 B．1 C．－1 D．顯示出錯信息
13.循環語句For i= -3.5 To 5.5 Step -0.5的循環次數是( )。
A．20 B．19 C．18 D．0
14.如下數組聲明語句Dim a(3，-2 to 2，5) As Long，則數組a包含元素的個數是( )。
A．120 B．75 C．60 D．13
15．決定組合框樣式的屬性是( )。
A．List B．Text C．Style D．Caption
16．滾動條的（ ）屬性用于返回或設置滾動條的當前值。
Ａ.Ｖalue Ｂ.Max Ｃ.Min Ｄ.Data
17.下面子過程語句說明合法的是( )。
A．Function f1%(f1%) B．Function f1(ByVal n%)
C．Sub f1(Byval n%( )) D．Sub f1(n%) As Integer
18.在過程中定義的變量，若希望在離開該過程后，還能保存過程中局部變量的.值，則應使用( )關鍵字的在過程中定義局部變量。
A．Static B．Public C．Private D．Dim
19.下列控件中沒有Caption屬性的是（ ）。
A．框架 B．單選按鈕 C．列表框 D．復選框
20. 以下不屬于鍵盤事件的是（ ）
A.KeyDown B. KeyUp C. Unload D. KeyPress
21.下列關于菜單的說法，錯誤的是( )。
A．每個菜單項都是一個控件，與其它控件一樣也有自己的屬性和事件
B．菜單項的快捷鍵不能任意設置
C．在程序運行時，如果菜單項的Enabled屬性為False，則該菜單項編程灰色，不能被用戶選擇
D．除了Click事件之外，菜單項還能響應其它的事件，如DblClick
22.下列關于通用對話框的敘述中，錯誤的是( )。
A．通用對話框可以用來制作和顯示“幫助”對話框
B．CommonDialog1.ShowFont顯示“字體”對話框
C．在“打開”或“另存為”對話框中，用戶選擇的文件名可以經FileTitle屬性返回
D．在“打開”或“另存為”對話框中，用戶選擇的文件名及其路徑可以經FileName屬性返回
23. 指令“Circle（1000，1000），500，－6，－3”將繪制( )。
A．畫圓 B．橢圓 C．扇形 D．圓弧
24．假如列表框（List1）有四個數據項，把數據項“數據庫原理”添加到列表框的最后，應使用（ ）語句。
A．List1.AddItem “數據庫原理”，List1.ListCount
B．List1.AddItem “數據庫原理”，List1.ListCount-1
C．List1.AddItem 3，“數據庫原理”
D．List1.AddItem “數據庫原理”，3
25.VB提供了結構化程序設計的三種基本結構，三種基本結構是（ ）。
A．遞歸結構、選擇結構、循環結構
B．選擇結構、過程結構、順序結構
C．過程結構、輸入、輸出結構、轉向結構
D．選擇結構、循環結構、順序結構
26.在一個多窗體程序中，Form1是啟動窗體，當程序運行后要想顯示Form2窗體，正確的語句是( )。
A．Show Form2 B．Form2.show C．Load Form2 D．Form2.Load
27．要從磁盤上讀入一個文件名為“c: 1.txt”的順序文件，下列（ ）正確。
A.f=”c: 1.txt” B.f=”c: 1.txt”
Open “f” For Input As #1 Open f For Input As #1
C.Open ”c: 1.txt”For output As #1 D.Open c: 1.txt For input As #1
28．假定有如下事件過程：
Private Sub Form_MouseDown(Button as Integer,Shift as Integer, X as Single,Y as Single)
If Button=2 Then PopupMenu PopForm
End Sub
則以下描述中錯誤的是（ ）。
A.該過程的功能是彈出一個菜單
B.popForm是在菜單編輯器中定義的彈出式菜單的名稱
C.參數X、Y指明鼠標的當前位置
D.Button＝2表示按下的是鼠標左鍵
29.Print #1,Str1$中的Print是( ).
A．在窗臺上顯示的方法 B．文件的寫語句
C．子程序明 D．以上均不是
BCDBC CBBCB CBDAC ABACC DACAD BBDBC
3月全國計算機等級考試二級VB筆試真題 4
填空題(每空1分，共20分)
1.VB是一種面向 [ 1 ] 的可視化程序設計語言，采取了[ 2 ]的編程機制。
2.算術表達式 |x+y|+35 寫成VB表達式的'形式為 [3 ] 。
3.使文本框可以獲得焦點的方法是 [ 4 ] 。
4.Inputbox函數的返回值是 [5] 類型，Msgbox函數的返回值是 [6] 類型。
5.在調用自定義函數時，參數的傳遞有 [ 7 ] 和 [ 8 ] 兩種形式。
6.在如下數組聲明語句中 Dim s(4，4) As Integer，第一個數組元素的引用形式是 [9 ] 。
7.如果要每隔0.5 s觸發一個Timer事件，則Interval屬性應設置為 [ 10 ] 。
8.單選按鈕和復選框都有Value屬性，但二者該屬性值的類型不一樣，其中單選按鈕該屬性值類型為 [ 11 ] ，復選框該屬性值類型為 [ 12 ] 。
9.要在程序中顯示通用對話框，要對CommonDialog控件的 [ 13 ] 屬性賦以正確的值。
10.VB提供了三種訪問文件的模式，按照訪問模式可以把文件分為順序文件、 [ 14 ] 和二進制文件。
11.使用Line方法畫矩形，必須在指令中使用關鍵字 [ 15 ] 。
12.窗體上有一命令按鈕，程序運行時，決定該按鈕是否可用應設置的屬性是 [ 16 ] ，決定該按鈕是否顯示應設置的屬性是 [ 17 ] 。
13.VB程序設計語言具有結構化程序設計的三種基本結構，即 [18 ]、 [19 ] 、[20 ] 。
答案：
[1]對象[2] 事件驅動[3]Abs(x+y)+3^5[4]SetFocus
[5]字符型[6] 數值(整型)[7] 傳值[8] 傳址
[9]S(0，0)[10]500ms[11] 邏輯型[12] 數值型(整型)
[13]Action[14]隨機文件[15]B[16]Enabled
[17]Visible[18]順序結構[19] 選擇結構[20]循環結構
【3月全國計算機等級考試二級VB筆試真題】相關文章：
2006年上半年全國計算機等級考試二級VB筆試真題10-02
全國計算機等級考試二級VB筆試真題參考答案（完整版）11-26
全國計算機等級考試二級C++筆試真題10-11
全國計算機二級VB考試真題12-05
計算機等級考試二級ACCESS筆試真題10-06