點(diǎn)擊查看>>全國(guó)計(jì)算機(jī)等級(jí)考試題庫(kù)大全
一、選擇題
(1) 棧和隊(duì)列的共同特點(diǎn)是
A) 都是先進(jìn)先出
B) 都是先進(jìn)后出
C) 只允許在端點(diǎn)處插入和刪除元素
D) 沒(méi)有共同點(diǎn)
答案： C
(2) 已知二叉樹(shù)后序遍歷序列是dabec，中序遍歷序列是debac，它的前序遍歷序列是
A) acbed
B) decab
C) deabc
D) cedba
答案：D
(3) 鏈表不具有的特點(diǎn)是
A) 不必事先估計(jì)存儲(chǔ)空間
B) 可隨機(jī)訪問(wèn)任一元素
C) 插入刪除不需要移動(dòng)元素
D) 所需空間與線性表長(zhǎng)度成正比
答案：B
(4) 結(jié)構(gòu)化程序設(shè)計(jì)的3種結(jié)構(gòu)是
A) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、轉(zhuǎn)移結(jié)構(gòu)
B) 分支結(jié)構(gòu)、等價(jià)結(jié)構(gòu)、循環(huán)結(jié)構(gòu)
C) 多分支結(jié)構(gòu)、賦值結(jié)構(gòu)、等價(jià)結(jié)構(gòu)
D) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)
答案：D
(5) 為了提高測(cè)試的效率，應(yīng)該
A) 隨機(jī)選取測(cè)試數(shù)據(jù)
B) 取一切可能的輸入數(shù)據(jù)作為測(cè)試數(shù)據(jù)
C) 在完成編碼以后制定軟件的測(cè)試計(jì)劃
D) 集中對(duì)付那些錯(cuò)誤群集的程序
答案：D
(6) 算法的時(shí)間復(fù)雜度是指
A) 執(zhí)行算法程序所需要的時(shí)間
B) 算法程序的長(zhǎng)度
C) 算法執(zhí)行過(guò)程中所需要的基本運(yùn)算次數(shù)
D) 算法程序中的指令條數(shù)
答案：C
(7) 軟件生命周期中所花費(fèi)用最多的階段是
A) 詳細(xì)設(shè)計(jì)
B) 軟件編碼
C) 軟件測(cè)試
D) 軟件維護(hù)
答案：D
(8) 數(shù)據(jù)庫(kù)管理系統(tǒng)DBMS中用來(lái)定義模式、內(nèi)模式和外模式的語(yǔ)言為
A) C
B) Basic
C) DDL
D) DML
答案：C
(9) 下列有關(guān)數(shù)據(jù)庫(kù)的描述，正確的是
A) 數(shù)據(jù)庫(kù)是一個(gè)DBF文件
B) 數(shù)據(jù)庫(kù)是一個(gè)關(guān)系
C) 數(shù)據(jù)庫(kù)是一個(gè)結(jié)構(gòu)化的數(shù)據(jù)集合
D) 數(shù)據(jù)庫(kù)是一組文件
答案：C
(10) 下列有關(guān)數(shù)據(jù)庫(kù)的描述，正確的是
A) 數(shù)據(jù)處理是將信息轉(zhuǎn)化為數(shù)據(jù)的過(guò)程
B) 數(shù)據(jù)的物理獨(dú)立性是指當(dāng)數(shù)據(jù)的邏輯結(jié)構(gòu)改變時(shí)，數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)不變
C) 關(guān)系中的每一列稱為元組，一個(gè)元組就是一個(gè)字段
D) 如果一個(gè)關(guān)系中的屬性或?qū)傩越M并非該關(guān)系的關(guān)鍵字，但它是另一個(gè)關(guān)系的關(guān)鍵字，則稱其為本關(guān)系的外關(guān)鍵字
答案：D
(11) 關(guān)于Visual Basic"方法"的概念錯(cuò)誤的是
A) 方法是對(duì)象的一部分
B) 方法是預(yù)先定義好的操作
C) 方法是對(duì)事件的響應(yīng)
D) 方法用于完成某些特定的功能
答案：C
(12) 下列說(shuō)法有錯(cuò)誤的是
A) 默認(rèn)情況下，屬性Visible的值為True
B) 如果設(shè)置控件的Visible屬性為False，則運(yùn)行時(shí)控件會(huì)隱藏
C) Visible的值可設(shè)為True或者False
D) 設(shè)置Visible屬性同設(shè)置Enabled屬性的功能是相同的，都是使控件處于失效狀態(tài)
答案：D
(13) 下列各控件不包含滾動(dòng)條的控件是
A) ListBox B) ComboBox C) TextBox D) LabelBox
答案：D
(14) 如果在程序中要將c定義為靜態(tài)變量，且為整型數(shù)，則應(yīng)使用的語(yǔ)句是
A) Redim a As Integer
B) Static a As Integer
C) Public a As Integer
D) Dim a As Integer
答案：B
(15) 聲明一個(gè)變量為局部變量應(yīng)該用
A) Global
B) Private
C) Static
D) Public
答案：C
(16) 執(zhí)行x$=InputBox("請(qǐng)輸入x的值") 時(shí)，在彈出的對(duì)話框中輸入123，在列表框List1選中第1個(gè)列表項(xiàng)(數(shù)據(jù)為456) ，使其值為123456的語(yǔ)句是
A) y=x$+List1.List(0)
B) y=x$+List1.List(1)
C) y=Val(x$) +Val(List1.List(0) )
D) y=Val(x$) & Val(List1.List(1) )
答案：A
(17) 以下各項(xiàng)中，Visual Basic不能接收的圖形文件是
A) .ico文件
B) .jpg文件
C) .psd文件
D) .bmp文件
答案：C
(18) 下面的屬性中，用于自動(dòng)調(diào)整圖像框中圖形內(nèi)容的大小的是
A) Picture
B) CurentY
C) CurrentX
D) Stretch
答案：D
(19) 下面有關(guān)注釋語(yǔ)句的格式，錯(cuò)誤的是
A) Rem注釋內(nèi)容
B) ′注釋內(nèi)容
C) a=3:b=2 ′對(duì)a、b賦值
D) Private Sub Command1_MouseDown(button As Integer , shift As Integer , _
Rem 鼠標(biāo)按下事件的命令調(diào)用過(guò)程 X As Single ,Y As Single)
答案：D
(20) 只有將組合框的Style屬性設(shè)置為何值時(shí)，才能觸發(fā)DblClick事件？
A) 0
B) 1
C) 2
D) 3
答案：B
(21) 以下屬于Visual Basic合法的數(shù)組元素是
A) x8
B) x［8］
C) s(0)
D) v［8］
正確答案：C
(22) 編寫(xiě)如下兩個(gè)事件過(guò)程：
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情況下(即不按住Shift鍵和鎖定大寫(xiě)鍵時(shí)) 運(yùn)行程序，如果按"A"鍵，則程序輸出的結(jié)果是
A) A
a
B) a
A
C) A
A
D) a
a
正確答案：C
(23) 要使菜單項(xiàng)MenuOne在程序運(yùn)行時(shí)失效，使用的語(yǔ)句是
A) MenuOne.Visible=True
B) MenuOne.Visible=False
C) MenuOne.Enabled=True
D) MenuOne.Enabled=False
答案：D
(24) 在窗體上建立通用對(duì)話框需要添加的控件是
A) Data控件
B) From控件
C) CommonDialog控件
D) VBComboBox控件
答案：C
(25) 在Visual Basic中，要將一個(gè)窗體加載到內(nèi)存進(jìn)行預(yù)處理但不顯示，應(yīng)使用的語(yǔ)句是
A) Load
B) Show
C) Hide
D) Unload
答案：A
(26) 運(yùn)行下列程序段后，顯示的結(jié)果為
J1=4
J2=9
If J1A) 4
B)9
C) 13
D) 49
答案：B
(27) 下列語(yǔ)句正確的是
A) If A≠B Then Print "A不等于B"
B) If A<>B Then Printf "A不等于B"
C) If A<>B Then Print "A不等于B"
D) If A≠B Print "A不等于B"
答案：C
(28) 下面語(yǔ)句正確的是
A) If x<3y And x>y Then y=x^3
B) If x<3y And x>y Then y=3x
C) If x<3y:x>y Then y=x^3
D) If x<3y And x>y Then y=x* *3
答案：A
(29) 計(jì)算z的值，當(dāng)x大于y時(shí)，z=x；否則z=y。下列語(yǔ)句錯(cuò)誤的是
A) If x>=y Then z=x : z=y
B) If x>=y Then z=x Else z=y
C) z=y : If x>=y Then z=x
D) If x<=y Then z=y Else z=x
答案：A
(30) 下列程序段執(zhí)行結(jié)果為
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A) -3 3
B) 5 -9
C) 3 -3
D) -6 5
答案：A
(31) 不能脫離控件(包括客體) 而獨(dú)立存在的過(guò)程是
A) 事件過(guò)程
B) 通用過(guò)程
C) Sub過(guò)程
D) 函數(shù)過(guò)程
答案：A
(32) Sub過(guò)程與Function過(guò)程最根本的區(qū)別是
A) Sub過(guò)程可以用Call語(yǔ)句直接使用過(guò)程名調(diào)用，而Function過(guò)程不可以
B) Function過(guò)程可以有形參，Sub過(guò)程不可以
C) Sub過(guò)程不能返回值，而Function過(guò)程能返回值
D) 兩種過(guò)程參數(shù)的傳遞方式不同
答案： C
(33) 單擊命令按鈕時(shí)，下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=12:y=32
Call Proc(x,y)
Print x; y
End Sub
Public Sub Proc(n As Integer, ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A) 1232
B) 232
C) 23
D) 123
答案：B
(34) 單擊命令按鈕時(shí)，下列程序的執(zhí)行結(jié)果是
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a=3
b=4
c=5
Print SecProc(c, b, a)
End Sub
Function FirProc(x As Integer, y As Integer, z As Integer)
FirProc=2x+y+3z
End Function
Function SecProc(x As Integer, y As Integer, z As Integer)
SecProc=FirProc(z, x, y) +x
End Function
A) 20
B) 22
C) 28
D) 30
答案：C
(35) 下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim FirStr As String
FirSt="abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat(xStr As String) As String
Dim tempStr As String, strLen As Integer
tempStr=""
strLen=Len(xStr)
i=1
Do While i<=Len(xStr) -3
tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1)
i=i+1
Loop
Pat=tempStr
End Function
A) abcdef
B) afbecd
C) fedcba
D) defabc
正確答案：B
二、填空題（無(wú)答題記錄?。?BR> (1) 算法的基本特征是可行性、確定性、 【1】 和擁有足夠的情報(bào)。
正確答案：有窮性
(2) 在長(zhǎng)度為n的有序線性表中進(jìn)行二分查找。最壞的情況下，需要的比較次數(shù)為 【2】 。
正確答案：log2n
(3) 在面向?qū)ο蟮某绦蛟O(shè)計(jì)中，類描述的是具有相似性質(zhì)的一組 【3】 。
正確答案：對(duì)象
(4) 通常，將軟件產(chǎn)品從提出、實(shí)現(xiàn)、使用維護(hù)到停止使用退役的過(guò)程稱為 【4】 。
正確答案：軟件生命周期
(5) 數(shù)據(jù)庫(kù)管理系統(tǒng)常見(jiàn)的數(shù)據(jù)模型有層次模型、網(wǎng)狀模型和 【5】 3種。
正確答案：關(guān)系模型
(6) Visual Basic對(duì)象可以分為兩類，分別為 【6】 和 【7】 。
正確答案：預(yù)定義對(duì)象
正確答案：用戶定義對(duì)象
(7) 完成下面的程序，使顯示結(jié)果如下圖所示。
Private Sub Form_Click()
FontSize=18
Sample＄=" 【8】 "
x=(ScaleWidth-TextWidth(Sample＄) ) /2
y=(ScaleHeight-TextHeight(Sample＄) ) /2
CurrentX=x
CurrentY=y
【9】 Sample＄
End Sub
正確答案：Welcome to Beijing !
正確答案：Print
(8) 下列程序的功能是：當(dāng)x<50時(shí)，y=0.8×x；當(dāng)50≤x≤100時(shí)，y=0.7×x；當(dāng)x>100時(shí)，沒(méi)有意義。請(qǐng)?zhí)羁铡?BR> Private Sub Command1_Click()
Dim x As Single
x=InputBox("請(qǐng)輸入x的值！")
【10】
Case Is < 50
y=0.8 * x
Case 50 To 100
y=0.7 * x
【11】
Print "輸入的數(shù)據(jù)出界！"
End Select
Print x, y
End Sub
正確答案：Select Case x
正確答案：Case Else
(9) 改變驅(qū)動(dòng)器列表框的Drive屬性值將引發(fā) 【12】 事件。
正確答案：Change
(10) 下面程序是由鼠標(biāo)事件在窗體上畫(huà)圖，如果按下鼠標(biāo)將可以畫(huà)圖，雙擊窗體可以清除所畫(huà)圖形。補(bǔ)充完整下面的程序。
首先在窗體層定義如下變量：
Dim PaintStart As Boolean
編寫(xiě)如下事件過(guò)程：
Private Sub Form_Load()
DrawWidth=2
ForeColor=vbGreen
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
【13】
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If PaintStart Then
PSet (X, Y)
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
【14】
End Sub
Private Sub Form_DblClick()
【15】
End Sub
一、選擇題
(1) 棧和隊(duì)列的共同特點(diǎn)是
A) 都是先進(jìn)先出
B) 都是先進(jìn)后出
C) 只允許在端點(diǎn)處插入和刪除元素
D) 沒(méi)有共同點(diǎn)
答案： C
(2) 已知二叉樹(shù)后序遍歷序列是dabec，中序遍歷序列是debac，它的前序遍歷序列是
A) acbed
B) decab
C) deabc
D) cedba
答案：D
(3) 鏈表不具有的特點(diǎn)是
A) 不必事先估計(jì)存儲(chǔ)空間
B) 可隨機(jī)訪問(wèn)任一元素
C) 插入刪除不需要移動(dòng)元素
D) 所需空間與線性表長(zhǎng)度成正比
答案：B
(4) 結(jié)構(gòu)化程序設(shè)計(jì)的3種結(jié)構(gòu)是
A) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、轉(zhuǎn)移結(jié)構(gòu)
B) 分支結(jié)構(gòu)、等價(jià)結(jié)構(gòu)、循環(huán)結(jié)構(gòu)
C) 多分支結(jié)構(gòu)、賦值結(jié)構(gòu)、等價(jià)結(jié)構(gòu)
D) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)
答案：D
(5) 為了提高測(cè)試的效率，應(yīng)該
A) 隨機(jī)選取測(cè)試數(shù)據(jù)
B) 取一切可能的輸入數(shù)據(jù)作為測(cè)試數(shù)據(jù)
C) 在完成編碼以后制定軟件的測(cè)試計(jì)劃
D) 集中對(duì)付那些錯(cuò)誤群集的程序
答案：D
(6) 算法的時(shí)間復(fù)雜度是指
A) 執(zhí)行算法程序所需要的時(shí)間
B) 算法程序的長(zhǎng)度
C) 算法執(zhí)行過(guò)程中所需要的基本運(yùn)算次數(shù)
D) 算法程序中的指令條數(shù)
答案：C
(7) 軟件生命周期中所花費(fèi)用最多的階段是
A) 詳細(xì)設(shè)計(jì)
B) 軟件編碼
C) 軟件測(cè)試
D) 軟件維護(hù)
答案：D
(8) 數(shù)據(jù)庫(kù)管理系統(tǒng)DBMS中用來(lái)定義模式、內(nèi)模式和外模式的語(yǔ)言為
A) C
B) Basic
C) DDL
D) DML
答案：C
(9) 下列有關(guān)數(shù)據(jù)庫(kù)的描述，正確的是
A) 數(shù)據(jù)庫(kù)是一個(gè)DBF文件
B) 數(shù)據(jù)庫(kù)是一個(gè)關(guān)系
C) 數(shù)據(jù)庫(kù)是一個(gè)結(jié)構(gòu)化的數(shù)據(jù)集合
D) 數(shù)據(jù)庫(kù)是一組文件
答案：C
(10) 下列有關(guān)數(shù)據(jù)庫(kù)的描述，正確的是
A) 數(shù)據(jù)處理是將信息轉(zhuǎn)化為數(shù)據(jù)的過(guò)程
B) 數(shù)據(jù)的物理獨(dú)立性是指當(dāng)數(shù)據(jù)的邏輯結(jié)構(gòu)改變時(shí)，數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)不變
C) 關(guān)系中的每一列稱為元組，一個(gè)元組就是一個(gè)字段
D) 如果一個(gè)關(guān)系中的屬性或?qū)傩越M并非該關(guān)系的關(guān)鍵字，但它是另一個(gè)關(guān)系的關(guān)鍵字，則稱其為本關(guān)系的外關(guān)鍵字
答案：D
(11) 關(guān)于Visual Basic"方法"的概念錯(cuò)誤的是
A) 方法是對(duì)象的一部分
B) 方法是預(yù)先定義好的操作
C) 方法是對(duì)事件的響應(yīng)
D) 方法用于完成某些特定的功能
答案：C
(12) 下列說(shuō)法有錯(cuò)誤的是
A) 默認(rèn)情況下，屬性Visible的值為True
B) 如果設(shè)置控件的Visible屬性為False，則運(yùn)行時(shí)控件會(huì)隱藏
C) Visible的值可設(shè)為True或者False
D) 設(shè)置Visible屬性同設(shè)置Enabled屬性的功能是相同的，都是使控件處于失效狀態(tài)
答案：D
(13) 下列各控件不包含滾動(dòng)條的控件是
A) ListBox B) ComboBox C) TextBox D) LabelBox
答案：D
(14) 如果在程序中要將c定義為靜態(tài)變量，且為整型數(shù)，則應(yīng)使用的語(yǔ)句是
A) Redim a As Integer
B) Static a As Integer
C) Public a As Integer
D) Dim a As Integer
答案：B
(15) 聲明一個(gè)變量為局部變量應(yīng)該用
A) Global
B) Private
C) Static
D) Public
答案：C
(16) 執(zhí)行x$=InputBox("請(qǐng)輸入x的值") 時(shí)，在彈出的對(duì)話框中輸入123，在列表框List1選中第1個(gè)列表項(xiàng)(數(shù)據(jù)為456) ，使其值為123456的語(yǔ)句是
A) y=x$+List1.List(0)
B) y=x$+List1.List(1)
C) y=Val(x$) +Val(List1.List(0) )
D) y=Val(x$) & Val(List1.List(1) )
答案：A
(17) 以下各項(xiàng)中，Visual Basic不能接收的圖形文件是
A) .ico文件
B) .jpg文件
C) .psd文件
D) .bmp文件
答案：C
(18) 下面的屬性中，用于自動(dòng)調(diào)整圖像框中圖形內(nèi)容的大小的是
A) Picture
B) CurentY
C) CurrentX
D) Stretch
答案：D
(19) 下面有關(guān)注釋語(yǔ)句的格式，錯(cuò)誤的是
A) Rem注釋內(nèi)容
B) ′注釋內(nèi)容
C) a=3:b=2 ′對(duì)a、b賦值
D) Private Sub Command1_MouseDown(button As Integer , shift As Integer , _
Rem 鼠標(biāo)按下事件的命令調(diào)用過(guò)程 X As Single ,Y As Single)
答案：D
(20) 只有將組合框的Style屬性設(shè)置為何值時(shí)，才能觸發(fā)DblClick事件？
A) 0
B) 1
C) 2
D) 3
答案：B
(21) 以下屬于Visual Basic合法的數(shù)組元素是
A) x8
B) x［8］
C) s(0)
D) v［8］
正確答案：C
(22) 編寫(xiě)如下兩個(gè)事件過(guò)程：
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情況下(即不按住Shift鍵和鎖定大寫(xiě)鍵時(shí)) 運(yùn)行程序，如果按"A"鍵，則程序輸出的結(jié)果是
A) A
a
B) a
A
C) A
A
D) a
a
正確答案：C
(23) 要使菜單項(xiàng)MenuOne在程序運(yùn)行時(shí)失效，使用的語(yǔ)句是
A) MenuOne.Visible=True
B) MenuOne.Visible=False
C) MenuOne.Enabled=True
D) MenuOne.Enabled=False
答案：D
(24) 在窗體上建立通用對(duì)話框需要添加的控件是
A) Data控件
B) From控件
C) CommonDialog控件
D) VBComboBox控件
答案：C
(25) 在Visual Basic中，要將一個(gè)窗體加載到內(nèi)存進(jìn)行預(yù)處理但不顯示，應(yīng)使用的語(yǔ)句是
A) Load
B) Show
C) Hide
D) Unload
答案：A
(26) 運(yùn)行下列程序段后，顯示的結(jié)果為
J1=4
J2=9
If J1A) 4
B)9
C) 13
D) 49
答案：B
(27) 下列語(yǔ)句正確的是
A) If A≠B Then Print "A不等于B"
B) If A<>B Then Printf "A不等于B"
C) If A<>B Then Print "A不等于B"
D) If A≠B Print "A不等于B"
答案：C
(28) 下面語(yǔ)句正確的是
A) If x<3y And x>y Then y=x^3
B) If x<3y And x>y Then y=3x
C) If x<3y:x>y Then y=x^3
D) If x<3y And x>y Then y=x* *3
答案：A
(29) 計(jì)算z的值，當(dāng)x大于y時(shí)，z=x；否則z=y。下列語(yǔ)句錯(cuò)誤的是
A) If x>=y Then z=x : z=y
B) If x>=y Then z=x Else z=y
C) z=y : If x>=y Then z=x
D) If x<=y Then z=y Else z=x
答案：A
(30) 下列程序段執(zhí)行結(jié)果為
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A) -3 3
B) 5 -9
C) 3 -3
D) -6 5
答案：A
(31) 不能脫離控件(包括客體) 而獨(dú)立存在的過(guò)程是
A) 事件過(guò)程
B) 通用過(guò)程
C) Sub過(guò)程
D) 函數(shù)過(guò)程
答案：A
(32) Sub過(guò)程與Function過(guò)程最根本的區(qū)別是
A) Sub過(guò)程可以用Call語(yǔ)句直接使用過(guò)程名調(diào)用，而Function過(guò)程不可以
B) Function過(guò)程可以有形參，Sub過(guò)程不可以
C) Sub過(guò)程不能返回值，而Function過(guò)程能返回值
D) 兩種過(guò)程參數(shù)的傳遞方式不同
答案： C
(33) 單擊命令按鈕時(shí)，下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=12:y=32
Call Proc(x,y)
Print x; y
End Sub
Public Sub Proc(n As Integer, ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A) 1232
B) 232
C) 23
D) 123
答案：B
(34) 單擊命令按鈕時(shí)，下列程序的執(zhí)行結(jié)果是
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a=3
b=4
c=5
Print SecProc(c, b, a)
End Sub
Function FirProc(x As Integer, y As Integer, z As Integer)
FirProc=2x+y+3z
End Function
Function SecProc(x As Integer, y As Integer, z As Integer)
SecProc=FirProc(z, x, y) +x
End Function
A) 20
B) 22
C) 28
D) 30
答案：C
(35) 下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim FirStr As String
FirSt="abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat(xStr As String) As String
Dim tempStr As String, strLen As Integer
tempStr=""
strLen=Len(xStr)
i=1
Do While i<=Len(xStr) -3
tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1)
i=i+1
Loop
Pat=tempStr
End Function
A) abcdef
B) afbecd
C) fedcba
D) defabc
正確答案：B
二、填空題（無(wú)答題記錄?。?BR> (1) 算法的基本特征是可行性、確定性、 【1】 和擁有足夠的情報(bào)。
正確答案：有窮性
(2) 在長(zhǎng)度為n的有序線性表中進(jìn)行二分查找。最壞的情況下，需要的比較次數(shù)為 【2】 。
正確答案：log2n
(3) 在面向?qū)ο蟮某绦蛟O(shè)計(jì)中，類描述的是具有相似性質(zhì)的一組 【3】 。
正確答案：對(duì)象
(4) 通常，將軟件產(chǎn)品從提出、實(shí)現(xiàn)、使用維護(hù)到停止使用退役的過(guò)程稱為 【4】 。
正確答案：軟件生命周期
(5) 數(shù)據(jù)庫(kù)管理系統(tǒng)常見(jiàn)的數(shù)據(jù)模型有層次模型、網(wǎng)狀模型和 【5】 3種。
正確答案：關(guān)系模型
(6) Visual Basic對(duì)象可以分為兩類，分別為 【6】 和 【7】 。
正確答案：預(yù)定義對(duì)象
正確答案：用戶定義對(duì)象
(7) 完成下面的程序，使顯示結(jié)果如下圖所示。
Private Sub Form_Click()
FontSize=18
Sample＄=" 【8】 "
x=(ScaleWidth-TextWidth(Sample＄) ) /2
y=(ScaleHeight-TextHeight(Sample＄) ) /2
CurrentX=x
CurrentY=y
【9】 Sample＄
End Sub
正確答案：Welcome to Beijing !
正確答案：Print
(8) 下列程序的功能是：當(dāng)x<50時(shí)，y=0.8×x；當(dāng)50≤x≤100時(shí)，y=0.7×x；當(dāng)x>100時(shí)，沒(méi)有意義。請(qǐng)?zhí)羁铡?BR> Private Sub Command1_Click()
Dim x As Single
x=InputBox("請(qǐng)輸入x的值！")
【10】
Case Is < 50
y=0.8 * x
Case 50 To 100
y=0.7 * x
【11】
Print "輸入的數(shù)據(jù)出界！"
End Select
Print x, y
End Sub
正確答案：Select Case x
正確答案：Case Else
(9) 改變驅(qū)動(dòng)器列表框的Drive屬性值將引發(fā) 【12】 事件。
正確答案：Change
(10) 下面程序是由鼠標(biāo)事件在窗體上畫(huà)圖，如果按下鼠標(biāo)將可以畫(huà)圖，雙擊窗體可以清除所畫(huà)圖形。補(bǔ)充完整下面的程序。
首先在窗體層定義如下變量：
Dim PaintStart As Boolean
編寫(xiě)如下事件過(guò)程：
Private Sub Form_Load()
DrawWidth=2
ForeColor=vbGreen
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
【13】
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If PaintStart Then
PSet (X, Y)
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
【14】
End Sub
Private Sub Form_DblClick()
【15】
End Sub