一、選擇題
1、以下關(guān)于MsgBox 的敘述中，錯誤的是( )。
A.MsgBox 函數(shù)返回一個整數(shù)
B.通過MsgBox 函數(shù)可以設(shè)置信息框中圖標(biāo)和按鈕的類型
C.MsgBox 語句沒有返回值
D.MsgBox 函數(shù)的第二個參數(shù)是一個整數(shù)，該參數(shù)只能確定對話框中顯示的按鈕數(shù)量
2、下列操作不能向工程中添加窗體的是( )。
A.執(zhí)行"工程"菜單中的"添加窗體"命令
B.單擊工具欄中的"添加窗體"按鈕
C.右擊窗體，在彈出的菜單中選擇"添加窗體"命令
D.右擊工程資源管理器，在彈出的菜單中選擇"添加"命令，然后在下一級菜單中選擇"添加窗體"命令
3、下列選項中不屬于軟件生命周期開發(fā)階段任務(wù)的是( )。
A.軟件測試
B.概要設(shè)計
C.軟件維護
D.詳細設(shè)計
4、表達式"4+5/6*7/8 Mod 9"的值是( )。
A.4
B.5
C.6
D.7
5、數(shù)據(jù)庫系統(tǒng)的核心是( )。
A.數(shù)據(jù)模型
B.數(shù)據(jù)庫管理系統(tǒng)
C.數(shù)據(jù)庫
D.數(shù)據(jù)庫管理員
6、以下敘述中錯誤的是( )。
A.一個工程中可以包含多個窗體文件
B.在一個窗體文件中用Private 定義的通用過程能被其他窗體調(diào)用
C.在設(shè)計Visual Basic 程序時，窗體、標(biāo)準(zhǔn)模塊、類模塊等需要分別保存為不同類型的磁盤文件
D.全局變量必須在標(biāo)準(zhǔn)模塊中定義
7、下列關(guān)于過程及過程參數(shù)的描述中，錯誤的是( )。
A.過程的參數(shù)可以是控件名稱
B.調(diào)用過程時使用的實參的個數(shù)應(yīng)與過程形參的個數(shù)相同
C.只有函數(shù)過程能夠?qū)⑦^程中處理的信息返回到調(diào)用程序中
D.窗體可以作為過程的參數(shù)
8、有下列事件過程：
Private Sub Co mmand1_Click( )
b =10
Do Until b =-1
a=InputBox("請輸入a 的值")
a=Val(a)
b =InputBox("請輸入b 的值")
b =Va(b)
a=a*b
Loop
Print a
End Sub
程序運行后，依次輸入數(shù)值30，20，10，-1后，輸出結(jié)果是( )。
A.600
B.-10
C.200
D.-6000
9、支持子程序調(diào)用的數(shù)據(jù)結(jié)構(gòu)是( )。
A.棧
B.樹
C.隊列
D.二叉樹
10、對關(guān)系S和R進行集合運算，結(jié)果中既包含S中的所有元組也包含R中的所有元組，這樣的集合運算稱為( )。
A.并運算
B.交運算
C.差運算
D.積運算
11、窗體上有1個名稱為List1的列表框，其中已經(jīng)輸入了若干個項目，如圖所示;還有2個文本框，名稱分別為Text1、Text2，1個名稱為Command1的命令按鈕，并有下列事件過程。
Private Sub Co mmand1_Click()
Di mstr As Stri ng ，s As Stri ng ，k As Integer
s =Text1
str =""
For k =List1.ListCount -1To 0Step -1
If InStr(List1.List(k)，s)>0Then
str =str &List1.List(k)&""
End If
Next k
If str =""Then
Text2="沒有匹配的項目" Els
e Text2=str
End If
End Sub
程序運行時，在Text1中輸入"京"，單擊命令按鈕，則在Text2中顯示的內(nèi)容是( )。
A.京
B.北京南京
C.南京北京
D.沒有匹配的項目
12、執(zhí)行以下程序段后，變量c$的值為( )。
a$="Visual Basic Programi ng"
b$="Quick"
c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，11)
A.Visual BASICProgrami ng
B.Quick Basic Programi ng
C.QUICK Basic Programi ng
D.Quick BASICProgrami ng
13、剛建立一個新的標(biāo)準(zhǔn)EXE工程后，不在工具箱中出現(xiàn)的控件是( )。
A.單選按鈕
B.圖片框
C.通用對話框
D.文本框
14、關(guān)于MDI 窗體，下列說法正確的是( )。
A.一個應(yīng)用程序可以有多個MDI 窗體
B.子窗體可以移到MDI 窗體以外
C.不可以在MDI 窗體上放置按鈕控件
D.MDI 窗體的子窗體不可以擁有菜單
15、在窗體(Name 屬性為Form1)上畫兩個文本框(其Name 屬性分別為Text1和Text2)和一個命令按鈕(Name屬性為Co mmand1)，然后編寫如下兩個事件過程：
Private Sub Co mmand1_Click()
a=Text1.Text +Text2.Text Print a
End Sub
Private Sub Form_Load()
Text1.Text ="" Text2.Text =""
End sub
程序運行后，在第一個文本框(Text1)和第二個文本框(Text2)中分別輸入123和321，然后單擊命令按鈕，則輸出結(jié)果為( )。
A.444
B.321123
C.123321
D.132231
16、在C盤當(dāng)前文件夾下建立一個名為SDat .txt 的順序文件。要求用InputBox 函數(shù)輸入5名學(xué)生的學(xué)號(StuNo)、姓名(StuName)和英語成績(StuEng)。則在下列橫線處應(yīng)填入的語句是( )。
Private Sub Form_Click()
Open "C：\SDat .txt"For Output As 1
For i =1To 5
StuNo =InputBox("請輸入學(xué)號")
StuName =InputBox("請輸入姓名")
StuEng =Val(InputBox("請輸入英語成績"))
Next i
Close #1
EndSub
A.Input #l ，StuNo ，StuName ，StuEn
B.Put #l ，StuNo ，StuName ，StuEn
C.Write #1，StuNo ，StuName ，StuEn
D.Get #1，StuNo ，StuName ，StuEn
17、目錄列表框Path 屬性所表示的含義是( )。
A.當(dāng)前驅(qū)動器或指定驅(qū)動器上的路徑
B.當(dāng)前驅(qū)動器或指定驅(qū)動器上的某目錄下的文件列表
C.根目錄下的文件列表
D.指定路徑下的文件列表
18、有下列函數(shù)過程：
Function Func2(a As Integer ，b As Integer)As Integer
Static m As Integer ，i As Integer
m=0
i =2
a=i +m+1
b =i +a+b
Func2=m
End Function
在窗體上畫一個命令按鈕，然后編寫下列事件過程：
Private Sub Co mmandl_Click()
Di m P As Integer ，k As Integer ，m As Integer
k =4
m=1
P=Func2(k ，m)
Print k ;m
P=Func2(km)
Print k =m End Sub
程序運行后，單擊命令按鈕，輸出結(jié)果是( )。
A.3 63 6
B.3 63 11
C.3 113 6
D.3 113 11
19、在設(shè)計階段，當(dāng)雙擊窗體上的某個控件時，所打開的窗口是( )。
A.工程資源管理器窗口
B.工具箱窗口
C.代碼窗口
D.屬性窗口
20、下列敘述菜單設(shè)計的語句正確的是( )。
A.菜單也是一個控件，存在于工具箱中
B.菜單也有外觀和行為的屬性
C.菜單設(shè)計在"菜單編輯器"中進行，因此它不是一個控件
D.菜單的屬性也是在"屬性窗口"中設(shè)置的
21、下列各控件不包含滾動條的控件是( )。
A.ListBox
B.Co mboBox
C.TextBox
D.Label
22、要將名為MyForm 的窗體顯示出來，正確的使用方法是( )。
A.MyForm.Show
B.Show.MyForm
C.MyForm Load
D.MyFormShow
23、在面向?qū)ο蠓椒ㄖ?，不屬?對象"基本特點的是( )。
A.一致性
B.分類性
C.多態(tài)性
D.標(biāo)識性
24、為了使列表框中的項目分為多列顯示，需要設(shè)置的屬性為( )。
A.Columns
B.Style
C.List
D.Multi Select
25、在窗體上有1個名稱為Co mmonDialog1的通用對話框和1個名稱為Co mmand1的命令按鈕，以及其他一些控件。要求在程序運行時，單擊Co mmand1按鈕，則顯示打開文件對話框，并在選擇或輸入了1個文件名后，就可以打開該文件。下列是Co mmand1_Click 事件過程的兩種算法。
算法1：
Private Sub Co mmand1_Click()
Co mmonDialogl .ShowOpen
Open Co mmonDialogl .File Name For Input As #1
End Sub
算法2：
Private Sub Co mmand1_Click()
Co mmonDialogl .ShowOpen
If Co mmonDialogl .File Name <>""Then
Open Co mmonDialogl .File Name For Input As #1
EndIf
End Sub
下列關(guān)于這兩種算法的敘述中正確的是( )。
A.顯示打開文件對話框后若未選擇或輸入任何文件名，則算法2會出錯，算法1不會
B.顯示打開文件對話框后若未選擇或輸入任何文件名，則算法1會出錯，算法2不會
C.兩種算法的執(zhí)行結(jié)果完全一樣
D.算法1允許輸入的文件名中含有空格，而算法2不允許
26、下列敘述正確的是( )
A.算法的執(zhí)行效率與數(shù)據(jù)的存儲結(jié)構(gòu)無關(guān)
B.算法的空間復(fù)雜度是指算法程序中指令(或語句)的條數(shù)
C.算法的有窮性是指算法必須能在執(zhí)行有限個步驟之后終止
D.以上3種描述都不對
27、在窗體上畫一個命令按鈕，其名稱為Commandl。程序運行后，單擊命令按鈕，輸出結(jié)果是( )。
Private Sub pl (n As Integer)
For i =n To 1Step =1
x=Stri ng(i ，"*")
Print x
Next i
End Sub
Private Sub Commandl_Click()
pl(3)
EndSub
A.***
**
*
B.***
***
C.*
*
*
D.******
28、在窗體上畫一個名稱為Co mmand1的命令按鈕，并編寫以下程序：
Private Sub Co mmand1_Click()
Di mn %，b ，t
t =1：b =1：n =2
Do
b =b*n
t =t +b
n =n +1
Loop Until n >9
Print t
End Sub
此程序計算并輸出一個表達式的值，該表達式是( )。
A.9!
B.10!
C.1!+2!+…+9!
D.1!+2!+…+10!
29、在用通用對話框控件建立"保存"文件對話框時，如果需要指定文件列表框所列出的文件類型是文本文件(即.txt 文件)，則正確的描述格式是( )。
A."text (.txt)|(*.txt)"
B."文本文件(.txt)|(.txt)"
C."text(.txt)||(*.txt)"
D."text(.txt)(*.txt)"
30、有三個關(guān)系R、S 和T 如下：
由關(guān)系R 和S 通過運算得到關(guān)系T，則所使用的運算為( )。
A.笛卡兒積
B.交
C.并
D.自然連接
31、對長度為n 的線性表進行順序查找，在最壞情況下所需要的比較次數(shù)為( )。
A.log2n
B.n/2
C.n
D.n+1
32、下列程序要求用戶輸入一個年份，并能夠判斷用戶輸入的年份是否是閏年，橫線處應(yīng)填( )。
Sub EnSure( )
Di myear As Integer
year =Val(InputBox("請輸入年份："))
If(year Mod 4=0_________year Mod 100<>0)
________(year Mod 400=0)Then
Print "您輸入的是閏年"
Else
Print "不是閏年，是普通年份"
End If
End Sub
A.And And
B.And Or
C.Or Or
D.Or Or
33、設(shè)有下列程序
Private Sub Form_Click()
x=50
For i =1To 4
y =InputBox("請輸入一個整數(shù)")
y =Val(y)
If y Mod 5=0Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序運行后，單擊窗體，在輸入對話框中依次輸入15、24、35、46，輸出結(jié)果為( )。
A.100
B.50
C.120
D.70
34、要清除已經(jīng)在圖片框Picturel 中打印的字符串而不清除圖片框中的圖像，應(yīng)使用語句( )。
A.Picture 1.Cls
B.Picture 1.Picture =LoadPicture("")
C.Picture 1.Pi nt""
D.Picture 1.Picture""
35、下列選項中不符合良好程序設(shè)計風(fēng)格的是( )。
A.源程序要文檔化
B.數(shù)據(jù)說明的次序要規(guī)范化
C.避免濫用goto語句
D.模塊設(shè)計要保證高耦合、高內(nèi)聚
36、下列說法錯誤的是( )。
A.窗體文件的擴展名為".frm"
B.一個窗體對應(yīng)一個窗體文件
C.Visual Basic 中的一個工程只包含一個窗體
D.Visual Basic 中一個工程最多可以包含255個窗體
37、兩個或兩個以上模塊之間關(guān)聯(lián)的緊密程度稱為( )。
A.耦合度
B.內(nèi)聚度
C.復(fù)雜度
D.數(shù)據(jù)傳輸特性
38、假定在工程文件中有一個標(biāo)準(zhǔn)模塊，其中定義了如下記錄類型：
Type Books
Name As Stri ng*10
TelNum As Stri ng*20
End Type
要求在執(zhí)行事件過程Co mmand1_Click 時，在順序文件Person .txt 中寫入一條記錄。下列能夠完成該操作的事件過程是( )。
A.Private Sub Co mmand1_Click()
Di nt BAs Books
Open "c ：\Person .txt"For Output As #1
B .Name =InputBox("輸入姓名")
B .TelNum=InputBox("輸入電話號碼")
Write #1，B.Name ，B.TelNum
Close #1
End Sub
B.Private Sub Co mmand1_Click()
Di m BAs Books
Open "c ：\Person .txt"For Input As #1
B .Name =InputBox("輸入姓名")
B .TelNum=InputBox("輸入電話號碼")
Print #1，B.Name ，B.TelNum
Close #1
End Sub
C.Private Sub Co mmand1_Click()
Di m BAs Books
Open "c ：\Person .txt"For Output As #1
Name =InputBox("輸入姓名")
TelNo m=InputBox("輸入電話號碼")
Write #1，B
Close #1
End Sub
D.Private Sub Co mmand1_Click()
Di m BAs Book
Open "c ：\Person .txt"For Input As #1
Name =InputBox("輸入姓名")
TelNum-InputBox("輸入電話號碼")
Print #1，B.Name .B.TelNum
Close #1
End Sub
39、窗體上有兩個文本框Textl、Text2以及一個命令按鈕Commandl ，編寫下列程序：
Di mY As Integer
Private Sub Commandl_Click()
Di m X As Integer
x=2
Textl .Text =p2(p1(X)，Y)
Text2.Text =pl(x)
End Sub
Private Function pl(X As Integer)As Integer
x+x+y∶y =x+y
pl =x+y
End Function
Private Function p2(X As Integer ，Y As Integer)As Integer
p2=2*x+y
End Function
當(dāng)單擊1次和單擊2次命令按鈕后，文本框Text1和Text2內(nèi)的值分別為( )。
A.2 4
2 4
B.2 4
4 8
C.4 4
8 8
D.10 10
58 58
40、窗體文件的擴展名是( )。
A.bas
B.cls
C.frm
D.res
1、以下關(guān)于MsgBox 的敘述中，錯誤的是( )。
A.MsgBox 函數(shù)返回一個整數(shù)
B.通過MsgBox 函數(shù)可以設(shè)置信息框中圖標(biāo)和按鈕的類型
C.MsgBox 語句沒有返回值
D.MsgBox 函數(shù)的第二個參數(shù)是一個整數(shù)，該參數(shù)只能確定對話框中顯示的按鈕數(shù)量
2、下列操作不能向工程中添加窗體的是( )。
A.執(zhí)行"工程"菜單中的"添加窗體"命令
B.單擊工具欄中的"添加窗體"按鈕
C.右擊窗體，在彈出的菜單中選擇"添加窗體"命令
D.右擊工程資源管理器，在彈出的菜單中選擇"添加"命令，然后在下一級菜單中選擇"添加窗體"命令
3、下列選項中不屬于軟件生命周期開發(fā)階段任務(wù)的是( )。
A.軟件測試
B.概要設(shè)計
C.軟件維護
D.詳細設(shè)計
4、表達式"4+5/6*7/8 Mod 9"的值是( )。
A.4
B.5
C.6
D.7
5、數(shù)據(jù)庫系統(tǒng)的核心是( )。
A.數(shù)據(jù)模型
B.數(shù)據(jù)庫管理系統(tǒng)
C.數(shù)據(jù)庫
D.數(shù)據(jù)庫管理員
6、以下敘述中錯誤的是( )。
A.一個工程中可以包含多個窗體文件
B.在一個窗體文件中用Private 定義的通用過程能被其他窗體調(diào)用
C.在設(shè)計Visual Basic 程序時，窗體、標(biāo)準(zhǔn)模塊、類模塊等需要分別保存為不同類型的磁盤文件
D.全局變量必須在標(biāo)準(zhǔn)模塊中定義
7、下列關(guān)于過程及過程參數(shù)的描述中，錯誤的是( )。
A.過程的參數(shù)可以是控件名稱
B.調(diào)用過程時使用的實參的個數(shù)應(yīng)與過程形參的個數(shù)相同
C.只有函數(shù)過程能夠?qū)⑦^程中處理的信息返回到調(diào)用程序中
D.窗體可以作為過程的參數(shù)
8、有下列事件過程：
Private Sub Co mmand1_Click( )
b =10
Do Until b =-1
a=InputBox("請輸入a 的值")
a=Val(a)
b =InputBox("請輸入b 的值")
b =Va(b)
a=a*b
Loop
Print a
End Sub
程序運行后，依次輸入數(shù)值30，20，10，-1后，輸出結(jié)果是( )。
A.600
B.-10
C.200
D.-6000
9、支持子程序調(diào)用的數(shù)據(jù)結(jié)構(gòu)是( )。
A.棧
B.樹
C.隊列
D.二叉樹
10、對關(guān)系S和R進行集合運算，結(jié)果中既包含S中的所有元組也包含R中的所有元組，這樣的集合運算稱為( )。
A.并運算
B.交運算
C.差運算
D.積運算
11、窗體上有1個名稱為List1的列表框，其中已經(jīng)輸入了若干個項目，如圖所示;還有2個文本框，名稱分別為Text1、Text2，1個名稱為Command1的命令按鈕，并有下列事件過程。
Private Sub Co mmand1_Click()
Di mstr As Stri ng ，s As Stri ng ，k As Integer
s =Text1
str =""
For k =List1.ListCount -1To 0Step -1
If InStr(List1.List(k)，s)>0Then
str =str &List1.List(k)&""
End If
Next k
If str =""Then
Text2="沒有匹配的項目" Els
e Text2=str
End If
End Sub
程序運行時，在Text1中輸入"京"，單擊命令按鈕，則在Text2中顯示的內(nèi)容是( )。
A.京
B.北京南京
C.南京北京
D.沒有匹配的項目
12、執(zhí)行以下程序段后，變量c$的值為( )。
a$="Visual Basic Programi ng"
b$="Quick"
c$=b$&UCase(Mid$(a$，7，6))&Right$(a$，11)
A.Visual BASICProgrami ng
B.Quick Basic Programi ng
C.QUICK Basic Programi ng
D.Quick BASICProgrami ng
13、剛建立一個新的標(biāo)準(zhǔn)EXE工程后，不在工具箱中出現(xiàn)的控件是( )。
A.單選按鈕
B.圖片框
C.通用對話框
D.文本框
14、關(guān)于MDI 窗體，下列說法正確的是( )。
A.一個應(yīng)用程序可以有多個MDI 窗體
B.子窗體可以移到MDI 窗體以外
C.不可以在MDI 窗體上放置按鈕控件
D.MDI 窗體的子窗體不可以擁有菜單
15、在窗體(Name 屬性為Form1)上畫兩個文本框(其Name 屬性分別為Text1和Text2)和一個命令按鈕(Name屬性為Co mmand1)，然后編寫如下兩個事件過程：
Private Sub Co mmand1_Click()
a=Text1.Text +Text2.Text Print a
End Sub
Private Sub Form_Load()
Text1.Text ="" Text2.Text =""
End sub
程序運行后，在第一個文本框(Text1)和第二個文本框(Text2)中分別輸入123和321，然后單擊命令按鈕，則輸出結(jié)果為( )。
A.444
B.321123
C.123321
D.132231
16、在C盤當(dāng)前文件夾下建立一個名為SDat .txt 的順序文件。要求用InputBox 函數(shù)輸入5名學(xué)生的學(xué)號(StuNo)、姓名(StuName)和英語成績(StuEng)。則在下列橫線處應(yīng)填入的語句是( )。
Private Sub Form_Click()
Open "C：\SDat .txt"For Output As 1
For i =1To 5
StuNo =InputBox("請輸入學(xué)號")
StuName =InputBox("請輸入姓名")
StuEng =Val(InputBox("請輸入英語成績"))
Next i
Close #1
EndSub
A.Input #l ，StuNo ，StuName ，StuEn
B.Put #l ，StuNo ，StuName ，StuEn
C.Write #1，StuNo ，StuName ，StuEn
D.Get #1，StuNo ，StuName ，StuEn
17、目錄列表框Path 屬性所表示的含義是( )。
A.當(dāng)前驅(qū)動器或指定驅(qū)動器上的路徑
B.當(dāng)前驅(qū)動器或指定驅(qū)動器上的某目錄下的文件列表
C.根目錄下的文件列表
D.指定路徑下的文件列表
18、有下列函數(shù)過程：
Function Func2(a As Integer ，b As Integer)As Integer
Static m As Integer ，i As Integer
m=0
i =2
a=i +m+1
b =i +a+b
Func2=m
End Function
在窗體上畫一個命令按鈕，然后編寫下列事件過程：
Private Sub Co mmandl_Click()
Di m P As Integer ，k As Integer ，m As Integer
k =4
m=1
P=Func2(k ，m)
Print k ;m
P=Func2(km)
Print k =m End Sub
程序運行后，單擊命令按鈕，輸出結(jié)果是( )。
A.3 63 6
B.3 63 11
C.3 113 6
D.3 113 11
19、在設(shè)計階段，當(dāng)雙擊窗體上的某個控件時，所打開的窗口是( )。
A.工程資源管理器窗口
B.工具箱窗口
C.代碼窗口
D.屬性窗口
20、下列敘述菜單設(shè)計的語句正確的是( )。
A.菜單也是一個控件，存在于工具箱中
B.菜單也有外觀和行為的屬性
C.菜單設(shè)計在"菜單編輯器"中進行，因此它不是一個控件
D.菜單的屬性也是在"屬性窗口"中設(shè)置的
21、下列各控件不包含滾動條的控件是( )。
A.ListBox
B.Co mboBox
C.TextBox
D.Label
22、要將名為MyForm 的窗體顯示出來，正確的使用方法是( )。
A.MyForm.Show
B.Show.MyForm
C.MyForm Load
D.MyFormShow
23、在面向?qū)ο蠓椒ㄖ?，不屬?對象"基本特點的是( )。
A.一致性
B.分類性
C.多態(tài)性
D.標(biāo)識性
24、為了使列表框中的項目分為多列顯示，需要設(shè)置的屬性為( )。
A.Columns
B.Style
C.List
D.Multi Select
25、在窗體上有1個名稱為Co mmonDialog1的通用對話框和1個名稱為Co mmand1的命令按鈕，以及其他一些控件。要求在程序運行時，單擊Co mmand1按鈕，則顯示打開文件對話框，并在選擇或輸入了1個文件名后，就可以打開該文件。下列是Co mmand1_Click 事件過程的兩種算法。
算法1：
Private Sub Co mmand1_Click()
Co mmonDialogl .ShowOpen
Open Co mmonDialogl .File Name For Input As #1
End Sub
算法2：
Private Sub Co mmand1_Click()
Co mmonDialogl .ShowOpen
If Co mmonDialogl .File Name <>""Then
Open Co mmonDialogl .File Name For Input As #1
EndIf
End Sub
下列關(guān)于這兩種算法的敘述中正確的是( )。
A.顯示打開文件對話框后若未選擇或輸入任何文件名，則算法2會出錯，算法1不會
B.顯示打開文件對話框后若未選擇或輸入任何文件名，則算法1會出錯，算法2不會
C.兩種算法的執(zhí)行結(jié)果完全一樣
D.算法1允許輸入的文件名中含有空格，而算法2不允許
26、下列敘述正確的是( )
A.算法的執(zhí)行效率與數(shù)據(jù)的存儲結(jié)構(gòu)無關(guān)
B.算法的空間復(fù)雜度是指算法程序中指令(或語句)的條數(shù)
C.算法的有窮性是指算法必須能在執(zhí)行有限個步驟之后終止
D.以上3種描述都不對
27、在窗體上畫一個命令按鈕，其名稱為Commandl。程序運行后，單擊命令按鈕，輸出結(jié)果是( )。
Private Sub pl (n As Integer)
For i =n To 1Step =1
x=Stri ng(i ，"*")
Print x
Next i
End Sub
Private Sub Commandl_Click()
pl(3)
EndSub
A.***
**
*
B.***
***
C.*
*
*
D.******
28、在窗體上畫一個名稱為Co mmand1的命令按鈕，并編寫以下程序：
Private Sub Co mmand1_Click()
Di mn %，b ，t
t =1：b =1：n =2
Do
b =b*n
t =t +b
n =n +1
Loop Until n >9
Print t
End Sub
此程序計算并輸出一個表達式的值，該表達式是( )。
A.9!
B.10!
C.1!+2!+…+9!
D.1!+2!+…+10!
29、在用通用對話框控件建立"保存"文件對話框時，如果需要指定文件列表框所列出的文件類型是文本文件(即.txt 文件)，則正確的描述格式是( )。
A."text (.txt)|(*.txt)"
B."文本文件(.txt)|(.txt)"
C."text(.txt)||(*.txt)"
D."text(.txt)(*.txt)"
30、有三個關(guān)系R、S 和T 如下：
由關(guān)系R 和S 通過運算得到關(guān)系T，則所使用的運算為( )。
A.笛卡兒積
B.交
C.并
D.自然連接
31、對長度為n 的線性表進行順序查找，在最壞情況下所需要的比較次數(shù)為( )。
A.log2n
B.n/2
C.n
D.n+1
32、下列程序要求用戶輸入一個年份，并能夠判斷用戶輸入的年份是否是閏年，橫線處應(yīng)填( )。
Sub EnSure( )
Di myear As Integer
year =Val(InputBox("請輸入年份："))
If(year Mod 4=0_________year Mod 100<>0)
________(year Mod 400=0)Then
Print "您輸入的是閏年"
Else
Print "不是閏年，是普通年份"
End If
End Sub
A.And And
B.And Or
C.Or Or
D.Or Or
33、設(shè)有下列程序
Private Sub Form_Click()
x=50
For i =1To 4
y =InputBox("請輸入一個整數(shù)")
y =Val(y)
If y Mod 5=0Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序運行后，單擊窗體，在輸入對話框中依次輸入15、24、35、46，輸出結(jié)果為( )。
A.100
B.50
C.120
D.70
34、要清除已經(jīng)在圖片框Picturel 中打印的字符串而不清除圖片框中的圖像，應(yīng)使用語句( )。
A.Picture 1.Cls
B.Picture 1.Picture =LoadPicture("")
C.Picture 1.Pi nt""
D.Picture 1.Picture""
35、下列選項中不符合良好程序設(shè)計風(fēng)格的是( )。
A.源程序要文檔化
B.數(shù)據(jù)說明的次序要規(guī)范化
C.避免濫用goto語句
D.模塊設(shè)計要保證高耦合、高內(nèi)聚
36、下列說法錯誤的是( )。
A.窗體文件的擴展名為".frm"
B.一個窗體對應(yīng)一個窗體文件
C.Visual Basic 中的一個工程只包含一個窗體
D.Visual Basic 中一個工程最多可以包含255個窗體
37、兩個或兩個以上模塊之間關(guān)聯(lián)的緊密程度稱為( )。
A.耦合度
B.內(nèi)聚度
C.復(fù)雜度
D.數(shù)據(jù)傳輸特性
38、假定在工程文件中有一個標(biāo)準(zhǔn)模塊，其中定義了如下記錄類型：
Type Books
Name As Stri ng*10
TelNum As Stri ng*20
End Type
要求在執(zhí)行事件過程Co mmand1_Click 時，在順序文件Person .txt 中寫入一條記錄。下列能夠完成該操作的事件過程是( )。
A.Private Sub Co mmand1_Click()
Di nt BAs Books
Open "c ：\Person .txt"For Output As #1
B .Name =InputBox("輸入姓名")
B .TelNum=InputBox("輸入電話號碼")
Write #1，B.Name ，B.TelNum
Close #1
End Sub
B.Private Sub Co mmand1_Click()
Di m BAs Books
Open "c ：\Person .txt"For Input As #1
B .Name =InputBox("輸入姓名")
B .TelNum=InputBox("輸入電話號碼")
Print #1，B.Name ，B.TelNum
Close #1
End Sub
C.Private Sub Co mmand1_Click()
Di m BAs Books
Open "c ：\Person .txt"For Output As #1
Name =InputBox("輸入姓名")
TelNo m=InputBox("輸入電話號碼")
Write #1，B
Close #1
End Sub
D.Private Sub Co mmand1_Click()
Di m BAs Book
Open "c ：\Person .txt"For Input As #1
Name =InputBox("輸入姓名")
TelNum-InputBox("輸入電話號碼")
Print #1，B.Name .B.TelNum
Close #1
End Sub
39、窗體上有兩個文本框Textl、Text2以及一個命令按鈕Commandl ，編寫下列程序：
Di mY As Integer
Private Sub Commandl_Click()
Di m X As Integer
x=2
Textl .Text =p2(p1(X)，Y)
Text2.Text =pl(x)
End Sub
Private Function pl(X As Integer)As Integer
x+x+y∶y =x+y
pl =x+y
End Function
Private Function p2(X As Integer ，Y As Integer)As Integer
p2=2*x+y
End Function
當(dāng)單擊1次和單擊2次命令按鈕后，文本框Text1和Text2內(nèi)的值分別為( )。
A.2 4
2 4
B.2 4
4 8
C.4 4
8 8
D.10 10
58 58
40、窗體文件的擴展名是( )。
A.bas
B.cls
C.frm
D.res