- 下半年全國(guó)計(jì)算機(jī)二級(jí)VB考試真題 推薦度：
- 相關(guān)推薦
2010下半年全國(guó)計(jì)算機(jī)二級(jí)VB考試真題
一、選擇題(每小題2分，共70分)下列各題A)、B)、C)、D)四個(gè)選項(xiàng)中，只有一個(gè)選項(xiàng)是正確的。請(qǐng)將正確選項(xiàng)填涂在答題卡相應(yīng)位置上，答在試卷上不得分。
(1)下列敘述中正確的是
A)線性表的鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)與順序存儲(chǔ)結(jié)構(gòu)所需要的存儲(chǔ)空間是相同的
B)線性表的鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)所需要的存儲(chǔ)空間一般要多于順序存儲(chǔ)結(jié)構(gòu)
C)線性表的鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)所需要的存儲(chǔ)空間一般要少于順序存儲(chǔ)結(jié)構(gòu)
D)上述三種說(shuō)法都不對(duì)
(2)下列敘述中正確的是
A)在棧中，棧中元素隨棧底指針與棧頂指針的變化而動(dòng)態(tài)變化
B)在棧中，棧頂指針不變，棧中元素隨棧底指針的變化而動(dòng)態(tài)變化
C)在棧中，棧底指針不變，棧中元素隨棧頂指針的變化而動(dòng)態(tài)變化
D)上述三種說(shuō)法都不對(duì)
(3)軟件測(cè)試的目的是
A)評(píng)估軟件可靠性
B)發(fā)現(xiàn)并改正程序中的錯(cuò)誤
C)改正程序中的錯(cuò)誤
D)發(fā)現(xiàn)程序中的錯(cuò)誤
(4)下面描述中，不屬于軟件危機(jī)表現(xiàn)的是
A)軟件過(guò)程不規(guī)范
B)軟件開(kāi)發(fā)生產(chǎn)率低
C)軟件質(zhì)量難以控制
D)軟件成本不斷提高
(5)軟件生命周期是指
A)軟件產(chǎn)品從提出、實(shí)現(xiàn)、使用維護(hù)到停止使用退役的過(guò)程
B)軟件從需求分析、設(shè)計(jì)、實(shí)現(xiàn)到測(cè)試完成的過(guò)程
C)軟件的開(kāi)發(fā)過(guò)程
D)軟件的運(yùn)行維護(hù)過(guò)程
(6)面向?qū)ο蠓椒ㄖ校^承是指
A)一組對(duì)象所具有的相似性質(zhì)
B)一個(gè)對(duì)象具有另一個(gè)對(duì)象的性質(zhì)
C)各對(duì)象之間的共同性質(zhì)
D)類(lèi)之間共享屬性和操作的機(jī)制
(7)層次型、網(wǎng)狀型和關(guān)系型數(shù)據(jù)庫(kù)劃分原則是
A)記錄長(zhǎng)度
B)文件的大小
C)聯(lián)系的復(fù)雜程度
D)數(shù)據(jù)之間的聯(lián)系方式
(8)一個(gè)工作人員可以使用多臺(tái)計(jì)算機(jī)，而一臺(tái)計(jì)算機(jī)可被多個(gè)人使用，則實(shí)體工作人員、與實(shí)體計(jì)算機(jī)之間的聯(lián)系是
A)一對(duì)一
B)一對(duì)多
C)多對(duì)多
D)多對(duì)一
(9)數(shù)據(jù)庫(kù)設(shè)計(jì)中反映用戶對(duì)數(shù)據(jù)要求的模式是
A)內(nèi)模式
B)概念模式
C)外模式
D)設(shè)計(jì)模式
(10)有三個(gè)關(guān)系R、S和T如下：
則由關(guān)系R和S得到關(guān)系T的操作是
A)自然連接
B)交
C)投影
D)并
(11)在Visual Basic集成環(huán)境中，要添加一個(gè)窗體，可以單擊工具欄上的一個(gè)按鈕，這個(gè)按鈕是
A)
B)
C)
D)
(12)在Visual Basic集成環(huán)境的設(shè)計(jì)模式下，用鼠標(biāo)雙擊窗體上的某個(gè)控件打開(kāi)的窗口是
A)工程資源管理器窗口
B)屬性窗口
C)工具箱窗口
D)代碼窗口
(13)下列敘述中錯(cuò)誤的是
A)列表框與組合框都有List屬性
B)列表框有Selected屬性，而組合框沒(méi)有
C)列表框和組合框都有Style屬性
D)組合框有Text屬性、而列表框沒(méi)有
(14)設(shè)窗體上有一個(gè)命令按鈕數(shù)組，能夠區(qū)分?jǐn)?shù)組中各個(gè)按鈕的屬性是
A)Name B)Index C)Caption D)Left
(15)滾動(dòng)條可以響應(yīng)的事件是
A)Load B)Scroll C)Click D)MouseDown
(16)設(shè)a=5, b=6, c=7, d=8，執(zhí)行語(yǔ)句X=Ilf((a>b)And (c>d), 10, 20)后，x的值是
A)10 B)20 C)30 D)200
(17)語(yǔ)句Print Sgn(-6^2)+ Abs(-6^2)+Int(-6^2)的輸出結(jié)果是
A)-36 B)1 C)-1 D)-72
(18)在窗體上畫(huà)一個(gè)圖片框，在圖片框中畫(huà)一個(gè)命令按鈕，位置如圖所示。
則命令按鈕的Top屬性值是
A)200 B)300 C)500 D)700
(19)在窗體上畫(huà)一個(gè)名稱(chēng)為Command l的命令按鈕。單擊命令按鈕時(shí)執(zhí)行如下事件過(guò)程：
Private Sub Command 1_Click()
a$=”software and hardware"
b$=Right(a$，8)
c$=Mid(a$, 1，8)
MsgBox a$,，b$，c$, 1
End Sub
則在彈出的信息框標(biāo)題欄中顯示的標(biāo)題是
A)software and hardware
B)hardware
C)software
D)1
(20)在窗體上畫(huà)一個(gè)文本框(名稱(chēng)為T(mén)ext 1)和一個(gè)標(biāo)簽(名稱(chēng)為L(zhǎng)abel 1)，程序運(yùn)行后，如果在文本框中輸入文本，則標(biāo)簽中立即顯示相同的內(nèi)容。以下可以實(shí)現(xiàn)上述操作的事件過(guò)程是
A)Private Sub Text1_Change()
Label1.Caption=Text1.Text
End Sub
B)Private Sub Label1_Change()
Label1.Caption=Text1.Text
End Sub
C)Private Sub Text1_Click()
Label1.Caption=Text1.Text
End Sub
D)Private Sub Label1_Click()
Label1.Caption=Text1.Text
End Sub
(21)以下說(shuō)法中錯(cuò)誤的是
A)如果把一個(gè)命令按鈕的Default屬性設(shè)置為T(mén)rue，則按回車(chē)鍵與單擊該命令按鈕的作用相同
B)可以用多個(gè)命令按鈕組成命令按鈕數(shù)組
C)命令按鈕只能識(shí)別單擊(Click)事件
D)通過(guò)設(shè)置命令按鈕的Enabled屬性，可以使該命令按鈕有效或禁用
(22)以下關(guān)于局部變量的敘述中錯(cuò)誤的是
A)在過(guò)程中用Dim語(yǔ)句或Static語(yǔ)句聲明的變量是局部變量
B)局部變量的作用域是它所在的過(guò)程
C)在過(guò)程中用Static語(yǔ)句聲明的變量是靜態(tài)局部變量
D)過(guò)程執(zhí)行完畢，該過(guò)程中用Dim或Static語(yǔ)句聲明的變量即被釋放
(23)以下程序段的輸出結(jié)果是
x=I
y=4
Do Until y>4
x=x*y
Y=y+I
Loop
Print x
A)1 B)4 C)8 D)20
(24)如果執(zhí)行一個(gè)語(yǔ)句后彈出如圖所示的窗口，則這個(gè)語(yǔ)句是
A)InputBox("輸入框”，”請(qǐng)輸入VB數(shù)據(jù)”)
B)x=InputBox("輸入框”，”請(qǐng)輸入VB數(shù)據(jù)”)
C)InputB ox("請(qǐng)輸入VB數(shù)據(jù)”，”輸入框”)
D)x=InputBox("請(qǐng)輸入VB數(shù)據(jù)”，”輸入框”)
(25)有如下事件過(guò)程：
Private Sub Form Click()
Dim n A s Integer
x=0
n=InputBox("請(qǐng)輸入一個(gè)整數(shù)”)
For i=1 Ton
For j=1 To i
x=x+I
Next j
Next i
Print x
End Sub
程序運(yùn)行后，單擊窗體，女口果在輸入對(duì)話框中輸入：，則在窗體上顯示的內(nèi)容是
A)13 B)14 C)15 D)16
(26)請(qǐng)閱讀程序：
Sub subP(b()As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Private Sub Command 1_Click()
Dim a(l To 4)As Integer
A(l)=5：a(2)=6：a(3)=7：a(4)=8
subP a()
For i=1 To 4
Print a(i)
Next i
End Sub
運(yùn)行上面的程序，單擊命令按鈕，則輸出結(jié)果是
A)2 B)5 C)10 D)出錯(cuò)
4 6 12
6 7 14
8 8 16
(27)Fibonacci數(shù)列的規(guī)律是：前2個(gè)數(shù)為1，從第3個(gè)數(shù)開(kāi)始，每個(gè)數(shù)是它前2個(gè)數(shù)之和，即：1，1，2, 3, 5, 8,13, 21，34, 55, 89,…。某人編寫(xiě)了下面的函數(shù)，判斷大于1的整數(shù)x是否是Fibonacci數(shù)列中的某個(gè)數(shù)，若是，則返回True,否則返回False。
Function Isfab(x As Integer)As Boolean
Dim a As Integer, b As Integer, c As Integer, flag As Boolean
flag=False
a=1：b=I
Do While x
c=a+b
a=b
b=c
If x=b Then flag=True
Loop
Isfab=flag
End Function
測(cè)試時(shí)發(fā)現(xiàn)對(duì)于所有正整數(shù)x,函數(shù)都返回False,程序需要修改。下面的修改方案中正確的是
A)把a(bǔ)= b與b=c的位置互換
B)把c=a+b移到b=c之后
C)把Do While xb
D)把if x=b Then flag=True改為If x=a Then flag=True
(28)在窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為Commandl，然后編寫(xiě)如下事件過(guò)程：
Private Sub Command1_Click()
Dim a$, b$，c$, k%
a="ABCD”
b=”123456”
c=""
k=1
Do While k<= Len(a)Or k<=Len(b)
If k<=Len(a)Then
c=c&Mid(a, k, 1)
End If
If k<=Len(b)Then
c=c&Mid(b, k, 1)
End If
k=k+1
Loop
Print c
End Sub
運(yùn)行程序，單擊命令按鈕，輸出結(jié)果是
A)123456ABCD B)ABCD123456 C)D6C5B4A321 D)AlB2C3D456
(29)請(qǐng)閱讀程序：
Private Sub Form_ Click()
m=1
For i=4 To 1 Step-1
Print Str(m);
m=m+1
For j=1 To i
Print”*”;
Next j
Next i
End Sub
程序運(yùn)行后，單擊窗體，則輸出結(jié)果是
A)1**** B)4**** C)**** D)*
2*** 3*** *** **
3** 2** ** ***
4* 1* * ****
(30)在窗體上畫(huà)一個(gè)命令按鈕(其名稱(chēng)為Commandl)，然后編寫(xiě)如下代碼：
Private Sub Command l_Click()
Dim a
a=Array(1,2,3,4)
I=3：j=1
Do While i>=0
s=s+a(i)*j
i=i-1
j=j*10。
Loop
Print s
End Sub
運(yùn)行上面的程序，單擊命令按鈕，則輸出結(jié)果是
A)4321 B)123 C)234 D)1234
(31)下列可以打開(kāi)隨機(jī)文件的語(yǔ)句是
A)Open "file l .dat" For lnpu't As#1
B)Open”file l .dat" For Append As#1
C)Open”file1.dat" For Output As#1
D)Open”file1.dat" For Random As#1 Len=20
(32)有彈出式菜單的結(jié)構(gòu)如下表，程序運(yùn)行時(shí)，單擊窗體則彈出如下圖所示的菜單。下面的事件過(guò)程中能正確實(shí)現(xiàn)這一功能的是
A)Private Sub Form _Click()
PopupMenu cut
End Sub
B)Private Sub Command l Click()
PopupMenu edit
End Sub
C)Private Sub Form_ Click()
PopupMenu edit
End Sub
End Sub
D)Private Sub Form_lick()
PopupMenu cut
PopupMenu paste
(33)請(qǐng)閱讀程序：
Option Base I
Private Sub Form_ Click()
Dim Arr(4, 4)As Integer
For i=1 To 4
For j=I To 4
Arr(i, j)=(i - 1)*2+j
Next j
Next i
For i=3To4
For j=3 To 4
Print Arr(j, i);
Next j
Next i
End Sub
程序運(yùn)行后，單擊窗體，則輸出結(jié)果是
A)5 7 B)6 8 C)7 9 D)8 10
6 8 7 9 8 10 8 11
(34)一下面函數(shù)的功能應(yīng)該是：刪除字符串str中所有與變量ch相同的字符，并返回刪除后的結(jié)果。例如：若str= "ABCDABCD", ch= "B",則函數(shù)的返回值為："ACDACD"
Function delchar(str As String, ch As String)As String
Dim k As Integer, temp As String, ret As String
ret=""
For k=1 To Len(str)
temp=Mid(str, k, 1)
If temp= ch Then
ret=ret&temp
End If
Next k
delchar=ret
End Function
但實(shí)際上函數(shù)有錯(cuò)誤，需要修改。下面的修改方案中正確的是
A)把ret=ret&temp改為ret=temp
B)把If temp=ch Then改為If temp<> ch Then
C)把delchar=ret改為delchar=temp
D)把ret =""改為temp=""
(35)在窗體上畫(huà)一個(gè)命令按鈕和兩個(gè)文本框，其名稱(chēng)分別為Command1、Text I和Text2,在屬性窗口中把窗體的KeyPreview屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下程序：
Dim S I As String, S2 As String
Private Sub Form Load()
Text 1 .Text=""
Text2.Text=""
Text 1.Enabled=False
Text2.Enabled=False
End Sub
Private Sub Form_ KeyDown(KeyCode As Integer, Shift As Integer)
S2=S2&Chr(KeyCode)
End Sub
Private Sub Forin_ KeyPress(KeyAscii As Integer)
S1=S1&Chr(KeyAscii)
End Sub
Private Sub Command l Click
Text l .Text=Sl
Text2.Text=S2
S1=""
S2=""
End Sub
程序運(yùn)行后，先后按“a”、“b”、“c”鍵，然后單擊命令按鈕，在文本框Textl和Text2中顯示的內(nèi)容分別為
A)abc和ABC
B)空白
C)ABC和abc
D)出錯(cuò)
二、填空題(每空2分，共30分)請(qǐng)將每空的正確答案寫(xiě)在答題卡【1】至【15】序號(hào)的橫線上，答在試卷上不得分。
(1)一個(gè)棧的初始狀態(tài)為空。首先將元素5，4，3，2，1 依次入棧，然后退棧一次，再將元素A,B,C,D依次入棧，之后將所有元素全部退棧，則所有元素退棧(包括中間退棧的元素)的順序?yàn)開(kāi)_【1】__。
(2)在長(zhǎng)度為n的線性表中，尋找最大項(xiàng)至少需要比較___【2】___次。
(3)一棵二叉樹(shù)有10個(gè)度為1的結(jié)點(diǎn)，7個(gè)度為2的結(jié)點(diǎn)，則該二叉樹(shù)共有__【3】___個(gè)結(jié)點(diǎn)。
(4)僅由順序、選擇(分支)和重復(fù)(循環(huán))結(jié)構(gòu)構(gòu)成的程序是_【4】__程序。
(5)數(shù)據(jù)庫(kù)設(shè)計(jì)的四個(gè)階段是：需求分析，概念設(shè)計(jì)，邏輯設(shè)計(jì)和_【5】_。
(6)窗體上有一個(gè)名稱(chēng)為Combo1的組合框， 其初始內(nèi)容為空，有一個(gè)名稱(chēng)為Command1、標(biāo)題為“添加項(xiàng)目”的命令按鈕。程序運(yùn)行后，如果單擊命令按鈕，會(huì)將給定數(shù)組中的項(xiàng)目添加到組合框中，如圖所示。請(qǐng)?zhí)羁铡?/p>
Option Base 1
Private Sub Command 1_ Click(
Dim city As Variant
city=_【6】_("北京"，"天津"，"上海"，"武漢"，"重慶"，"西寧")
For i=_【7】_To UBound(citv)
Combo 1.Addltem_【8】_
Next
End Sub
(7)窗體上有一個(gè)名稱(chēng)為T(mén)ext 1的文本框和一個(gè)名稱(chēng)為Command l、標(biāo)題為“計(jì)算”的命令按鈕，如圖所示。函數(shù)fun及命令按鈕的單擊事件過(guò)程如下，請(qǐng)?zhí)羁铡?/p>
Private Sub Command 1 _Click()
Dim x As Integer
x=Val(InputBOX("輸入數(shù)據(jù)"))
Text 1=Str(fun(x)+fun(x)+fun(x))
End Sub
Private Function fun(ByRef n As Integer)
If n Mod 3=0 Then
n=n+n
Else
n=n*n
End If
_【9】_=n
End Function
當(dāng)單擊命令按鈕，在輸入對(duì)話框中輸入2時(shí)，文本框中顯示的是_【10】_
(8)窗體上有一個(gè)名稱(chēng)為L(zhǎng)ist1的列表框，一個(gè)名稱(chēng)為Picture 1的圖片框。Form_ Load事件過(guò)程的作用是，把Datal.txt文件中的物品名稱(chēng)添加到列表框中。運(yùn)行程序，當(dāng)雙擊列表框中的物品名稱(chēng)時(shí)，可以把該物品對(duì)應(yīng)的圖片顯示在圖片框中如圖所示。以下是類(lèi)型定義及程序，請(qǐng)?zhí)羁铡?/p>
Private Type Pic
gName As String*10 ‘物品名稱(chēng)
picFile As String*20 ‘物品圖片的圖片文件名
End Type
Dim p(4)As Pic，pRec As Pic
Private Sub Form Load()
Open”Datal.txt" For Random As#1 _【11】_=Len(pRec)
For i=0 To 4
Get#1，i+l，P(i)
LIStI.AddItem p(i).gNaine
Next i
Close#1
End Sub
Private Sub List I-DbICIickO
For i=OTo4
If RTrim(List一List(i))=RTrim(_【12】_)Then
Picture l.，Picture=LoadPicture(p(i)._【13】_)
Exit For
End If
Next
End Sub
(9)窗體上有一個(gè)名稱(chēng)為CD1的通用對(duì)話框。通過(guò)菜單編輯器建立如圖1所示的菜單。程序運(yùn)行時(shí)，如果單擊“打開(kāi)”菜單項(xiàng)，則執(zhí)行打開(kāi)文件的操作，當(dāng)選定了文件(例如： G:\VB\2010-9\in.txt)并打開(kāi)后，該文件的文件名會(huì)被添加到菜單中，如圖2所示。各菜單項(xiàng)的名稱(chēng)和標(biāo)題等定義如下表。
以一下是單擊“打開(kāi)”菜單項(xiàng)的事件過(guò)程，請(qǐng)?zhí)羁铡?/p>
Dim mnuCounter As Integer
Private Sub tnnuOpen_ Click()
CDI.Show0pen
If CD I .FileName<>""Then
Open_【14】_For Input As#1
mnuCounter=mnuCounter+1
Load FName(mnuCounter)
FName(mnuCounter).Caption=CD I.FileName
FName(mnuCounter)._【15】_=True
Close#1
End If
End Sub
【下半年全國(guó)計(jì)算機(jī)二級(jí)VB考試真題】相關(guān)文章：
下半年全國(guó)計(jì)算機(jī)二級(jí)VB考試真題09-26
全國(guó)計(jì)算機(jī)二級(jí)VB考試真題12-05
下半年計(jì)算機(jī)二級(jí)VB考試真題12-05
3月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB筆試真題12-05
2013年3月全國(guó)計(jì)算機(jī)二級(jí)考試VB真題07-08
2016計(jì)算機(jī)二級(jí)考試《VB》真題練習(xí)08-11
2012年3月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB考試真題11-10