- 相關(guān)推薦
計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案（精選3套）
在學(xué)習(xí)、工作生活中，我們很多時(shí)候都不得不用到考試題，考試題是命題者按照一定的考核目的編寫(xiě)出來(lái)的。那么問(wèn)題來(lái)了，一份好的考試題是什么樣的呢？以下是小編精心整理的計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案（精選3套），歡迎閱讀與收藏。
計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案 1
一 、選擇題
(1)假設(shè)線性表的長(zhǎng)度為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)分析算法的效率以求改進(jìn)
正確答案: D
(3)線性表L=(a1,a2,a3,…ai，…an)，下列說(shuō)法正確的是
A)每個(gè)元素都有一個(gè)直接前件和直接后件
B)線性表中至少要有一個(gè)元素
C)表中諸元素的排列順序必須是由小到大或由大到小
D)除第一個(gè)元素和最后一個(gè)元素外，其余每個(gè)元素都有一個(gè)且只有一個(gè)直接前件和直接后件
正確答案: D
(4)在單鏈表中，增加頭結(jié)點(diǎn)的目的是
A)方便運(yùn)算的實(shí)現(xiàn)
B)使單鏈表至少有一個(gè)結(jié)點(diǎn)
C)標(biāo)識(shí)表結(jié)點(diǎn)中首結(jié)點(diǎn)的位置
D)說(shuō)明單鏈表是線性表的鏈?zhǔn)酱鎯?chǔ)實(shí)現(xiàn)
正確答案: A
(5)軟件工程的出現(xiàn)是由于
A)程序設(shè)計(jì)方法學(xué)的影響
B)軟件產(chǎn)業(yè)化的需要
C)軟件危機(jī)的出現(xiàn)
D)計(jì)算機(jī)的發(fā)展
正確答案: C
(6)軟件開(kāi)發(fā)離不開(kāi)系統(tǒng)環(huán)境資源的支持，其中必要的測(cè)試數(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ù)庫(kù)系統(tǒng)不具有的特點(diǎn)是
A)數(shù)據(jù)分布性和邏輯整體性
B)位置透明性和復(fù)制透明性
C)分布性
D)數(shù)據(jù)冗余
正確答案: D
(9)關(guān)系表中的每一橫行稱為一個(gè)
A)元組B)字段
C)屬性D)碼
正確答案: A
(10)下列數(shù)據(jù)模型中，具有堅(jiān)實(shí)理論基礎(chǔ)的是
A)層次模型
B)網(wǎng)狀模型
C)關(guān)系模型
D)以上3個(gè)都是
(11)下列說(shuō)法正確的是
A)對(duì)象的可見(jiàn)性可設(shè)為True或False
B)標(biāo)題的屬性值不可設(shè)為任何文本
C)屬性窗口中屬性只能按字母順序排列
D)某些屬性的值可以跳過(guò)不設(shè)置，自動(dòng)設(shè)為空值
正確答案: A
(12)下列關(guān)于退出Visual Basic系統(tǒng)的方法的描述錯(cuò)誤的是
A)打開(kāi)Visual Basic主窗體的"文件"菜單，執(zhí)行其中的"退出"命令
B)按快捷鍵Alt+Q退出
C)單擊Visual Basic主窗體右上角的"關(guān)閉"按鈕
D)按快捷鍵Alt+E退出
正確答案: D
(13)單擊窗體上的關(guān)閉按鈕時(shí)，觸發(fā)的事件是
A)Form_Initialize( )
B)Form_Load( )
C)Form_Unload( )
D)Form_Click( )
正確答案: C
(14)在代碼編輯器中，續(xù)行符是用來(lái)?yè)Q行書(shū)寫(xiě)同一個(gè)語(yǔ)句的符號(hào)，用以表示續(xù)行符的是
A)一個(gè)空格加一個(gè)下劃線"_"
B)一個(gè)下劃線"_"
C)一個(gè)造字符"-"
D)一個(gè)空格加一個(gè)連字符"-"
正確答案: A
(15)為了暫時(shí)關(guān)閉計(jì)時(shí)器，應(yīng)把該計(jì)時(shí)器控件的哪個(gè)屬性設(shè)置為False?
A)Visible
B)Timer
C)Enabled
D)Interval
正確答案: C
(16)以下關(guān)于Visual Basic數(shù)據(jù)類型的說(shuō)法，不恰當(dāng)?shù)氖?/p>
A)Visual Basic 6.0提供的數(shù)據(jù)類型主要有字符串型和數(shù)值型，此外還有字節(jié)、貨幣、對(duì)象、日期、布爾和變體數(shù)據(jù)類型等
B)目前Decimal數(shù)據(jù)類型只能在變體類型中使用
C)用戶不能定義自己的數(shù)據(jù)類型
D)布爾型數(shù)據(jù)只能取兩種值，用兩個(gè)字節(jié)存儲(chǔ)
正確答案: C
(17)以下各項(xiàng)，可以作為Visual Basic變量名的是
A)Book
B)2_Seek
C)123.58
D)Book-1
正確答案: A
(18)表達(dá)式(3 / 2 + 1)* (5 / 2 + 2)的值是
A)11.25
B)3
C)6.125
D)4
正確答案: A
(19)關(guān)于自定義對(duì)話框概念的說(shuō)明，錯(cuò)誤的是
A)建立自定義對(duì)話框時(shí)必須執(zhí)行添加窗體的操作
B)自定義對(duì)話框?qū)嶋H上是VB的窗體
C)在窗體上還要使用其他控件才能組成自定義對(duì)話框
D)自定義對(duì)話框不一定要有與之對(duì)應(yīng)的事件過(guò)程
正確答案: D
(20)下面Change事件過(guò)程中，文本框控件Text1用來(lái)接收數(shù)字字符的輸入，該事件過(guò)程的作用是
Private Sub Text1_Change()
Text2.Text=Str(6.28 * Val(Text1.Text))
End Sub
A)將在文本框Text1輸入的數(shù)字變?yōu)閿?shù)值
B)將在文本框Text1輸入的數(shù)字作為半徑，求圓的周長(zhǎng)并轉(zhuǎn)換為字符串
C)只要Text1中的內(nèi)容一改變，Text2中顯示的圓周長(zhǎng)也隨之改變
D)事件過(guò)程中的'Val函數(shù)和Str函數(shù)使用錯(cuò)誤，事件過(guò)程不能執(zhí)行
正確答案: C
21)用什么語(yǔ)句可以選擇指定的表項(xiàng)或取消已選擇的表項(xiàng)?
A)列表框.Selected(索引值)
B)列表框名.Selected(索引值)=True|False
C)列表框.Selected
D)列表框名.Selected=True|False
正確答案: B
(22)用于將屏幕上的對(duì)象分組的控件是
A)列表框
B)組合框
C)標(biāo)簽
D)框架
正確答案: D
(23)以下說(shuō)法不正確的是
A)使用ReDim語(yǔ)句可以改變數(shù)組的維數(shù)
B)使用ReDim語(yǔ)句可以改變數(shù)組的類型
C)使用ReDim語(yǔ)句可以改變數(shù)組的每一維的大小
D)使用ReDim語(yǔ)句可以改變對(duì)數(shù)組中的所有元素進(jìn)行初始化
正確答案: B
(24)有如下事件過(guò)程：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (Button And 3)=3 Then
Print "OK"
End If
End Sub
程序運(yùn)行后，為了在窗體上輸出"OK"，應(yīng)當(dāng)按下的鼠標(biāo)鍵是
A)左鍵
B)右鍵
C)同時(shí)按下左鍵和右鍵
D)按什么都不顯示
正確答案: D
(25)在窗體上畫(huà)一個(gè)名稱為CommonDialog1的通用對(duì)話框，一個(gè)名稱為Command1的命令按鈕，要求單擊命令按鈕時(shí)，打開(kāi)一個(gè)保存文件的對(duì)話框，該窗口的標(biāo)題為"Save"，缺省文件名稱為"SaveFile"，在"文件類型"欄中顯示*txt，則能夠滿足上述要求的程序是
A)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=2
End Sub
B)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=2
End Sub
C)Private Sub Command1_Click()
CommonDialog1.FileName="Save"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="SaveFile"
CommonDialog1.Action=2
End Sub
D)Private Sub Command1_Click()
CommonDialog1.FileName="SaveFile"
CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC)|*.doc"
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle="Save"
CommonDialog1.Action=1
End Sub
正確答案: A (26)閱讀下面的程序段：
For a=1 To 2
For b=1 To a
For c=b To 2
I=I + 1
Next
Next
Next
Print I
執(zhí)行上面的三重循環(huán)后，I的值為
A)4
B)5
C)6
D)9
正確答案: B
(27)設(shè)有下面的循環(huán)：
i=0
While i <=1
i=i + 3
Print i
Wend
則運(yùn)行后的輸出結(jié)果是
A)1
B)2
C)3
D)4
正確答案: C
(28)設(shè)有下面的循環(huán)：
i=1
Do
i=i + 3
Print i
Loop Until I>程序運(yùn)行后要執(zhí)行3次循環(huán)體，則條件中I的最小值為
A)6
B)7
C)8
D)9
正確答案: B
(29)執(zhí)行以下語(yǔ)句過(guò)程，在窗體上顯示的內(nèi)容是
Option Base 0
Private Sub Command3_Click()
Dim d
d=Array("a", "b", "c", "d")
Print d(1); d(3)
End Sub
A)ab
B)bd
C)ac
D)出錯(cuò)
正確答案: B
(30)下列程序段，在運(yùn)行時(shí)最早輸出的內(nèi)容是
a=2
c=1
AAA:
c=c + a
If c < 10 Then
Print c
GoTo AAA
Else
Print "10以內(nèi)的奇數(shù)顯示完畢。"
End If
A)3
B)7
C)9
D)6
正確答案: A (31)有如下程序段：
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
Print G(A)
Next i
End Sub
Function G(a As Integer)
b=0
Static c
b=b + 1
c=c + 1
G=a + b + c
End Function
運(yùn)行上面的程序后，單擊命令按鈕，輸出結(jié)果為
A)1 2 3
B)2 3 4
C)4 5 6
D)1 4 6
正確答案: C
(32)單擊命令按鈕時(shí)，下列程序的運(yùn)行結(jié)果為
Private Sub Command1_Click()
Print MyBM(23, 18)
End Sub
Public Function MyBM(m As Integer, n As Integer)As Integer
Do While m <> n
Do While m > n: m=m - n: Loop
Do While m < n: n=n - m: Loop
Loop
MyBM=m
End Function
A)0
B)1
C)3
D)5
正確答案: B
(33)有如下的程序：
Private Sub Command1_Click()
Dim k As Integer, m As Integer
Dim P As Integer
k=4: m=1
P=Pid(k, m): Print P;
P=Pid(k, m): Print P
End Sub
Private Function Pid(a As Integer, b As Integer)
Static m As Integer, i As Integer
m=5: i=2
i=i + m + 1
m=i + a + b
Pid=m \ 2
End Function
單擊命令按鈕后，輸出結(jié)果為
A)2 2
B)4 4
C)55
D)6 6
正確答案: D
(34)下面4個(gè)CT函數(shù)中是用來(lái)判斷用戶輸入的數(shù)是否為奇數(shù)的，是奇數(shù)的返回1，否則返回0，其中正確的是
A)Function CT(ByVal a As Integer)
If a Mod 2=0 Then Return 0 ElseReturn 1End ifEnd Function
B)Function CT(ByVal a As Integer)
If a Mod 2=0 Then
CT=0
Else
CT=1
End if End Function
C)Function CT(ByVal a As Integer)
If a Mod 2=0 ThenCT=1 ElseCT=0End ifEnd Function
D)Function CT(ByVal a As Integer)
If a Mod 2=0 Then
Return 1
Else
Return 0
End if
End Function
考生答案: 正確答案: B
(35)在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：
Private Sub Command1_Click()
Dim m As Integer, n As Integer, p As Integer
m=3: n=5: p=0
Call Y(m, n, p)
Print Str(p)
End Sub
Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer)
k=i + j
End Sub
程序運(yùn)行后，如果單擊命令按鈕，則在窗體上顯示的內(nèi)容是
A)4
B)6
C)8
D)10
正確答案: C
二 、填空題
(1)在算法正確的前提下，評(píng)價(jià)一個(gè)算法的兩個(gè)標(biāo)準(zhǔn)是 【1】 。
正確答案: 1.(時(shí)間復(fù)雜度和空間復(fù)雜度)
(2)將代數(shù)式 轉(zhuǎn)換成程序設(shè)計(jì)中的表達(dá)式為 【2】 。
正確答案: 1.(SQR(x^2+y^2)/(a+b))
(3)軟件危機(jī)出現(xiàn)于60年代末，為了解決軟件危機(jī)，人們提出了 【3】 的原理來(lái)設(shè)計(jì)軟件，這就是軟件工程誕生的基礎(chǔ)。
正確答案: 1.(軟件工程學(xué))
(4) 【4】 是數(shù)據(jù)庫(kù)設(shè)計(jì)的核心。
正確答案: 1.(數(shù)據(jù)模型)
(5)在關(guān)系模型中，把數(shù)據(jù)看成一個(gè)二維表，每一個(gè)二維表稱為一個(gè) 【5】 。
正確答案: 1.(關(guān)系)
(6)有下面一個(gè)程序段，從文本框中輸入數(shù)據(jù)，如果該數(shù)據(jù)滿足條件，除以4余1，除以5余2，則輸出，否則，將焦點(diǎn)定位在文本框中，并清除文本框的內(nèi)容。
Private Sub Command1_Click()
x=Val(Text1.Text)
If 【6】 Then
Print x
Else
Text1.Text=""
【7】
End If
End Sub
正確答案: 1.(x Mod 4 = 1 And x Mod 5 = 2)2.(Text1.SetFocus)
(7)已知B的ASCII碼為66，以下程序統(tǒng)計(jì)由鍵盤(pán)輸入的字符串中各英文字母的使用次數(shù)
Dim 【8】
For i=65 To 90
pp(i)=0
Next
x$=InputBox("Enter a string", x$)
x$=UCase$(x$)
For i=1 To 【9】
n=Asc(Mid$(x$, i, 1))
If n >=65 And n <=90 Then
【10】
End If
Next i
For i=65 To 90
If pp(i)> 0 Then
Print Chr$(i); pp(i)
End If
Next
正確答案: 1.(pp(65 To 90))2.(Len(x$))3.(pp(n)= pp(n)+ 1)
計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案 2
1、在并發(fā)程序執(zhí)行過(guò)程中，進(jìn)程調(diào)度負(fù)責(zé)分配
A）CPU
B）CPU、打印機(jī)
C）CPU、打印機(jī)、外存
D）所有系統(tǒng)資源
2、為了解決CPU和主存之間的速度匹配問(wèn)題，應(yīng)該
A）在主存儲(chǔ)器和CPU之間增加高速緩沖存儲(chǔ)器
B）提高主存儲(chǔ)器訪問(wèn)速度
C）擴(kuò)大CPU中通用寄存器的數(shù)量
D）擴(kuò)大主存容量
3、下列數(shù)據(jù)結(jié)構(gòu)中，屬于非線性結(jié)構(gòu)的是
A）雙向鏈表
B）循環(huán)鏈表
C）二叉鏈表
D）循環(huán)隊(duì)列
4、一棵二叉樹(shù)共有25個(gè)結(jié)點(diǎn)，其中5個(gè)是葉子結(jié)點(diǎn)，則度為1的.結(jié)點(diǎn)數(shù)為A）16
B）10
C）4
D）6
5、下列關(guān)于循環(huán)隊(duì)列的敘述中，正確的是
A）循環(huán)隊(duì)列是隊(duì)列的一種鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)
B）循環(huán)隊(duì)列是隊(duì)列的一種順序存儲(chǔ)結(jié)構(gòu)
C）循環(huán)隊(duì)列是非線性結(jié)構(gòu)
D）循環(huán)隊(duì)列是一種邏輯結(jié)構(gòu)
6、下面對(duì)軟件特點(diǎn)的描述中，錯(cuò)誤的是
A）軟件是一種邏輯實(shí)體，具有抽象性
B）軟件開(kāi)發(fā)、運(yùn)行對(duì)計(jì)算機(jī)系統(tǒng)具有依賴性
C）軟件開(kāi)發(fā)涉及軟件知識(shí)產(chǎn)權(quán)、法律及心理等社會(huì)因素
D）軟件運(yùn)行存在磨損和老化問(wèn)題
7、下面屬于黑盒測(cè)試方法的是
A）基本路徑測(cè)試
B）等價(jià)類劃分
C）判定覆蓋測(cè)試
D）語(yǔ)句覆蓋測(cè)試
8、在E-R圖中，表示實(shí)體的圖元是
A）矩形
B）橢圓
C）菱形
D）圓
9、有兩個(gè)關(guān)系R和T如下：
R T
則由關(guān)系R得到關(guān)系T的操作是
A）選擇
B）交
C）投影
D）并
10、對(duì)圖書(shū)進(jìn)行編目時(shí)，圖書(shū)有如下屬性：ISBN書(shū)號(hào)，書(shū)名，作者，出版社，出版日期。能作為關(guān)鍵字的是
A）ISBN書(shū)號(hào)
B）書(shū)名
C）作者
D）出版社
答案
1.A 2.A 3.C 4.A 5.B
6.D 7.B 8.A 9.C 10.A
計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案 3
一、選擇題：35題，2分/題，共70分
下列各題A)、B)、C)、D)四個(gè)選項(xiàng)中，只有一個(gè)選項(xiàng)是正確的，請(qǐng)將正確選項(xiàng)涂寫(xiě)在答題卡相應(yīng)位置上，答在試卷上不得分。
1.假定窗體有一個(gè)標(biāo)簽，名為L(zhǎng)abel1,為了使該標(biāo)簽透明并且沒(méi)有這框，則正確的屬性設(shè)置為( )
A)Label1.Backstyle=0 Label1.BorderStyle=0
B)Label1.Backstyle=1 Label1.BorderStyle=1
C)Label1.Backstyle=True Label1.BorderStyle=True
D)Label1.Backstyle=False Label1.BorderStyle=False
分析:
2.通過(guò)改變單選按鈕(Option Button)控件的( )屬性值，可以改變按鈕的選取狀態(tài)。
A)value
B)Style
C)Appearance
D)Caption
分析:
3.以下語(yǔ)句用于打開(kāi)一個(gè)順序文件Open"C:\MyFile.txt"For OutPut,但是該語(yǔ)句的一個(gè)重要錯(cuò)誤是沒(méi)有( )
A)指定打開(kāi)方式
B)指定文件號(hào)
C)指定打開(kāi)文件名
D)指定文件類型
分析:
4.假定有如下的Sub 過(guò)程：
Sub S(x As Single, y As Single)
t = x
x=t / y
y=t Mod y
End Sub
在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=5
b=2
S a, b
Print a, b
End Sub
程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是( )
A)5 2
B)1 1
C)1.25 4
D)2.5 1
分析:
5.如果要在程序中顯示一個(gè)彈出式菜單，那么要調(diào)用Visual Basic中提供的( )方法。
A)Print
B)Move
C)Refresh
D)PopupMenu
分析:
6.假定有以下兩個(gè)過(guò)程：
Private Sub PPP (a As Single, b As Single)
a = a + b
Print a , b
b = a + b
Print a, b
End Sub
Private Sub Form_Activate()
x=18
Call PPP ((x),(x))
Print x
End Sub
則以下說(shuō)法中不正確的是( )
A)虛參是 a 和b ，兩個(gè)實(shí)參(x)和(x)允許重名
B)虛參是 a 和b ，實(shí)參(x)表示是傳值調(diào)用
C)虛參是 a 和b ，實(shí)參(x)表示是非傳址調(diào)用
D)虛參是 a 和b ，兩個(gè)實(shí)參(x)和(x)不允許重名
分析:
7.在窗體上畫(huà)一個(gè)列表框和一個(gè)文本框，然后編寫(xiě)如下兩個(gè)事件過(guò)程：
Private Sub Form_Load()
List1.AddItem"357"
List1.AddItem"246"
List1.AddItem"123"
List1.AddItem"456"
Text1.Text=""
End Sub
Private Sub List1_DblClick()
M = List1.Text
Print M + Text1.Text
End Sub
程序運(yùn)行后，在文本框中輸入“123”，然后雙擊列表框中的“456”，則輸出結(jié)果為( )
A)1245
B)456123
C)123456
D)0
分析:
8.用( )屬性可惟一標(biāo)志控件陣列中的某一個(gè)控件。
A) Name
B) Index
C) Caption
D) TabIndex
分析:
9.為了把一個(gè)記錄型變量的內(nèi)容寫(xiě)入文件中指定的位置，所使用語(yǔ)句的格式為( )
A)Get 文件名，記錄號(hào)，變量名
B)Get 文件號(hào)，變量名，記錄號(hào)
C)Put 文件號(hào)，變量名，記錄號(hào)
D)Put 文件號(hào)，記錄號(hào)，變量名
分析:
10.閱讀程序：
Function F ( a As Integer)
b = 0
Static c
b= b + 1
c= c + 2
F= a + b + c
End Functon
Private Sub Command1_Click()
Dim a As Integer
a = 2
For i = 1 to 3
Print F(a)
Next i
End Sub
運(yùn)行上面的'程序，單擊命令按鈕，輸出結(jié)果為( )
A) 4 5 6
B) 5 7 9
C) 4 6 8
D) 4 7 9
分析:
來(lái)源:-計(jì)算機(jī)二級(jí)考試
11.惟一能區(qū)別一個(gè)控件屬性的是( )
A)Caption
B)Text
C)Name
D)Index
分析:
12.以下描述正確的是( )
A)過(guò)程的定義可以嵌套，但過(guò)程的調(diào)用不能嵌套
B)過(guò)程的定義不可以嵌套，但過(guò)程的調(diào)用可以嵌套
C)過(guò)程的定義和過(guò)程的調(diào)用均可以嵌套
D)過(guò)程的定義和過(guò)程的調(diào)用均不能嵌套
分析:
13.用Dim AABB(-2 to 10, 4 to 8,1)聲明的是一個(gè)( )維數(shù)組。
A)1
B)2
C)3
D)4
分析:
14.在VB代碼中，將多個(gè)語(yǔ)句合并寫(xiě)在一行上的并行符是( )
A)撇號(hào)(’)
B)冒號(hào)(：)
C)感嘆號(hào)(！)
D)星號(hào)(*)
分析:
15.如果在立即窗口中執(zhí)行以下操作：
a = 8 (是回車鍵，下同)
b = 9 Print a > b 則輸出結(jié)果是( )
A)-1
B)0
C)False
D)True
分析:
16.在窗體上畫(huà)兩個(gè)文本框(其Name屬性分別為Text1和Text2)和一個(gè)命令按鈕(其Name 屬性為Command1)，然后編寫(xiě)如下事件過(guò)程：
Private Sub Command1)_Click()
x=0
Do Until x > = 50
x= (x + 4)*(x + 3)
n= n+1
Loop
Text1.Text=Str(n)
Text1.Text=Str(x)
End Sub
程序運(yùn)行后，單擊命令按鈕，在兩個(gè)文本框中顯示的值分別為( )
A)1 和 0
B)2 和240
C)3 和 50
D)4 和168
分析:
17.在窗體上畫(huà)一個(gè)文本框，然后編寫(xiě)如下事件過(guò)程：( )
Private Sub Text1_KeyPress (KeyAscii As Integer)
Dim char As String
char=Chr (KeyAscii)
KeyAscii=Asc(UCase(char))
Text1.Text=String(6, KeyAscii))
End Sub
A)a
B)A
C)aaaaaa
D)AAAAAA
分析:
18.編寫(xiě)如下事件過(guò)程:
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
If(Button And 3)=3 Then
Print "AAAA"
End If
End Sub
程序運(yùn)行后，為了在窗體上輸出“AAAA”,應(yīng)該下的鼠標(biāo)鍵為( )
A)左
B)右
C)同時(shí)按下左、右
D)按什么鍵都不顯示
分析:
19.用于去掉一個(gè)字符串的右邊的空白部分的函數(shù)是( )
A)RTrim()
B)Right()
C)Asc()
D)Time()
分析:
20.下列哪條語(yǔ)句是錯(cuò)的( )
A)RTrim()
B)Exit Function
C)Exit While
D)Exit Do
分析: 來(lái)源:-計(jì)算機(jī)二級(jí)考試
21.設(shè) a= 8,則執(zhí)行x=IIF(a > 10 ,-1,0)后，x 的值為( )
A)5
B)6
C)0
D)-1
分析:
22.Visual Basic 一共有設(shè)計(jì)、運(yùn)行和中斷三種模式，要使用調(diào)試工具應(yīng)該( )
A)進(jìn)入設(shè)計(jì)模式
B)進(jìn)入運(yùn)行模式
C)進(jìn)入中斷模式
D)不用進(jìn)入任何模式
分析:
23.如何使圖像(Image)控件中的圖像自動(dòng)適宜控件的大小?( )
A)將控件的AutoSize屬性設(shè)為True
B)將控件的AutoSize屬性設(shè)為False
C)將控件的Stretch屬性設(shè)為True
D)將控件的Stretch屬性設(shè)為False
分析:
24.如果要在程序代碼中為圖片框動(dòng)態(tài)加載和清除圖像，可以利用( )函數(shù)。
A)InputBox
B)Input
C)LoadPicture
D)PaintPicture
分析:
25.在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：
Private Sub Command1_Click()
x = 0
Do Until x = -1
a = InputBox("請(qǐng)輸入 a 的值")
a = Val (a)
b = InputBox("請(qǐng)輸入 b 的值")
b = Val (b)
x = InputBox("請(qǐng)輸入 x 的值")
x = Val(x)
a = a + b + x
Loop
Print a
End Sub
程序運(yùn)行后，單擊命令按鈕，依次在輸入對(duì)話框中輸入 10、8、9、2、11、-1，則輸出結(jié)果為( )。
A)12
B)13
C)14
D)15
分析:
26.函數(shù)過(guò)程(用Function定義)與子過(guò)程(用Sub 定義)的最大區(qū)別是( )
A)函數(shù)過(guò)程有返回值
B)子過(guò)程有返回值
C)函數(shù)過(guò)程可以帶參數(shù)
D)子過(guò)程可以帶參數(shù)
分析:
27.Visual Basic根據(jù)計(jì)算機(jī)訪問(wèn)文件的方式將文件分成三類，其中不包括( )
A)順序文件
B)Unix文件
C)二進(jìn)制文件
D)隨機(jī)文件
分析:
28.要顯示當(dāng)前過(guò)程中的所有變量及對(duì)象的取值，可以利用( )窗口。
A)數(shù)據(jù)
B)調(diào)用堆棧
C)立即
D)本地
分析:
29.符號(hào)％是聲明( )類型變量的類型定義符。
A)Integer
B)Variant
C)Single
D)String
分析:
30.Visual Basic 中窗體文件的擴(kuò)展名是( )
A)VBP
B)FRM
C)VBW
D)PDM
分析:
來(lái)源:-計(jì)算機(jī)二級(jí)考試
31.關(guān)于MDI窗體下列說(shuō)法正確的是( )
A)一個(gè)應(yīng)用程序可以有多個(gè)MDI窗體
B)子窗體可以移動(dòng)MDI窗體以外
C)不可以在MDI窗體上放置按鈕控件
D)MDI窗體的子窗體不可以擁有菜單
分析:
32.窗體在屏幕上顯示后有( )方法可以清除它。
A)1種
B)2種
C)3種
D)4種
分析:
33.假定在窗體上建立一個(gè)通用對(duì)話框，其名稱為CommonDialog1,用下面的語(yǔ)句可以建立一個(gè)對(duì)話框：
CommonDialong1.Action = 4
與該語(yǔ)句等價(jià)的語(yǔ)句是( )
A)CommonDialong1.ShowOpen
B)CommonDialong1.ShowFont
C)CommonDialong1.ShowColor
D)CommonDialong1.ShowSave
分析:
34.在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array (1,3,5,7,9)
j = 1
For i = 5 to 1 Step -1
s= s +a(i) * j
j= j * 10
Next i
Print s
End Sub
運(yùn)行上面的程序，單擊命令按鈕，其輸出結(jié)果是( )
A)97531
B)135
C)957
D)13579
分析:
35.下列語(yǔ)句都是在Form 中定義的，( )是錯(cuò)的。
A)Public Const A1 = 2u
B)Private Const A2 = 8
C)Public a3 As Integer
D)Private a4 As Integer
分析:
二、填空：每空2分，共30分。
1.閱讀以下程序：
Private Sub Form_Click()
Dim k,n ,m, As Integer
n = 10
m =1
k =1
Do While k
m = m + 2
k = k + 1
Loop
Print m
End Sub
單擊窗體，程序的執(zhí)行結(jié)果是[1]
2.當(dāng)用[2]方式打開(kāi)文件時(shí)，如果對(duì)文件進(jìn)行寫(xiě)操作，則寫(xiě)入的數(shù)據(jù)附加到原來(lái)文件的后面。
3.組合框有3種不同的類型，這3種類型是下拉式列表框、簡(jiǎn)單組合框和[3],分別通過(guò)把[4]屬性設(shè)置為2、1、0來(lái)實(shí)現(xiàn)。
4.為了在按下ESC鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過(guò)程，需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是[5]。
5.在執(zhí)行KeyPress事件過(guò)程時(shí)，KeyASCII是所按鍵的[6]值。對(duì)于有上檔字符和下檔字符的鍵，當(dāng)執(zhí)行KeyDown事件過(guò)程時(shí)，KeyCode是[7]字符的[8]值。
6.在窗體上面畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下程序:
Function M (x As Integer, y As Integer) As Integer
M =IIf (X >y ,x,y)
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = 1
b = 2
Print M (a,b)
End Sub
程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果為[9]
7.在窗體上畫(huà)兩個(gè)文本框，其名稱分別為Text1和Text2，然后編寫(xiě)如下事件過(guò)程：
Private Sub Form_Load()
Show
Text1.Text=""
Text2.Text=""
Text2.SetFocus
End Sub
Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer)
Text1.Text= Text1.Text +Chr(KeyCode - 4 )
End Sub
程序運(yùn)行后，如果在Text2文本框中輸入“efghi”,則Text1文本框中的內(nèi)容為[10] 來(lái)源:-計(jì)算機(jī)二級(jí)考試
8.執(zhí)行下面的程序段后，b的值為[ ]
a = 800
b = 30
a = a + b
b = a - b
a = a - b
9.為了執(zhí)行自動(dòng)施放，必須把[12]屬性設(shè)置為[13],而為了執(zhí)行手動(dòng)拖放，必須把該屬性設(shè)置為[14]
10.讀下列程序：
Private Sub Form_Click()
Static x(4) As Integer
For i = 1 to 4
x(i) =x (i) + i * 3
Next i
For i = 1 to 4
print "x("；i；") ="；x(i)
Next i
End Sub
該程序在運(yùn)行了三次后，其最終結(jié)果是：[15]
參考答案
一、(1)A (2)A (3)B (4)D (5)D (6)D (7)B (8)B (9)D (10)B (11)C (12)B (13)C (14)B (15)C (16)B
(17)D (18)D (19)A (20)C (21)C (22)C (23)C (24)C (25)A (26)A (27)B (28)D (29)A (30)B
(31)C (32)B (33)B (34)D (35)A
分析:
二、[1]21 [2]Append [3]下拉式組合框 [4]Style [5]Cancel [6]ASCII [7]下檔字符 [8]ASCII
[9]2 [10]ABCDE [11]800 [12]DragMode [13]1 [14]0
[15]x(1)=9 x(2)=18 x(3)=27 x(4)=36
【計(jì)算機(jī)等級(jí)考試二級(jí)VB試題及答案】相關(guān)文章：
計(jì)算機(jī)二級(jí)考試VB考試題及答案02-12
計(jì)算機(jī)二級(jí)考試《VB》操作試題及答案05-30
計(jì)算機(jī)二級(jí)VB考試題及答案02-09
2017計(jì)算機(jī)二級(jí)VB考試題及答案05-20
計(jì)算機(jī)二級(jí)VB考試題含答案02-18
2017計(jì)算機(jī)二級(jí)考試《VB》單選試題及答案01-30
計(jì)算機(jī)二級(jí)《VB》備考試題及答案04-03