一 、選擇題
(1) 下列數(shù)據(jù)結(jié)構(gòu)中,按先進(jìn)后出原則組織數(shù)據(jù)的是
A.線性鏈表
B.棧
C.循環(huán)鏈表
D.順序表
正確答案: B
(2) 具有3個結(jié)點的二叉樹有
A.2種形態(tài)
B.4種形態(tài)
C.7種形態(tài)
D.5種形態(tài)
正確答案: D
(3) 設(shè)有下列二叉樹:
對此二叉樹前序遍歷的結(jié)果為
A.ZBTYCPXA
B.ATBZXCYP
C.ZBTACYXP
D.ATBZXCPY
正確答案: B
(4) 結(jié)構(gòu)化程序設(shè)計主要強調(diào)的是
A.程序的規(guī)模
B.程序的效率
C.程序設(shè)計語言的先進(jìn)性
D.程序易讀性
正確答案: D
(5) 程序的3種基本控制結(jié)構(gòu)是
A.過程、子過程和分程序
B.順序、選擇和重復(fù)
C.遞歸、堆棧和隊列
D.調(diào)用、返回和轉(zhuǎn)移
正確答案: B
(6) 下列敘述中,不屬于測試的特征的是
A.測試的挑剔性
B.完全測試的不可能性
C.測試的可靠性
D.測試的經(jīng)濟(jì)性
正確答案: C
(7) 需求分析中開發(fā)人員要從用戶那里了解
A.軟件做什么
B.用戶使用界面
C.輸入的信息
D.軟件的規(guī)模
正確答案: A
(8) 下列關(guān)系模型中,能使經(jīng)運算后得到的新關(guān)系中屬性個數(shù)多于原來關(guān)系中屬性個數(shù)的是
A.選擇
B.連接
C.投影
D.并
正確答案: B
(9) 下列敘述中,正確的是
A.用E-R圖能夠表示實體集間一對一的聯(lián)系、一對多的聯(lián)系和多對多的聯(lián)系
B.用E-R圖只能表示實體集之間一對一的聯(lián)系
C.用E-R圖只能表示實體集之間一對多的聯(lián)系
D.用E-R圖表示的概念數(shù)據(jù)模型只能轉(zhuǎn)換為關(guān)系數(shù)據(jù)模型
正確答案: C
(10) "年齡在18-25之間"這種約束是屬于數(shù)據(jù)庫當(dāng)中的
A.原子性措施
B.一致性措施
C.完整性措施
D.安全性措施
正確答案: C
(11) 下列說法錯誤的是
A.資源文件的擴展名為.res
B.一個窗體對應(yīng)一個窗體文件
C.Visual Basic中的一個工程只包含一個窗體
D.Visual Basic中一個工程最多可以包含255個窗體
正確答案: C
(12) 下列說法錯誤的是
A.方法是對象的一部分
B.方法的調(diào)用格式和對象的屬性的使用格式相同
C.方法是一種特殊的過程和函數(shù)
D.在調(diào)用方法時,對象名是不可缺少的
正確答案: D
(13) 在運行程序時,在文本框中輸入新的內(nèi)容,或在程序代碼中改變Text的屬性值,相應(yīng)會觸發(fā)到的事件是
A.GotFocus
B.Change
C.Click
D.DblClick
正確答案: B
(14) Print方法可以在對象上輸出數(shù)據(jù),這些對象包括
A.圖片框
B.狀態(tài)欄
C.標(biāo)題欄
D.代碼窗口
正確答案: A
(15) 可以在常量的后面加上類型說明符以顯示常量的類型,用來表示字符串常量的是
A.%
B.#
C.!
D.$
正確答案: D
(16) 下列語句的輸出結(jié)果為
Print Format$(10009.36, "000,000.000")
A.10,009.36
B.10,009.360
C.10,009.3
D.010,009.360
正確答案: D
(17) 使"Microsoft"在當(dāng)前窗體上輸出的語句是
A.Picture.Print "Microsoft"
B.Print "Microsoft"
C.Printer. Print "Microsoft"
D.Debug.Print "Microsoft"
正確答案: B
(18) 在修改列表框內(nèi)容時,AddItem方法的作用是
A.在列表框內(nèi)插入一行文本
B.在列表框中插入多行文本
C.刪除列表框中指定的項目
D.清除列表框內(nèi)的全部內(nèi)容
正確答案: A
(19) 圖片框與圖像框的區(qū)別是圖片框可以作為其他控件的父對象,即為容器控件,而圖像框只能
A.顯示圖形信息
B.顯示文本內(nèi)容
C.顯示文本和圖形信息
D.顯示程序代碼
正確答案: A
(20) 執(zhí)行下面的程序段后,變量c的值為
a=14
b=30
Select Case b \ 10
Case 0
c=a * 10 + b
Case 1 To 9
c=a * 100 + b
Case 10 To 99
c=a * 1000 + b
End Select
Print c
A.363
B.2548
C.1430
D.9875
正確答案: C (21) 下列程序段的執(zhí)行結(jié)果為
m=1
n=1
Select Case m
Case 1
Select Case n
Case 0
Print "**0**"
Case 1
Print "**1**"
End Select
Case 2
Print "**2**"
End Select
A.**0**
B.**1**
C.**2**
D.0
正確答案: B
(22) 下列程序段的執(zhí)行結(jié)果為
m=2
n=3
Do
m=m + n
n=n + 1
Loop While m < 10
Print m; n
A.1 5
B.14 6
C.a(chǎn) b
D.10 25
正確答案: B
(23) 有如下的程序段,該程序段執(zhí)行完后,共執(zhí)行的循環(huán)次數(shù)是
total=0
Counter=1
Do
Print Counter
total=total * Counter+1
Print total
Counter=Counter + 1
If total > 10 Then
Exit Do
End If
Loop While Counter <=10
A.4
B.10
C.15
D.20
正確答案: A
(24) 下列程序的運行結(jié)果為
Dim a(-1 To 6)
For i=LBound(a, 1) To UBound(a, 1)
a(i) =i
Next i
Print a(LBound(a, 1) ) ; a(UBound(a, 1) )
A.0 0
B.-5 0
C.-1 6
D.0 6
正確答案: C
(25) 下面的數(shù)組聲明中,正確的是
A.Dim pict[3,4] As Integer
B.Dim pict(3,4) As Integer
C.Dim pict[3.4] As Integer
D.Dim pict(3:4) As Integer.
正確答案: B
(26) 下面的過程定義語句中不合法的是
A.Sub Para(ByVal n() )
B.Sub Para(n) As Integer
C.Function Para(ByVal n)
D.Function Para(proc1)
正確答案: B
(27) 單擊命令按鈕時,下列的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=86: y=29
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.12 32
B.6 29
C.2 3
D.12 3
正確答案: B
(28) 下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim FirStr As String
FirStr= "abcdef"
Print Pct (FirStr)
End Sub
Private Function Pct(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
Pct=tempStr
End Function
A.a(chǎn)bcdef
B.a(chǎn)fbecd
C.fedcba
D.defabc
正確答案: B
(29) 單擊命令按鈕時,下列程序代碼的運行結(jié)果為
Private Sub Command1_Click()
Print MyFunc(20, 18)
End Sub
Public Function MyFunc(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
MyFunc=m
End Function
A.0
B.2
C.4
D.6
正確答案: B
(30) 有如下程序:
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=2: b=4
Call CS (a, B.
End Sub
Sub CS (x As Single, y As Single)
t=x
x=t \ y
y=t Mod y
End Sub
程序運行后,單擊命令按鈕,a和b的值分別為
A.0 0
B.1 1
C.0 2
D.1 2
正確答案: C
(31) 下面有一段程序代碼,如果從鍵盤上輸入"Computer",則在文本框內(nèi)顯示的內(nèi)容是
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >=65 And KeyAscii <=122 Then
KeyAscii=42
End If
End Sub
A.Computer
B.什么都沒有
C.********
D.程序出錯
正確答案: C
(32) 下列有關(guān)子菜單的說法中,錯誤的是
A.除了Click事件之外,菜單項不可以響應(yīng)其他事件
B.菜單項的索引號必須從1開始
C.每個菜單項都是一個控件,與其他控件一樣也有其屬性和事件
D.菜單的索引號可以不連續(xù)
正確答案: B
(33) 在窗體上畫一個通用對話框,其名稱為CommonDialog1,然后畫一個命令按鈕,并編寫如下事件過程:
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.*) |*.txt|" _
& Batch Files(*.bat) |*.bat"
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序運行后,單擊命令按鈕,將顯示一個"打開"對話框,此時在"文件類型"框中顯示的是
A.All Files(*.*)
B.Text Files(*.*)
C.Batch Files(*.bat)
D.All Files(*.*) |Text Files(*.*)
正確答案: A
(34) 在Visual Basic中,要將一個窗體從內(nèi)存中釋放,應(yīng)使用的語句是
A.Hide
B.Unload
C.Load
D.Show
正確答案: B
(35) 在Visual Basic中按文件的編碼方式不同,可將文件分為
A.順序文件和隨機文件
B.文本文件和數(shù)據(jù)文件
C.ASCII文件和二進(jìn)制文件
D.?dāng)?shù)據(jù)文件和可執(zhí)行文件
正確答案: C
二 、填空題
(1) 排序是計算機程序設(shè)計中的一種重要操作,常見的排序方法有插入排序、 【1】 和選擇排序等。
正確答案: 1.(交換排序)
(2) 當(dāng)循環(huán)隊列非空且隊尾指針等于隊頭指針時,說明循環(huán)隊列已滿,不能進(jìn)行入隊運算。這種情況稱為 【2】 。
正確答案: 1.(上溢)
(3) 【3】 是一種信息隱蔽技術(shù),目的在于將對象的使用者和對象的設(shè)計者分開。
正確答案: 1.(封裝)
(4) 為了便于對照檢查,測試用例應(yīng)由輸入數(shù)據(jù)和預(yù)期的 【4】 兩部分組成。
正確答案: 1.(輸出結(jié)果)
(5) 【5】 是從二維表列的方向進(jìn)行的運算。
正確答案: 1.(關(guān)系運算)
(6) 在Visual Basic的立即窗口內(nèi)輸入以下語句
X=97
?Chr$(X)
在窗口中顯示的結(jié)果是 【6】 。
正確答案: 1.(a)
(7) 如果要將形狀控件的內(nèi)部設(shè)置為水平線,應(yīng)將FillStyle屬性設(shè)置為 【7】 。
正確答案: 1.(2)
(8) 在窗體上畫兩個文本框,其名稱分別為Name1和PassWord1,然后編寫如下事件過程
Private Sub Form_Load()
Show
Name1.Text=""
Password1.Text=""
Password1.SetFocus
End Sub
Private Sub Password1_KeyDown(KeyCode As Integer, Shift As Integer)
Name1.Text=Name1.Text + Chr(KeyCode - 3)
End Sub
程序運行后,如果在Password1中輸入"hit",則在Name1文本框中顯示的內(nèi)容是 【8】 。
正確答案: 1.(EFQ)
(9) 在一個窗體上有兩個命令按鈕,cmdMax和cmdMin。單擊cmdMax時,窗體上顯示"字體由小變大",字號每次增加2;單擊cmdMin時,窗體上顯示"字體由大變小",字號每次減小2。請?zhí)羁铡?BR> Private Sub Form_Load()
Form1.Caption="字體變化示范"
cmdMax.Caption="字體變大"
cmdMin.Caption="字體變小"
End Sub
Private Sub cmdMax_Click()
【9】
Form1.Print "字體由小變大"
End Sub
Private Sub cmdMin_Click()
【10】
Form1.Print "字體由大變小"
End Sub
正確答案: 1.(Form1.FontSize = Form1.FontSize + 2) 2.(Form1.FontSize)
(10) 下列程序的功能是:將數(shù)據(jù)1,2,…,10寫入順序文件Base.txt中,請?zhí)羁铡?BR> Private Sub Form_Click()
Dim i As Integer
Open 【11】 As #1
For i=1 To 10
【12】
Next i
Close #1
End Sub
正確答案: 1.("Base.txt" For Output) 2.(Print #1, i)
(11) 下面的程序用于根據(jù)文本框Text中輸入的內(nèi)容進(jìn)行以下處理:
若Text為1,則打印"您的成績?yōu)閮?yōu)秀!";若Text為2,則打印"您的成績?yōu)榱己茫?
若Text為3,則打印"您的成績?yōu)橐话?;否則打印"您的成績一般以下!",請?zhí)羁铡?BR> Private Sub Command1_Click()
Select Case Val(Text1.Text)
Case 【13】
Print "您的成績?yōu)閮?yōu)秀!"
Case 【14】
Print "您的成績?yōu)榱己茫?
Case 【15】
Print "您的成績?yōu)橐话?
Case Else
Print "您的成績一般以下!"
End Select
End Sub
正確答案: 1.(1) 2.(2) 3.(3)
(1) 下列數(shù)據(jù)結(jié)構(gòu)中,按先進(jìn)后出原則組織數(shù)據(jù)的是
A.線性鏈表
B.棧
C.循環(huán)鏈表
D.順序表
正確答案: B
(2) 具有3個結(jié)點的二叉樹有
A.2種形態(tài)
B.4種形態(tài)
C.7種形態(tài)
D.5種形態(tài)
正確答案: D
(3) 設(shè)有下列二叉樹:
對此二叉樹前序遍歷的結(jié)果為
A.ZBTYCPXA
B.ATBZXCYP
C.ZBTACYXP
D.ATBZXCPY
正確答案: B
(4) 結(jié)構(gòu)化程序設(shè)計主要強調(diào)的是
A.程序的規(guī)模
B.程序的效率
C.程序設(shè)計語言的先進(jìn)性
D.程序易讀性
正確答案: D
(5) 程序的3種基本控制結(jié)構(gòu)是
A.過程、子過程和分程序
B.順序、選擇和重復(fù)
C.遞歸、堆棧和隊列
D.調(diào)用、返回和轉(zhuǎn)移
正確答案: B
(6) 下列敘述中,不屬于測試的特征的是
A.測試的挑剔性
B.完全測試的不可能性
C.測試的可靠性
D.測試的經(jīng)濟(jì)性
正確答案: C
(7) 需求分析中開發(fā)人員要從用戶那里了解
A.軟件做什么
B.用戶使用界面
C.輸入的信息
D.軟件的規(guī)模
正確答案: A
(8) 下列關(guān)系模型中,能使經(jīng)運算后得到的新關(guān)系中屬性個數(shù)多于原來關(guān)系中屬性個數(shù)的是
A.選擇
B.連接
C.投影
D.并
正確答案: B
(9) 下列敘述中,正確的是
A.用E-R圖能夠表示實體集間一對一的聯(lián)系、一對多的聯(lián)系和多對多的聯(lián)系
B.用E-R圖只能表示實體集之間一對一的聯(lián)系
C.用E-R圖只能表示實體集之間一對多的聯(lián)系
D.用E-R圖表示的概念數(shù)據(jù)模型只能轉(zhuǎn)換為關(guān)系數(shù)據(jù)模型
正確答案: C
(10) "年齡在18-25之間"這種約束是屬于數(shù)據(jù)庫當(dāng)中的
A.原子性措施
B.一致性措施
C.完整性措施
D.安全性措施
正確答案: C
(11) 下列說法錯誤的是
A.資源文件的擴展名為.res
B.一個窗體對應(yīng)一個窗體文件
C.Visual Basic中的一個工程只包含一個窗體
D.Visual Basic中一個工程最多可以包含255個窗體
正確答案: C
(12) 下列說法錯誤的是
A.方法是對象的一部分
B.方法的調(diào)用格式和對象的屬性的使用格式相同
C.方法是一種特殊的過程和函數(shù)
D.在調(diào)用方法時,對象名是不可缺少的
正確答案: D
(13) 在運行程序時,在文本框中輸入新的內(nèi)容,或在程序代碼中改變Text的屬性值,相應(yīng)會觸發(fā)到的事件是
A.GotFocus
B.Change
C.Click
D.DblClick
正確答案: B
(14) Print方法可以在對象上輸出數(shù)據(jù),這些對象包括
A.圖片框
B.狀態(tài)欄
C.標(biāo)題欄
D.代碼窗口
正確答案: A
(15) 可以在常量的后面加上類型說明符以顯示常量的類型,用來表示字符串常量的是
A.%
B.#
C.!
D.$
正確答案: D
(16) 下列語句的輸出結(jié)果為
Print Format$(10009.36, "000,000.000")
A.10,009.36
B.10,009.360
C.10,009.3
D.010,009.360
正確答案: D
(17) 使"Microsoft"在當(dāng)前窗體上輸出的語句是
A.Picture.Print "Microsoft"
B.Print "Microsoft"
C.Printer. Print "Microsoft"
D.Debug.Print "Microsoft"
正確答案: B
(18) 在修改列表框內(nèi)容時,AddItem方法的作用是
A.在列表框內(nèi)插入一行文本
B.在列表框中插入多行文本
C.刪除列表框中指定的項目
D.清除列表框內(nèi)的全部內(nèi)容
正確答案: A
(19) 圖片框與圖像框的區(qū)別是圖片框可以作為其他控件的父對象,即為容器控件,而圖像框只能
A.顯示圖形信息
B.顯示文本內(nèi)容
C.顯示文本和圖形信息
D.顯示程序代碼
正確答案: A
(20) 執(zhí)行下面的程序段后,變量c的值為
a=14
b=30
Select Case b \ 10
Case 0
c=a * 10 + b
Case 1 To 9
c=a * 100 + b
Case 10 To 99
c=a * 1000 + b
End Select
Print c
A.363
B.2548
C.1430
D.9875
正確答案: C (21) 下列程序段的執(zhí)行結(jié)果為
m=1
n=1
Select Case m
Case 1
Select Case n
Case 0
Print "**0**"
Case 1
Print "**1**"
End Select
Case 2
Print "**2**"
End Select
A.**0**
B.**1**
C.**2**
D.0
正確答案: B
(22) 下列程序段的執(zhí)行結(jié)果為
m=2
n=3
Do
m=m + n
n=n + 1
Loop While m < 10
Print m; n
A.1 5
B.14 6
C.a(chǎn) b
D.10 25
正確答案: B
(23) 有如下的程序段,該程序段執(zhí)行完后,共執(zhí)行的循環(huán)次數(shù)是
total=0
Counter=1
Do
Print Counter
total=total * Counter+1
Print total
Counter=Counter + 1
If total > 10 Then
Exit Do
End If
Loop While Counter <=10
A.4
B.10
C.15
D.20
正確答案: A
(24) 下列程序的運行結(jié)果為
Dim a(-1 To 6)
For i=LBound(a, 1) To UBound(a, 1)
a(i) =i
Next i
Print a(LBound(a, 1) ) ; a(UBound(a, 1) )
A.0 0
B.-5 0
C.-1 6
D.0 6
正確答案: C
(25) 下面的數(shù)組聲明中,正確的是
A.Dim pict[3,4] As Integer
B.Dim pict(3,4) As Integer
C.Dim pict[3.4] As Integer
D.Dim pict(3:4) As Integer.
正確答案: B
(26) 下面的過程定義語句中不合法的是
A.Sub Para(ByVal n() )
B.Sub Para(n) As Integer
C.Function Para(ByVal n)
D.Function Para(proc1)
正確答案: B
(27) 單擊命令按鈕時,下列的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=86: y=29
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.12 32
B.6 29
C.2 3
D.12 3
正確答案: B
(28) 下列程序的執(zhí)行結(jié)果為
Private Sub Command1_Click()
Dim FirStr As String
FirStr= "abcdef"
Print Pct (FirStr)
End Sub
Private Function Pct(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
Pct=tempStr
End Function
A.a(chǎn)bcdef
B.a(chǎn)fbecd
C.fedcba
D.defabc
正確答案: B
(29) 單擊命令按鈕時,下列程序代碼的運行結(jié)果為
Private Sub Command1_Click()
Print MyFunc(20, 18)
End Sub
Public Function MyFunc(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
MyFunc=m
End Function
A.0
B.2
C.4
D.6
正確答案: B
(30) 有如下程序:
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=2: b=4
Call CS (a, B.
End Sub
Sub CS (x As Single, y As Single)
t=x
x=t \ y
y=t Mod y
End Sub
程序運行后,單擊命令按鈕,a和b的值分別為
A.0 0
B.1 1
C.0 2
D.1 2
正確答案: C
(31) 下面有一段程序代碼,如果從鍵盤上輸入"Computer",則在文本框內(nèi)顯示的內(nèi)容是
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >=65 And KeyAscii <=122 Then
KeyAscii=42
End If
End Sub
A.Computer
B.什么都沒有
C.********
D.程序出錯
正確答案: C
(32) 下列有關(guān)子菜單的說法中,錯誤的是
A.除了Click事件之外,菜單項不可以響應(yīng)其他事件
B.菜單項的索引號必須從1開始
C.每個菜單項都是一個控件,與其他控件一樣也有其屬性和事件
D.菜單的索引號可以不連續(xù)
正確答案: B
(33) 在窗體上畫一個通用對話框,其名稱為CommonDialog1,然后畫一個命令按鈕,并編寫如下事件過程:
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.*) |*.txt|" _
& Batch Files(*.bat) |*.bat"
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序運行后,單擊命令按鈕,將顯示一個"打開"對話框,此時在"文件類型"框中顯示的是
A.All Files(*.*)
B.Text Files(*.*)
C.Batch Files(*.bat)
D.All Files(*.*) |Text Files(*.*)
正確答案: A
(34) 在Visual Basic中,要將一個窗體從內(nèi)存中釋放,應(yīng)使用的語句是
A.Hide
B.Unload
C.Load
D.Show
正確答案: B
(35) 在Visual Basic中按文件的編碼方式不同,可將文件分為
A.順序文件和隨機文件
B.文本文件和數(shù)據(jù)文件
C.ASCII文件和二進(jìn)制文件
D.?dāng)?shù)據(jù)文件和可執(zhí)行文件
正確答案: C
二 、填空題
(1) 排序是計算機程序設(shè)計中的一種重要操作,常見的排序方法有插入排序、 【1】 和選擇排序等。
正確答案: 1.(交換排序)
(2) 當(dāng)循環(huán)隊列非空且隊尾指針等于隊頭指針時,說明循環(huán)隊列已滿,不能進(jìn)行入隊運算。這種情況稱為 【2】 。
正確答案: 1.(上溢)
(3) 【3】 是一種信息隱蔽技術(shù),目的在于將對象的使用者和對象的設(shè)計者分開。
正確答案: 1.(封裝)
(4) 為了便于對照檢查,測試用例應(yīng)由輸入數(shù)據(jù)和預(yù)期的 【4】 兩部分組成。
正確答案: 1.(輸出結(jié)果)
(5) 【5】 是從二維表列的方向進(jìn)行的運算。
正確答案: 1.(關(guān)系運算)
(6) 在Visual Basic的立即窗口內(nèi)輸入以下語句
X=97
?Chr$(X)
在窗口中顯示的結(jié)果是 【6】 。
正確答案: 1.(a)
(7) 如果要將形狀控件的內(nèi)部設(shè)置為水平線,應(yīng)將FillStyle屬性設(shè)置為 【7】 。
正確答案: 1.(2)
(8) 在窗體上畫兩個文本框,其名稱分別為Name1和PassWord1,然后編寫如下事件過程
Private Sub Form_Load()
Show
Name1.Text=""
Password1.Text=""
Password1.SetFocus
End Sub
Private Sub Password1_KeyDown(KeyCode As Integer, Shift As Integer)
Name1.Text=Name1.Text + Chr(KeyCode - 3)
End Sub
程序運行后,如果在Password1中輸入"hit",則在Name1文本框中顯示的內(nèi)容是 【8】 。
正確答案: 1.(EFQ)
(9) 在一個窗體上有兩個命令按鈕,cmdMax和cmdMin。單擊cmdMax時,窗體上顯示"字體由小變大",字號每次增加2;單擊cmdMin時,窗體上顯示"字體由大變小",字號每次減小2。請?zhí)羁铡?BR> Private Sub Form_Load()
Form1.Caption="字體變化示范"
cmdMax.Caption="字體變大"
cmdMin.Caption="字體變小"
End Sub
Private Sub cmdMax_Click()
【9】
Form1.Print "字體由小變大"
End Sub
Private Sub cmdMin_Click()
【10】
Form1.Print "字體由大變小"
End Sub
正確答案: 1.(Form1.FontSize = Form1.FontSize + 2) 2.(Form1.FontSize)
(10) 下列程序的功能是:將數(shù)據(jù)1,2,…,10寫入順序文件Base.txt中,請?zhí)羁铡?BR> Private Sub Form_Click()
Dim i As Integer
Open 【11】 As #1
For i=1 To 10
【12】
Next i
Close #1
End Sub
正確答案: 1.("Base.txt" For Output) 2.(Print #1, i)
(11) 下面的程序用于根據(jù)文本框Text中輸入的內(nèi)容進(jìn)行以下處理:
若Text為1,則打印"您的成績?yōu)閮?yōu)秀!";若Text為2,則打印"您的成績?yōu)榱己茫?
若Text為3,則打印"您的成績?yōu)橐话?;否則打印"您的成績一般以下!",請?zhí)羁铡?BR> Private Sub Command1_Click()
Select Case Val(Text1.Text)
Case 【13】
Print "您的成績?yōu)閮?yōu)秀!"
Case 【14】
Print "您的成績?yōu)榱己茫?
Case 【15】
Print "您的成績?yōu)橐话?
Case Else
Print "您的成績一般以下!"
End Select
End Sub
正確答案: 1.(1) 2.(2) 3.(3)