1.以下關(guān)于數(shù)據(jù)的邏輯結(jié)構(gòu)的敘述中，哪一條是不正確的？
A、數(shù)據(jù)的邏輯結(jié)構(gòu)是數(shù)據(jù)間關(guān)系的描述
B、數(shù)據(jù)的邏輯結(jié)構(gòu)抽象地反映數(shù)據(jù)元素間的邏輯關(guān)系
C、數(shù)據(jù)邏輯結(jié)構(gòu)具體的反映數(shù)據(jù)在計算機中的存儲方式
D、數(shù)據(jù)的邏輯結(jié)構(gòu)分為線性結(jié)構(gòu)和非線性結(jié)構(gòu)
A B C D
2.以下哪一個不是隊列的基本運算？
A、從隊尾插入一個新元素
B、從隊列中刪除第I個元素
C、判斷一個隊列是否為空
D、讀取隊頭元素的值
A B C D
3.二叉樹的先序遍歷和中序遍歷如下：
先序遍歷：ABDFHCEGI
中序遍歷：BFHDAEIGC
該二叉樹根的右子樹的根是____。
A、N
B、F
C、E
D、C
A B C D
4.已知一個有序表（13，20，25，37，48，58，61，78，83，90，101），當二分查找值48的元素時，____次比較后查找成功。
A、1
B、2
C、3
D、4
A B C D
5.面向?qū)ο蟮母拍罘椒ㄊ莀___。
A、用來請求對象執(zhí)行某些操作。
B、描述對象動態(tài)特征的一個操作序列。
C、描述對象靜態(tài)特性的一個數(shù)據(jù)項。
D、描述對象動態(tài)或者靜態(tài)特征的某個項目。
A B C D
6.Object-orientde翻譯成哪一個術(shù)語更為確切？
A、面向?qū)ο?BR> B、面向客體
C、面向目標
D、物件導向
A B C D
7.概要設(shè)計的結(jié)果是提供一份
A、模塊說明書
B、框圖
C、程序
D、數(shù)據(jù)結(jié)構(gòu)
A B C D
8.數(shù)據(jù)庫管理系統(tǒng)的工作不包括____。
A、管理操作系統(tǒng)
B、保護數(shù)據(jù)庫
C、應(yīng)用數(shù)據(jù)庫
D、修改數(shù)據(jù)庫
A B C D
9.在關(guān)系數(shù)據(jù)庫中，用來表示實體之間聯(lián)系的是
A、樹結(jié)構(gòu)
B、網(wǎng)狀結(jié)構(gòu)
C、線性表
D、二維表
A B C D
10.在關(guān)系代數(shù)中，從兩個關(guān)系的笛卡爾積中，選取他們屬性間滿足一定條件的元組的操作，稱為
A、投影
B、選擇
C、自然連接
D、θ連接
A B C D
11.以下能正確定義數(shù)據(jù)類型TelBook的代碼是
A、Type TelBook
Name As String*10
TelNum As Integer
End Type
B、Type TelBook
Name As String*10
TelNum As Integer
End TelBook
C、Type TelBook
Name String*10
TelNum Integer
End Type TelBook
D、Type TelBook
Name String*10
TelNum Integer
End Type
A B C D
12.設(shè)窗體上有一個列表框控件List1，且其中有若干列表項，則以下能表示當前被選中的列表項內(nèi)容的是
A、List1.list
B、List1.listIndex
C、List1.Intdex
D、List1.Text
A B C D
13.設(shè)a=10,b=5,c=1,執(zhí)行語句Print a>b>c后，窗體上顯示的是
A、True
B、False
C、1
D、出錯信息
A B C D
14.以下能判斷是否到達文件尾的函數(shù)是
A、BOF
B、LOG
C、LOF
D、EOF
A B C D
15.窗體的MouseDown事件過程
Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
有4個參數(shù)，關(guān)于這此參數(shù)，正確的描述是
A、通過Button參數(shù)判定當前按下的是哪一個鼠標鍵
B、Shift參數(shù)只能用來確定是否按下Shift
C、Shift參數(shù)只能用來確定是否按下Alt和Ctrl鍵
D、參數(shù)x,y用來設(shè)置鼠標當前位置的坐標
A B C D
16.以下關(guān)于焦點的敘述中，錯誤的是
A、如果文本框的TabStop屬性為False，則不能接收從鍵盤上輸入的數(shù)據(jù)
B、當文本框失去焦點時，觸發(fā)LostFocus事件
C、當文本框的Enabled屬性為False時，其Tab順序不起作用
D、可以用TabIndex屬性改變Tab順序
A B C D
17.執(zhí)行語句Open"Tel.dat"For Random As #1 Len=50后，對文件Tel.dat中的數(shù)據(jù)能夠執(zhí)行的操作是
A、只能寫，不能讀
B、只能讀，不能寫
C、既可以讀，也可以寫
D、不能讀，有能寫
A B C D
18.設(shè)有以下循環(huán)結(jié)構(gòu)
Do
循環(huán)體
Loop While<條件>
則以下敘述中錯誤的是
A、若“條件”是一個為0的常數(shù)，則一次也不執(zhí)行循環(huán)體
B、“條件”可以是關(guān)系表達式、邏輯表達式或常數(shù)
C、循環(huán)體中可以使用Exit Do 語句
D、如果“條件”總是為True，則不停地執(zhí)行循環(huán)體
A B C D
19.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
Dim a As Integer,s As Integer
a=8
s=1
Do
s=s+a
a=a-1
Loop While a<=0
Print s;a
End Sub
程序運行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是
A、7 9
B、34 0
C、9 7
D、死循環(huán)
A B C D
20.設(shè)有如下通用過程：
Public Sub Fun(a(),ByVal x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下的事件過程：
Private Sub Command1_Click()
Dim arr(5) As Variant
For i=1 To 5
arr(i)=i
Next
n=10
Call Fun(arr(),n)
Text1.Text=n
End Sub
程序運行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是
A、10
B、15
C、25
D、24
A B C D
21.在窗體上畫兩個滾動條，名稱分別為Hscroll1、hscroll2；六個標簽，名稱分別為
Label1、Label2、Label3、Label4、Label5、Label6，其中標簽Label4~Label6分別顯示
“A”“B”“A＊B”等文字信息，標簽Label1、Label2分別顯示其右側(cè)的滾動條的數(shù)值，
Label3顯示“A＊B”的計算結(jié)果。當移動滾動框時，在相應(yīng)的標簽中顯示滾動條的值。當
單擊命令按鈕“計算”時，對標簽Label1、Label2中顯示的兩個值求積，并將結(jié)果顯示
在Label3中。以下不能實現(xiàn)上述功能的事件過程是：
A)、Private Sub Command1_Click()
Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption))
End Sub
B)、Private Sub Command1_Click()
Label3.Caption=HScroll1.Value*HScroll2.Value
End Sub
C)、Private Sub Command1_Click()
Label3.Caption=HScroll1*HScroll2
End Sub
D)、Private Sub Command1_Click()
Label3.Caption=HScroll1.Text*HScroll2.Text
End Sub
A B C D
22.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
For n=1 To 20
If n Mod 3<>0 then m=m+n\3
Next n
print n
End sub
程序運行后，如果單擊命令按鈕，則窗體上顯示的內(nèi)容是
A、15
B、18
C、21
D、24
A B C D
23.在窗體上畫一個名稱為Text1的文本框，并編寫如下程序：
Private Sub Form_Lord()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print"程序設(shè)計"
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)
Print"Visual Basic"
End Sub
程序運行后，結(jié)果按“A”鍵，然后單擊窗體，則在窗體上顯示的內(nèi)容是
A、Visual Basic
B、程序設(shè)計
C、A程序設(shè)計
D、Visual Basic
程序設(shè)計
A B C D
24.設(shè)有如下程序：
Private Sub Command1_Click()
Dim sum As Double,X As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next
End Sub
該程序通過For循環(huán)計算一個表達式的值，這個表達式是
A、1+1/2+2/3+3/4+4/5
B、1+1/2+2/3+3/4
C、1/2+2/3+3/4+4/5
D、1+1/2+1/3+1/4+1/5
A B C D
25.以下有關(guān)數(shù)組定義的語句序列中，錯誤的是
A、Static arr1(3)
arr(1)=100
arr(2)="Hello"
arr(3)=123.45
B、Dim arr2() As Integer
Dim size As Integer
Private Sub Command2_Click()
size=InputBox("輸入：")
ReDim arr2(size)
......
End Sub
C、Option Base 1
Private Sub Command3_Click()
Dim arr3() As Integer
......
End Sub
D、Dim n As Integer
Private Sub Command4_Click()
Dim arr4(n) As Integer
......
End Sub
A B C D 26.以下不能在“工程資源管理器”窗口中列出的文件類型是
A、.bas
B、.res
C、.frm
D、.ocx
A B C D
27.以下關(guān)于窗體的描述中，錯誤的是
A、執(zhí)行Unload Form1語句后，窗體Form1消失，但仍在內(nèi)存中
B、窗體的Load事件在加載窗體時發(fā)生
C、當窗體的Enabled屬生為False時通過鼠標和鍵盤對窗體的操作都被禁止
D、窗體的Height、Width屬于用于設(shè)置窗體的高和寬
A B C D
28.下列可作為Visual Basic變量名的是
A、A#A
B、4A
C、?xy
D、constA
A B C D
29.設(shè)有如下的記錄類型
Type Student
number As String
name As String
age As Integer
End Type
則正確引用該記錄類型變量的代碼是
A、Student.name ="張紅"
B、Dim s As Student
s.name ="張紅"
C、Dim s As Type Student
s.name ="張紅"
D、Dim s As Type
s.name ="張紅"
A B C D
30.函數(shù)String(n,"str")的功能是
A、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串
B、返回由n個字符組成的字符串
C、從字符串中取出n個字符
D、從字符串中第n個字符的位置開始取子字符串
A B C D
31.將數(shù)學表達式Cos2(a+b)+5e2寫成Visual Basic的表達式，其正確的形式是
A)Cos(a+b)^2+5*exp(2) B)Cos^2(a+b)+5*exp(2)
C)Cos(a+b)^2+5*ln(2) D)Cos^2(a+b)+5*ln(2)
A B C D
32.在窗體上畫一個命令按鈕，名稱為Command1。單擊命令按鈕時，執(zhí)行如下事件過程：
Private Sub Command1_Click()
a$ = "software and hardware"
b$ = Right(a$,8)
c$ = Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
則彈出的信息框的標題欄中顯示的信息是
A、software and hardware
B、software
C、hardware
D、1
A B C D
33.執(zhí)行如下語句：
a = InputBox("Today","Tomorrow","yesterday",,,"Day before yesterday",5)
將顯示一個輸入對話框，在對話框的輸入?yún)^(qū)中顯示的信息是
A、Today
B、Tomorrow
C、Yesterday
D、Day before yesterday
A B C D
34.表示滾動條控件取值范圍值的屬性是
A、Max
B、LargeChange
C、Value
D、Max-Min
A B C D
35.在窗體上畫一個名稱為List1的列表框，一個名稱為Label1的標簽。列表框中顯示若干城市的名稱。當單擊列表框中的某個城市名時，在標簽中顯示選中城市的名稱。下列能正確實現(xiàn)上述功能的程序是
A、Private Sub List1_Click()
Label1.Caption = List1.ListIndex
End Sub
B、Private Sub List1_Click()
Label1.name = List1.ListIndex
End Sub
C、Private Sub List1_Click()
Label1.name = List1.text
End Sub
D、Private Sub List1_Click()
Label1.Caption = List1.text
End Sub
A B C D
二、填空題（每空2分，共計30分）
1.數(shù)據(jù)結(jié)構(gòu)是一門研究非數(shù)值計算的程序設(shè)計問題中計算機的____以及它們之間的關(guān)系和運算等的學科。
輸入答案，中間不含空格:
2.排序方法中，從未排序序列中挑選元素，并將其依次放入已排序序列（初始時為空）的一端的方法，稱為____。
輸入答案，中間不含空格:
3.需求分析階段的最后成果是____，是軟件開發(fā)中的重要文檔之一。
輸入答案，中間不含空格:
4.每個實體有若干特性，每一個特性稱為____。
輸入答案，中間不含空格:
5.關(guān)系代數(shù)運算中，傳統(tǒng)的集合運算有____、并、交和差。
輸入答案，中間不含空格:
6.執(zhí)行下面的程序段后，i的值為______，s的值為______。
s=2
For i=3.2 To 4.9 Step 0.8
s=s+1
Next i
輸入答案，中間不含空格:
7.上一題
輸入答案，中間不含空格:
8.把窗體的KeyPreview屬性設(shè)置為True，然后編寫如下兩個事件過程：
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
程序運行后，如果直接按鍵盤上的“A”鍵（即不按住Shift鍵），則在窗體上輸出的字符分別是_____和_____。
輸入答案，中間不含空格:
9.上一題
輸入答案，中間不含空格:
10.在窗體上畫一個文本框、一個標簽和一個命令按鈕，其名稱分別為Text1、
Label1和Command1，然后編寫如下兩個事件過程：
Private Sub Command1_Click()
S$=InputBox("請輸入一個字符串")
Text1.text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text,7)
End Sub
程序運行后，單擊命令按鈕，將顯示一個輸入對話框，如果在該對話框中輸入字符串
“VisualBAsic”,則在標簽中顯示的內(nèi)容是_____。
輸入答案，中間不含空格: 12.上一題
輸入答案，中間不含空格:
13.上一題
輸入答案，中間不含空格:
14.以下程序的功能是：把當前目錄下的順序文件smtext1.txt的內(nèi)容讀入內(nèi)存，并
在文本框Text1中顯示出來。請?zhí)羁铡?BR> Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open".\smtext1.txt"_____As#1
Do While_____
Input #1,inData
Text1.Text=Text1.Text & inData
Loop
Close #1
End Sub
輸入答案，中間不含空格:
15.上一題
輸入答案，中間不含空格:
A、數(shù)據(jù)的邏輯結(jié)構(gòu)是數(shù)據(jù)間關(guān)系的描述
B、數(shù)據(jù)的邏輯結(jié)構(gòu)抽象地反映數(shù)據(jù)元素間的邏輯關(guān)系
C、數(shù)據(jù)邏輯結(jié)構(gòu)具體的反映數(shù)據(jù)在計算機中的存儲方式
D、數(shù)據(jù)的邏輯結(jié)構(gòu)分為線性結(jié)構(gòu)和非線性結(jié)構(gòu)
A B C D
2.以下哪一個不是隊列的基本運算？
A、從隊尾插入一個新元素
B、從隊列中刪除第I個元素
C、判斷一個隊列是否為空
D、讀取隊頭元素的值
A B C D
3.二叉樹的先序遍歷和中序遍歷如下：
先序遍歷：ABDFHCEGI
中序遍歷：BFHDAEIGC
該二叉樹根的右子樹的根是____。
A、N
B、F
C、E
D、C
A B C D
4.已知一個有序表（13，20，25，37，48，58，61，78，83，90，101），當二分查找值48的元素時，____次比較后查找成功。
A、1
B、2
C、3
D、4
A B C D
5.面向?qū)ο蟮母拍罘椒ㄊ莀___。
A、用來請求對象執(zhí)行某些操作。
B、描述對象動態(tài)特征的一個操作序列。
C、描述對象靜態(tài)特性的一個數(shù)據(jù)項。
D、描述對象動態(tài)或者靜態(tài)特征的某個項目。
A B C D
6.Object-orientde翻譯成哪一個術(shù)語更為確切？
A、面向?qū)ο?BR> B、面向客體
C、面向目標
D、物件導向
A B C D
7.概要設(shè)計的結(jié)果是提供一份
A、模塊說明書
B、框圖
C、程序
D、數(shù)據(jù)結(jié)構(gòu)
A B C D
8.數(shù)據(jù)庫管理系統(tǒng)的工作不包括____。
A、管理操作系統(tǒng)
B、保護數(shù)據(jù)庫
C、應(yīng)用數(shù)據(jù)庫
D、修改數(shù)據(jù)庫
A B C D
9.在關(guān)系數(shù)據(jù)庫中，用來表示實體之間聯(lián)系的是
A、樹結(jié)構(gòu)
B、網(wǎng)狀結(jié)構(gòu)
C、線性表
D、二維表
A B C D
10.在關(guān)系代數(shù)中，從兩個關(guān)系的笛卡爾積中，選取他們屬性間滿足一定條件的元組的操作，稱為
A、投影
B、選擇
C、自然連接
D、θ連接
A B C D
11.以下能正確定義數(shù)據(jù)類型TelBook的代碼是
A、Type TelBook
Name As String*10
TelNum As Integer
End Type
B、Type TelBook
Name As String*10
TelNum As Integer
End TelBook
C、Type TelBook
Name String*10
TelNum Integer
End Type TelBook
D、Type TelBook
Name String*10
TelNum Integer
End Type
A B C D
12.設(shè)窗體上有一個列表框控件List1，且其中有若干列表項，則以下能表示當前被選中的列表項內(nèi)容的是
A、List1.list
B、List1.listIndex
C、List1.Intdex
D、List1.Text
A B C D
13.設(shè)a=10,b=5,c=1,執(zhí)行語句Print a>b>c后，窗體上顯示的是
A、True
B、False
C、1
D、出錯信息
A B C D
14.以下能判斷是否到達文件尾的函數(shù)是
A、BOF
B、LOG
C、LOF
D、EOF
A B C D
15.窗體的MouseDown事件過程
Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
有4個參數(shù)，關(guān)于這此參數(shù)，正確的描述是
A、通過Button參數(shù)判定當前按下的是哪一個鼠標鍵
B、Shift參數(shù)只能用來確定是否按下Shift
C、Shift參數(shù)只能用來確定是否按下Alt和Ctrl鍵
D、參數(shù)x,y用來設(shè)置鼠標當前位置的坐標
A B C D
16.以下關(guān)于焦點的敘述中，錯誤的是
A、如果文本框的TabStop屬性為False，則不能接收從鍵盤上輸入的數(shù)據(jù)
B、當文本框失去焦點時，觸發(fā)LostFocus事件
C、當文本框的Enabled屬性為False時，其Tab順序不起作用
D、可以用TabIndex屬性改變Tab順序
A B C D
17.執(zhí)行語句Open"Tel.dat"For Random As #1 Len=50后，對文件Tel.dat中的數(shù)據(jù)能夠執(zhí)行的操作是
A、只能寫，不能讀
B、只能讀，不能寫
C、既可以讀，也可以寫
D、不能讀，有能寫
A B C D
18.設(shè)有以下循環(huán)結(jié)構(gòu)
Do
循環(huán)體
Loop While<條件>
則以下敘述中錯誤的是
A、若“條件”是一個為0的常數(shù)，則一次也不執(zhí)行循環(huán)體
B、“條件”可以是關(guān)系表達式、邏輯表達式或常數(shù)
C、循環(huán)體中可以使用Exit Do 語句
D、如果“條件”總是為True，則不停地執(zhí)行循環(huán)體
A B C D
19.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
Dim a As Integer,s As Integer
a=8
s=1
Do
s=s+a
a=a-1
Loop While a<=0
Print s;a
End Sub
程序運行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是
A、7 9
B、34 0
C、9 7
D、死循環(huán)
A B C D
20.設(shè)有如下通用過程：
Public Sub Fun(a(),ByVal x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下的事件過程：
Private Sub Command1_Click()
Dim arr(5) As Variant
For i=1 To 5
arr(i)=i
Next
n=10
Call Fun(arr(),n)
Text1.Text=n
End Sub
程序運行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是
A、10
B、15
C、25
D、24
A B C D
21.在窗體上畫兩個滾動條，名稱分別為Hscroll1、hscroll2；六個標簽，名稱分別為
Label1、Label2、Label3、Label4、Label5、Label6，其中標簽Label4~Label6分別顯示
“A”“B”“A＊B”等文字信息，標簽Label1、Label2分別顯示其右側(cè)的滾動條的數(shù)值，
Label3顯示“A＊B”的計算結(jié)果。當移動滾動框時，在相應(yīng)的標簽中顯示滾動條的值。當
單擊命令按鈕“計算”時，對標簽Label1、Label2中顯示的兩個值求積，并將結(jié)果顯示
在Label3中。以下不能實現(xiàn)上述功能的事件過程是：
A)、Private Sub Command1_Click()
Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption))
End Sub
B)、Private Sub Command1_Click()
Label3.Caption=HScroll1.Value*HScroll2.Value
End Sub
C)、Private Sub Command1_Click()
Label3.Caption=HScroll1*HScroll2
End Sub
D)、Private Sub Command1_Click()
Label3.Caption=HScroll1.Text*HScroll2.Text
End Sub
A B C D
22.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
For n=1 To 20
If n Mod 3<>0 then m=m+n\3
Next n
print n
End sub
程序運行后，如果單擊命令按鈕，則窗體上顯示的內(nèi)容是
A、15
B、18
C、21
D、24
A B C D
23.在窗體上畫一個名稱為Text1的文本框，并編寫如下程序：
Private Sub Form_Lord()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print"程序設(shè)計"
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)
Print"Visual Basic"
End Sub
程序運行后，結(jié)果按“A”鍵，然后單擊窗體，則在窗體上顯示的內(nèi)容是
A、Visual Basic
B、程序設(shè)計
C、A程序設(shè)計
D、Visual Basic
程序設(shè)計
A B C D
24.設(shè)有如下程序：
Private Sub Command1_Click()
Dim sum As Double,X As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next
End Sub
該程序通過For循環(huán)計算一個表達式的值，這個表達式是
A、1+1/2+2/3+3/4+4/5
B、1+1/2+2/3+3/4
C、1/2+2/3+3/4+4/5
D、1+1/2+1/3+1/4+1/5
A B C D
25.以下有關(guān)數(shù)組定義的語句序列中，錯誤的是
A、Static arr1(3)
arr(1)=100
arr(2)="Hello"
arr(3)=123.45
B、Dim arr2() As Integer
Dim size As Integer
Private Sub Command2_Click()
size=InputBox("輸入：")
ReDim arr2(size)
......
End Sub
C、Option Base 1
Private Sub Command3_Click()
Dim arr3() As Integer
......
End Sub
D、Dim n As Integer
Private Sub Command4_Click()
Dim arr4(n) As Integer
......
End Sub
A B C D 26.以下不能在“工程資源管理器”窗口中列出的文件類型是
A、.bas
B、.res
C、.frm
D、.ocx
A B C D
27.以下關(guān)于窗體的描述中，錯誤的是
A、執(zhí)行Unload Form1語句后，窗體Form1消失，但仍在內(nèi)存中
B、窗體的Load事件在加載窗體時發(fā)生
C、當窗體的Enabled屬生為False時通過鼠標和鍵盤對窗體的操作都被禁止
D、窗體的Height、Width屬于用于設(shè)置窗體的高和寬
A B C D
28.下列可作為Visual Basic變量名的是
A、A#A
B、4A
C、?xy
D、constA
A B C D
29.設(shè)有如下的記錄類型
Type Student
number As String
name As String
age As Integer
End Type
則正確引用該記錄類型變量的代碼是
A、Student.name ="張紅"
B、Dim s As Student
s.name ="張紅"
C、Dim s As Type Student
s.name ="張紅"
D、Dim s As Type
s.name ="張紅"
A B C D
30.函數(shù)String(n,"str")的功能是
A、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串
B、返回由n個字符組成的字符串
C、從字符串中取出n個字符
D、從字符串中第n個字符的位置開始取子字符串
A B C D
31.將數(shù)學表達式Cos2(a+b)+5e2寫成Visual Basic的表達式，其正確的形式是
A)Cos(a+b)^2+5*exp(2) B)Cos^2(a+b)+5*exp(2)
C)Cos(a+b)^2+5*ln(2) D)Cos^2(a+b)+5*ln(2)
A B C D
32.在窗體上畫一個命令按鈕，名稱為Command1。單擊命令按鈕時，執(zhí)行如下事件過程：
Private Sub Command1_Click()
a$ = "software and hardware"
b$ = Right(a$,8)
c$ = Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
則彈出的信息框的標題欄中顯示的信息是
A、software and hardware
B、software
C、hardware
D、1
A B C D
33.執(zhí)行如下語句：
a = InputBox("Today","Tomorrow","yesterday",,,"Day before yesterday",5)
將顯示一個輸入對話框，在對話框的輸入?yún)^(qū)中顯示的信息是
A、Today
B、Tomorrow
C、Yesterday
D、Day before yesterday
A B C D
34.表示滾動條控件取值范圍值的屬性是
A、Max
B、LargeChange
C、Value
D、Max-Min
A B C D
35.在窗體上畫一個名稱為List1的列表框，一個名稱為Label1的標簽。列表框中顯示若干城市的名稱。當單擊列表框中的某個城市名時，在標簽中顯示選中城市的名稱。下列能正確實現(xiàn)上述功能的程序是
A、Private Sub List1_Click()
Label1.Caption = List1.ListIndex
End Sub
B、Private Sub List1_Click()
Label1.name = List1.ListIndex
End Sub
C、Private Sub List1_Click()
Label1.name = List1.text
End Sub
D、Private Sub List1_Click()
Label1.Caption = List1.text
End Sub
A B C D
二、填空題（每空2分，共計30分）
1.數(shù)據(jù)結(jié)構(gòu)是一門研究非數(shù)值計算的程序設(shè)計問題中計算機的____以及它們之間的關(guān)系和運算等的學科。
輸入答案，中間不含空格:
2.排序方法中，從未排序序列中挑選元素，并將其依次放入已排序序列（初始時為空）的一端的方法，稱為____。
輸入答案，中間不含空格:
3.需求分析階段的最后成果是____，是軟件開發(fā)中的重要文檔之一。
輸入答案，中間不含空格:
4.每個實體有若干特性，每一個特性稱為____。
輸入答案，中間不含空格:
5.關(guān)系代數(shù)運算中，傳統(tǒng)的集合運算有____、并、交和差。
輸入答案，中間不含空格:
6.執(zhí)行下面的程序段后，i的值為______，s的值為______。
s=2
For i=3.2 To 4.9 Step 0.8
s=s+1
Next i
輸入答案，中間不含空格:
7.上一題
輸入答案，中間不含空格:
8.把窗體的KeyPreview屬性設(shè)置為True，然后編寫如下兩個事件過程：
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
程序運行后，如果直接按鍵盤上的“A”鍵（即不按住Shift鍵），則在窗體上輸出的字符分別是_____和_____。
輸入答案，中間不含空格:
9.上一題
輸入答案，中間不含空格:
10.在窗體上畫一個文本框、一個標簽和一個命令按鈕，其名稱分別為Text1、
Label1和Command1，然后編寫如下兩個事件過程：
Private Sub Command1_Click()
S$=InputBox("請輸入一個字符串")
Text1.text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text,7)
End Sub
程序運行后，單擊命令按鈕，將顯示一個輸入對話框，如果在該對話框中輸入字符串
“VisualBAsic”,則在標簽中顯示的內(nèi)容是_____。
輸入答案，中間不含空格: 12.上一題
輸入答案，中間不含空格:
13.上一題
輸入答案，中間不含空格:
14.以下程序的功能是：把當前目錄下的順序文件smtext1.txt的內(nèi)容讀入內(nèi)存，并
在文本框Text1中顯示出來。請?zhí)羁铡?BR> Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open".\smtext1.txt"_____As#1
Do While_____
Input #1,inData
Text1.Text=Text1.Text & inData
Loop
Close #1
End Sub
輸入答案，中間不含空格:
15.上一題
輸入答案，中間不含空格: