第一篇：VB期末考試試卷及答案
VB期末考試試卷及答案
一·選擇題
1.Visual Basic是一種面向對象的程序設計語言，構成對象的三要素是（B）
A屬性、控件和方法
B屬性、事件和方法 C窗體、控件和過程 D控件、過程和模塊
2.所有控件都有一個共同的屬性，這個屬性是（C）
A text
B font
C name
D caption
3.下列敘述中錯誤的是（A）
A 工程文件擴展名是.vbg
B 標準模塊文件的擴展名是.bas
C 窗體模塊的擴展名是.frm
D 類模塊的擴展名是.cls
4.當要編寫一個新的Visual Basic程序時，所做的第一件事是（A）
A 新建一個工程
B 編寫代碼
C 設置屬性
D 添加Active X控件
5.下面控件中，沒有caption屬性的是（B）
A 框架
B 組合框
C 命令按鈕
D 復選按鈕
6.在文件框中輸入字符時，若只顯示某個字符，如（*），應設置屬性是（B）
A MultiLine
B PasswordChar
C Text
D selText
7.若要將窗體從內存中卸載出去，其實現的方法是（D）
A Show
B Hide
C Load
D UnLoad
8.下列關于過程敘述不正確的是（D）
A 過程的傳值調用是將實參的具體值傳值傳遞給形參
B 過程的傳址調用是將實參在內存的地址 傳遞給形參
C 過程的傳值調用參數是單向傳遞的，過程的傳址調用參數是雙向傳遞的D 無論過程傳值調用還是傳地址調用，參數傳遞都是雙向的
9.某人創建1個工程，其中的窗體名為Form1，之后又添加了1個名為Form2的窗體，并希望程序執行時先顯示Form2窗體，那么，他需要做的工作是（C）
A 在Form1的Load事件過程中加入語句Load Form2
B 在Form2的Load事件過程中加入語句Form2.Show
C 在“過程屬性”對話框中把“啟動對象”設置為Form2
D 在Form2的TabIndex屬性設置為1，把Form1的TabIndex屬性設置為2
10.以下關于文件的敘述中，正確的是（B）
A 以Output方式打開一個不存在的文件時，系統將顯示出錯信息
B 以Append方式打開的文件，既可以進行讀操作，也可以進行寫操作
C 在隨機文件在，每個記錄的長度是固定的
D 無論是順序文件還是隨機文件，其打開的語句和打開的方式都是完全相同的 11.設a=6，b=8，c=10 則函數IIf(a A 10 B 6 C 8 D 12 12.下面程序的執行結果為（B） I=”1” : j=”2” I=val(i)+val(j) J=val(“12”) If i<>j Then print i-j Else printj-i A 9 B-9 C 12 D 0 13.下面程序的執行結果為（A） Dim S(10)AS Integer For i=0 to 10 S(I)=2*i Next i Print S(S(3)) A 12 B 6 C 0 D 4 二·程序填空題： 1.在窗體上畫一個命令按鈕（Command1）和一個標簽（Label1），為命令按鈕編寫以下事件，其功能是求數組中各元素之和，并將結果在標簽上顯示，請在指定位置填上正確代碼將程序補充完整。 Option Base 1 Private Sub Command1_Click() Dim a(3,2)AS Integer S =0 For i= 1 to 3 For j= 1 to 2 a(I,j)= i+j s= 【1】 Next j Next i 【2】 End Sub 2.下面程序的功能是產生10個小于100（不含100）的隨機正整數，并統計其中 5的倍數所占比例，請在指定位置填上正確代碼將程序補充完整。 Private Sub Command1_Click() Randomise Dim a(10)As Integer For j =1 to 10 a(i)= 【3】 If 【4】 Then k= k+1 Print a(j) Next j Print Print k /10 End Sub 3.以下程序運行后，在Text1中輸入任意字符串，單擊命令按鈕，將Text1中的字符串轉換為大寫，再將字符串逆置（如ABCD--DCBA），在Text2中顯示逆置后的字符串。請在指定位置填上正確代碼將程序補充完整。 Private Sub Command1_Click() St = Ucase(Text1.text) For i= 【5】 To 1 Step-1 S2= s2+Mid(s1, 【6】, 1) Text2.text= s2 End Sub 4.Next i設有如下的循環，要求程序運行時執行3次循環，請在指定位置填上正確代碼將程序補充完整。 Dim x As Integer X = 1 Do x = x+2 Print x Loop Until 【7】 5.在窗體上畫一個組合框（Combo1）、一個列表框（List1）和一個命令按鈕（Command1）。下面程序的功能是在組合框中選擇一個大學名稱，單擊命令按鈕，則所選大學 名稱將添加在列表框中，當組合框中沒有要選的大學名稱時，輸入一個名稱，則此大學名稱在添加列表框中的同時也會添加到組合框中，請在指定位置填上正確代碼將程序補充完整。 Private Sub Form_Load() Combo1.AddItem”交通大學” Combo1.AddItem”理工大學” Combo1.AddItem”財經大學” Combo1.AddItem”外貿大學” End Sub Private Sub Command1_Click() 【8】 Flag=Flase For i=0 to 【9】 If Combo1.List(i)=Combo1.Text Then flag=True : Eixt For End If Next i If Not flag Then 【10】 End Sub 6.下面程序的功能是對數組的元素值用選擇法按遞增順序排序，請在指定位置填上正確代碼將程序補充完整。 Private Sub Command1_Click() Dim ia(),i%,max%,imax%.t% Ia=Array(3,8,5,6,7,4,9) For i =0 To 5 : imax = i For j = i+1 To 6 If 【11】 Then imax =j Next j T=ia(i) : 【12】 : ia(imax)=t Next i For i=0 To 6 : Print ia(i) : Next i End Sub 7.窗體上有名稱為Command1的命令按鈕及名稱為Text1、能顯示多行文本的文本框。程序運行后，如果單擊命令按鈕，則可打開磁盤文件c:test.txt，并將文件中的內容（多行文本）顯示在文本框中。下面是實現此功能的程序，請在指定位置填上正確代碼將程序補充完整。 Private Sub Command1_Click() Text1=”” Open”c:test.txt” For Input As #1 Do While Not 【13】 Line Input#1,S Text1.text=Text1.text+ 【14】 +chr(13)+chr(10) Loop 【15】 End Sub 答案： 1.S+a(I,j) 2.Label1 0 = S 3.Int(Rnd*99) 4.a(i)mod 5=0 5.Len(S1) 6.i 7.x=7 8.List1.AddItem Combo1.text 9.3/ListCount 10.Combo1.AddItem Combo1.text 11.a(j)>imax 12.ia(i)=ia(imax) 13.Eof 14.S 15.Close #1 三·閱讀程序，在答題紙指定位置寫出程序運行結果。 1.以下程序運行后，單擊命令按鈕，寫出程序的運行結果。 Private Sub Command1_Click() Dim n%,b,t t =1 : b =1 : n =2 Do While n<=4 If b > 1 Then Exit Do b = b*n : t = t+b : n = n+1 Loop Print “t=”& t End Sub 2.在窗體中添加一個命令按鈕Command1，并編寫如下程序： Private Sub Command1_Click() X =InputBox(x) If x^2<=9 Then y= 1/x If x^2>9 Then y= x^2+1 If(x^2)-7=9 Then y=x Print “y=”&y End Sub 程序運行后，在InputBox中輸入4，單擊命令按鈕，寫出程序的運行結果。3.窗體上畫一個命令按鈕，并編寫以下事件過程和子過程： Private Sub Command1_Click() Dim x As Integer, y As Integer x =12 : y = 20 Call Value(x,y) Print “x=”&x, “y=”&y End Sub Private Sub Value(ByVal m As Integer, n As Integer) m=m*2 ： ｎ=n-5 End Sub 程序運行后，單擊命令按鈕，寫出程序的輸出結果。 4.窗體上畫一個命令按鈕和一個圖像框，并編寫以下事件過程： Private Sub Command1_Click() Dim a(3,3) For m =1To3 For n= 1 To 3 If n = m Or n = 4 –m Then a(m,n)=m+n Else a(m,n)=0 End If Picture1.Print a(m,n) Next n Picture1.Print Next m End Sub 程序運行后，單擊命令按鈕，圖像框中顯示的內容是什么? 5.在窗體上畫一個列表框和一個命令按鈕Command1，然后編寫如下程序： Private Sub Command1_Click() List1.RemoveItem1 List1.RemoveItem2 End Sub Private Sub Form_Load() List1.AddItem”蘭州” List1.AddItem”甘肅” List1.AddItem”交通” List1.AddItem”大學” End Sub 程序運行后，單擊命令按鈕，寫出在列表框中顯示的結果。 答案： 1.3 2.4 3.12；15 4.2 0 4；0 4 0；4 0 6 5蘭州；大學 四·編寫程序：輸出（1,100）之間同時被5和7整除的數的個數及其它們的和。 答案：Private Sub Form1_Click() Dim s%,c% For i=1 to 100 If i Mod 5=0 And i Mod 7=0 Then s = s+1 c = c +i End If Next i Print s, c End Sub 30104.下列敘述錯誤的是（）。 (A)VB應用程序沒有明顯的開始和結束語句 (B)VB控件的所有屬性值均可在屬性窗口中設置(C)VB是事件驅動型可視化編程工具 (D)VB通過“工具”菜單的“選項”設置代碼編輯窗口的字體大小(答案：B)30105.標準模塊文件的擴展名是（）。 (A).cls(B).frm(C).bas(D).rec(答案：C)30106.下列敘述錯誤是（）。 (A)打開一個工程文件，系統自動裝入與該工程有關的文件 (B)保存VB程序時，應分別保存窗體和工程文件(C)事件可以由用戶觸發，也可以由系統觸發(D)VB應用程序只能以解釋方式執行(答案：D)30108.下列敘述錯誤的是（）。 (A)VB是可視化程序設計語言(B)VB采用事件驅動編程機制 (C)VB是面向過程的程序設計語言(D)VB應用程序可以以編譯方式執行(答案：C)30109.下列敘述正確的是（）。 (A)VB的事件由用戶定義(B)VB程序以順序方式執行 (C)VB程序從Main()函數開始執行(D)VB運行時，總是等待事件的發生(答案：D)30201.下列為整型變量的是（）。 (A)x!(B)x#(C)x%(D)x$(答案：C) 30202.設有語句組： Dim S1 As String*5 S1 = “VB Test” 則S1的值為（）。 (A)VB Test(B)VB Te(C)VBTes(D)BTest(答案：B) 30203.下列（）是合法的變量名。 (A)x_y(B)x-y(C)2x(D)and(答案：A) 30204.下列（）為單精度變量。 (A)x!(B)x#(C)x%(D)x$(答案：A) 30205.由（）關鍵字聲明的局部變量在整個程序運行時一直存在。 (A)Dim(B)Public(C)Static(D)Private(答案：C) 30206.定義變量時如不指定類型，該變量為（）變量。 (A)Integer(B)String(C)Variant(D)Single(答案：C) 30208.下列（）是合法的變量名。 (A)x%y(B)xy%(C)2x(D)Or(答案：B) 30209.日期常量用（）作為界定符。 (A)“(B)%(C)#(D)&(答案：C) 30304.設a=6，b=5，c=-2；執行語句Print a > b > c后，窗體上顯示的是（）。 (A)1(B)True(C)False(D)出錯信息(答案：B) 30305.下列表達式中，值最大的是（）。 (A)2 3(B)2 / 3(C)2 mod 3(D)3 mod 2(答案：C) 30306.下列運算符中，優先級最低的是（）。 (A)*(B)^(C)/(D)(答案：D) 30307.表達式 2 = 3 < 1 的是（）。 (A)0(B)1(C)True(D)False(答案：C) 30308.x大于0且小于10的VB表達式是（）。 (A)0 < x < 10(B)x> 0 And x < 10(C)x> 0 Or x < 10(D)x> 0 : x < 10(答案：B) 30309.判斷整型變量x是奇數的表達式是（）。 (A)x Mod 2 <> 0(B)x Mod 2!= 0(C)x Mod 2 ≠ 0(D)x Mod 2 ＝ 0(答案：A) 30401.返回值為數值的函數是（）。 (A)Mid(B)Instr(C)Left(D)Rtrim(答案：B) 30402.表達式Len(”AB52“)的值是（）。(A)0(B)4(C)6(D)8(答案：B)30404.返回值為字符串的函數是（）。 (A)Str(B)Val(C)Len(D)Asc(答案：A)30405.當x=0時，函數IIf(x > 0, 1, IIf(x < 0,-1, 0))的返回值是（）。(A)0(B)1(C)-1(D)出錯 (答案：A)30407.如果Sgn(x)的值為-1，整型變量x的值是（）。(A)0(B)整數 (C)正整數 (D)負整數(答案：D)30409.除去字符串左側空格的函數是（）。 (A)Left()(B)Trim()(C)Ltrim()(D)LeftTrim()(答案：C)30502.下列語句不合法的是（）。 (A)x = 1 : y=2 (B)?x;y;(C)?x , y ,(D)x = 1;y = 2(答案：D)30503.如果VB語句超過一行，可以使用空格加（）續行。 (A)y If xx Then z = x + y If x + y > z30 If a = b And b > c Then c = a + b Print a, b, c End Sub 運行時，單擊按鈕，窗體輸出的結果是（）。(A)80 50 30(B)80 30 30(C)50 30 80(D)50 30 30(答案：B)31505.執行下列程序段后，x的值是（）。n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i< n(A)10(B)15(C)24(D)120(答案：C)31509.如果x小于y的平方，則在窗體上輸出”OK“。完成該要求的單行條件語句是（）。(A)If x < y ^ 2 Then ”OK“(B)If x < y ^ 2 Then Show ”OK“(C)If x < y ^ 2 Then Print ”OK“(D)If x < y ^ 2 Then Put ”OK“(答案：C)31602.閱讀下列程序段： x = 0 For i = 1 To 4 For j = 1 Toi x = x + 1 Next j, i 執行以上循環后，x 的值為（）。(A)6(B)9(C)10(D)16(答案：C)31604.執行下列程序段后輸出的結果是（）。s = 1 For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s;Next I(A)1 2(B)2 1(C)2 2 12(D)1 2 12(答案：D)31605.閱讀下列程序段： m = 0 For i = 1 To 3 For j = 1 Toi m = m + j Next j, i 執行以上的循環后，i和m的值分別為（）。(A)3 6(B)3 10(C)4 6(D)4 10(答案：D)31606.運行下列程序段，其中“n=n+1”語句被執行的次數是（）。Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next(A)3(B)6(C)9(D)18(答案：B)31701.在通用聲明中給出Option Base 1語句，則數組a包含（）個元素。Dim a(3,-2 To 1, 5)(A)120(B)75(C)60(D)13(答案：C)31704.如下數組聲明語句中數組a包含的元素個數為（）。Dim a(3,-2 To 1, 5)(A)96(B)75(C)60(D)13(答案：A)31706.運行下列程序，單擊窗體后輸出的結果是（）。Private Sub Form_Click()Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6)s = 1 For i = 5 To 1 Step-2 s = s * a(i)Next i Print s End Sub(A)15(B)48(C)120(D)720(答案：B)1．工程文件的擴展名為。 A、.frx B、.bas C、.vbp D、.frm 2．以下4個選項中，屬性窗口未包含的是。 A、對象列表 B、工具箱 C、屬性列表 D、信息欄 3．下列不屬于對象的基本特征的是。A、屬性 B、方法 C、事件 D、函數 4．在設計模式雙擊窗體中的對象后，Visual Basic將顯示的窗口是。A、項目（工程）窗口 B、工具箱 C、代碼窗口 D、屬性窗口 5．Visual Basic中“程序運行”允許使用的快捷鍵是。A、F2 B、F5 C、Alt+F3 D、F8 6．改變控件在窗體中的上下位置應修改該控件的屬性。A、Top B、Left C、Width D、Right 7．窗體模塊的擴展名為。 A、.exe B、.bas C、.frx D、.frm 8．窗體的FontName屬性的缺省值是。A、宋體 B、仿宋體 C、楷體 D、黑體 9．FontSize屬性用以設置字體大小，窗體的FontSize屬性缺省值為。A、5 B、9 C、12 D、16 10．在Visual Basic中，稱對象的數據為。A、屬性 B、方法 C、事件 D、封裝 11．下列選項中不屬于事件的是。 A、Dblclick B、Load C、Show D、KeyUp 12．將Visual Basic編制的程序保存在磁盤上，至少會產生何種文件。A、.doc與.txt B、.com與.exe C、.bat與.frm D、.vbp與.frm 1．Integer類型數據能夠表示的最大整數為。A、275 B、215-1 C、216 D、216-1 2．貨幣類型數據小數點后面的有效位數最多只有。A、1位 B、6位 C、16位 D、4位 3．輸入對話框InputBox的返回值的類型是。A、字符串 B、整數 C、浮點數 D、長整數 4．運算符“”兩邊的操作數若類型不同，則先再運算。A、取整為Byte類型 B、取整為Integer類型 C、四舍五入為整型 D、四舍五入為Byte類型 5．Int(Rnd * 100)表示的是范圍內的整數。A、[0，100] B、[1，99] C、[0，99] D、[1，100] 6．下列程序段的輸出結果是。 a=10: b=10000: x=log(b)/log(a): Print ”lg(10000)=“;x A、lg(10000)=5 B、lg(10000)=4 C、4 D、5 7．返回刪除字符串前導和尾隨空格符后的字符串，用函數。 A、Trim B、Ltrim C、Rtrim D、mid 8．Print語句的一個輸出表達式為，則輸出包括日期、時間信息。A、Date B、Month C、Time D、Now 9.語句Print ”5*5“ 的顯示結果是。 A、25 B、”5*5“ C、5*5 D、出現錯誤提示 10．語句“Form1.Print Tab(10);”#“”的作用是在窗體當前輸出行。A、第10列輸出字符“#” B、第9列輸出字符“#” C、第11列輸出字符“#” D、輸出10個字符“#” 1．下列關于Select Case之測試表達式的敘述中，錯誤的是。 A、只能是變量名 B、可以是整型 C、可以是字符型 D、可以是浮點類型 2．下列關于Select Case的敘述中，錯誤的是。 A、Case 10 To 100 表示判斷Is是否介于10與100之間 B、Case ”abc“,”ABC“ 表示判斷Is是否和”abc“、”ABC“兩個字符串中的一個相同 C、Case ”X“ 表示判斷Is是否為大寫字母X D、Case-7,0,100 表示判斷Is是否等于字符串”-7，0，100“ 3．由“For i=1 To 16Step 3”決定的循環結構被執行（）次。A、4 B、5 C、6 D、7 4．若i的初值為8，則下列循環語句的循環次數為次。 Do While i<=17 i=i+2 Loop A、3次 B、4次 C、5次 D、6次 5．由“For i=1 To 9Step-3”決定的循環結構被執行次。A、4 B、5 C、6 D、0 6．窗體通用部分的語句“OptionBase 1”，決定本窗體中數組下標界。A、下界必須為1 B、缺省的下界為1 C、下界必須為0 D、缺省的下界為0 1．標簽控件的標題和文本框控件的顯示文本的對齊方式由屬性來決定。A、WordWrap B、AutoSize C、Alignment D、Style 2．將命令按鈕Command1設置為窗體的取消按鈕，可修改該控件的屬性。A、Enabled B、Value C、Default D、Cancel 3．下列屬性用來表示標簽或窗體的標題。 A、Text B、Caption C、Left D、Name 4．將焦點主動設置到指定的控件或窗體上，應采用方法。A、SetDate B、SetFocus C、SetText D、GetGata 5．按Tab鍵時，焦點在各個控件之間移動的順序是由屬性來決定的。A、Index B、TabIndex C、TabStop D、SetFocus 6．下列屬性用來表示各對象（控件）的位置。 A、Text B、Caption C、Left D、Name 7．當文本框的屬性設置為True時，在運行時文本框不能編輯。A、Enabled B、Locked C、Visible D、MultiLine 8．要使文本框顯示滾動條，除了設置ScrollBars屬性外還必須設置屬性。A、AutoSize B、MultiLine C、Alignment D、Visible 9．文本框控件Text4的Text屬性默認值為。 A、Text4 B、”Text4“ C、Locked D、Name 10．文本框中選定的內容，由下列屬性來反映。 A、SelText B、SelLength C、Text D、Caption 11．選中復選框控件時，Value屬性的值為。 A、True B、False C、0 D、1 12．要使復選框控件不響應Click事件，可設置復選框的屬性。A、Appearance B、Style C、Enabled D、TabIndex 13．若要在同一窗體中安排兩組單選鈕，可用控件予以分隔。A、文本框 B、框架 C、列表框 D、組合框 14．列表框的屬性返回或設置列表框中各列表項的文本。A、Selected B、List C、Text D、Caption 15．List1.Clear中的Clear是。 A、方法 B、對象 C、屬性 D、事件 16．以下語句將刪除列表框List1中的最后一項。A、List1.RemoveItem List1.ListCount B、List1.Clear C、List1.List(List1.ListCount-1)= ”“ D、List1.RemoveItem List1.ListCount-1 17．若要把”XXX“添加到列表框List1中的第三項，則可執行語句。A、List1.AddItem ”XXX“, 3 B、List1.AddItem ”XXX“, 2 C、List1.AddItem 3,”XXX“ D、List1.AddItem 2,”XXX" 18．滾動條的屬性用于指定用戶單擊滾動條的滾動箭頭時，Value屬性值的改變量。A、LargeChange B、SmallChange C、Value D、Change 19．單擊滾動條兩端的任意一個滾動箭頭，將觸發該滾動條的事件。A、KeyDown B、Change C、Scroll D、Click 20．設計動畫時通常用定時器控件屬性來控制動畫速度。A、Interval B、Timer C、Move D、Enabled 1．對畫出的圖形進行填充，應使用屬性。A、BackStyle B、FillColor C、FillStyle D、BorderStyle 2．將圖片框的屬性設置成True時，可使圖片框根據圖片調整大小。A、Picture B、AutoSize C、Stretch D、AutoRedraw 3．可以改變坐標的單位。 A、DrawStyle屬性 B、Cls方法 C、ScaleMode屬性 D、DrawWidth屬性 4．Visual Basic用以下哪一條指令來繪制直線。A、Line方法 B、Pset方法 C、Point屬性 D、Circle方法 5．Visual Basic可以用以下哪一條屬性來設置邊框類型。A、BorderStyle B、BorderWidth C、DrawWidth D、FillColor 6．屬性可以用來設置所繪線條寬度。A、DrawStyle B、BorderStyle C、DrawWidth D、FillColor 7．下列是用來畫圓、圓弧及橢圓的。A、Circle方法 B、Pset方法 C、Line屬性 D、Point屬性 8．描述以（1000，1000）為圓心、以400為半徑畫1/4圓弧的語句，以下正確的是。A、Circle(1000,1000),400,0,3.1415926/2 B、Circle(1000,1000)，400,0,3.1415926/2 C、Circle(1000,1000),400，0,3.1415926/2 D、Circle(1000,1000),400，0,90 9．語句“Circle(1000,1000),800，-3.1415926/3,-3.1415926/2”繪制的是。A、弧 B、橢圓 C、扇形 D、同心圓 10．語句“Circle(1000,1000),800，，2”繪制的是。A、弧 B、橢圓 C、扇形 D、同心圓 11．上題Circle語句中最后的2表示的是。 A、橢圓的縱軸和橫軸長度比 B、橢圓的橫軸和縱軸長度比 C、同心圓的半徑比 D、圓弧兩半徑間的夾角 12．RGB函數中的3個數字分別表示。A、紅、綠、白 B、紅、綠、藍 C、色調、飽和度、亮度 D、當前色、背景色、前景色 13．當Stretch屬性值為False時。 A、圖片大小隨影像框的大小進行調整 B、影像框的大小隨圖片大小進行調整 C、圖片框的大小隨圖片大小進行調整 D、圖片大小隨圖片框的大小進行調整 14．BorderStyle屬性是用來表示線條的。A、長度 B、寬度 C、線形 D、顏色 15．在Visual Basic中，不能作為其他控件的容器。A、框架 B、圖片框 C、影像框 D、窗體 VB試題及答案 一、基本概念及基本操作 1、如果要向工具箱中加入控件和部件，可以利用“工程”菜單中的______命令。 A、引用 B、部件 C、工程屬性 D、添加窗體 2、VB一共有設計、運行和中斷三種模式，要使用調試工具應該______。 A、進入設計模式 B、進入運行模式 C、進入中斷模式 D、不用進入任何模式 3、系統符號常量的定義可以通過______獲得。 A、對象瀏覽器 B、代碼窗口 C、屬性窗口 D、工具箱 4、在設計階段，當雙擊窗體上的某個控件時，所打開的窗口是______。 A、工程資源管理器窗口 B、工具箱窗口 C、代碼窗口 D、屬性窗口 5、以下敘述中錯誤的是______。 A、用Shell函數可以調用能夠在Windows下運行的程序 B、用Shell函數可以調用可執行文件，也可調用Visual Basic 的內部函數 C、調用Shell函數的格式應為：<變量名>=Shell(......)D、用Shell函數不能執行DOS命令 6、以下敘述中錯誤的是______。 A、在工程資源管理器窗口中只能包含一個工程文件及屬于該工程的其他文件 B、以.BAS為擴展名的文件是標準模塊文件 C、窗體文件包含該窗體及其控件的屬性 D、一個工程中可以含有多個標準模塊文件 以下不屬于Visual Basic系統的文件類型是______。 A、.frm B、.bat C、.vbg D、.vbp 7、VB中窗體文件的擴展名是______。 A、VBP B、FRM C、VBW D、PDM 8、以下敘述中錯誤的是______。 A、打開一個工程文件時，系統自動裝入與該工程有關的窗體、標準模塊等文件 B、保存Visual Basic程序時，應分別保存窗體文件及工程文件 C、Visual Basic應用程序只能以解釋方式執行 D、事件可以由用戶引發，也可以由系統引發 9、以下敘述中錯誤的是______。 A、一個工程可以包括多種類型的文件 B、Visual Basic應用程序既能以編譯方式執行，也能以解釋方式執行 C、程序運行后，在內存中只能駐留一個窗體 D、對于事件驅動型應用程序，每次運行時的執行順序可以不一樣 10、在Visual Basic工程中，可以作為“啟動對象”的程序是______。 A、任何窗體或標準模塊 B、任何窗體或過程 C、Sub Main過程或其他任何模塊 D、Sub Main過程或任何窗體 11、假定一個Visual Basic應用程序由一個窗體模塊和一個標準模塊構成。為了保存該應用程序，以下正確的操作是。 A、只保存窗體模塊文件 B、分別保存窗體模塊、標準模塊和工程文件 C、只保存窗體模塊和標準模塊文件 D、只保存工程文件 12、以下敘述中錯誤的是______。 A、打開一個工程文件時，系統自動裝入與該工程有關的窗體、標準模塊等文件 B、當程序運行時，雙擊一個窗體，則觸發該窗體的DblClick事件 C、Visual Basic應用程序只能以解釋方式執行 D、事件可以由用戶引發，也可以由系統引發 13、要顯示當前過程中的所有變量及對象的取值，可以利用______窗口。 A、監視 B、調用堆棧 C、立即 D、本地 14、當我們輸入代碼時，Visual Basic可以自動檢測______錯誤。A、語法錯誤 B、編譯錯誤 C、運行錯誤 D、邏輯錯誤 15、Microsoft Visual Basic 6.0包括三種版本，其中不包括______。 A、通用版 B、企業版 C、學習版 D、專業版 16、Visual Basic窗體設計器的主要功能是：______。 A、建立用戶界面 B、編寫源程序代碼 C、畫圖 D、顯示文字 17、以下關于Visual Basic特點敘述中，錯誤的是______。 A、Visual Basic是采用事件驅動編程機制的語言 B、Visual Basic程序既可以編譯運行，也可以解釋運行 C、構成Visual Basic程序的多個過程沒有固定的執行順序 D、Visual Basic程序不是結構化程序，不具備結構化程序的三種基本結構 18、以下敘述中，錯誤的是______。 A、一個Visual Basic應用程序可以含有多個標準模塊文件 B、一個Visual Basic工程可以含有多個窗體文件 C、標準模塊文件可以屬于某個指定的窗體文件 D、標準模塊文件的擴展名是.bas 19、以下敘述中錯誤的是______。A、打開一個工程文件時，系統自動裝入與該工程有關的窗體文件 B、保存Visual Basic程序時，應分別保存窗體文件及工程文件 C、Visual BaSic應用程序只能以解釋方式執行 D、窗體文件包含該窗體及其控件的屬性 vb練習題1 VB練習題一 一、選擇題 1．Visual Basic程序設計的主要的步驟是C A、可視性程序設計 B、代碼程序設計 C、可視性程序設計和代碼程序設計 D、界面設計 2．窗體能響應的事件是C A、ActiveFrom B、Drive C、Load D、Change 3．獲得系統時間的函數是B A、data$ B.time$ C.date$ D.gettime$ 4．在設計一個計算器時，必須要使用的控件是C A、滾動條 B、圖片框 C、文本框 D、單選框 5．下列運算符號中屬于關系運算符的是_____。B A、— B、= C、AND D、+ 6.Visual Basic規定工程文件的擴展名是C A、.for B、.frm C、.vbp D、.bas 7.OOP是面向_______的程序設計的簡稱。C A、用戶 B、問題 C、對象 D、操作者 8.設置對象中的字體應用___屬性.C A、Caption B、Name C、Font D、Text 9.設置文本框中顯示的內容應用___屬性。D A、Caption B、Name C、Font D、Text 10.邏輯型又稱_____。C A、數值型 B、字符串型 C、布爾型 D、整型 11.三種邏輯運算符號優先次序為：____。C A、AND、NOT、OR B、NOT、OR、AND C、NOT、AND、OR D、OR、NOT、AND 12.關于高級語言，下列那一項敘述是正確的。(A)A、以類似英文的句子來表示? B、寫成的程序執行速度最快 ? C、不必編譯即可直接執行? D、受電腦機種限制大 13.可將高級語言翻譯成機器語言的程序為。B A、匯編程序 B、編譯程序 C、解釋程序 4、以上皆可。14.下列（）屬性是每個控件都有的。A A、名稱 B、Caption C、Font D、Interval 15.下列運算符號中屬于邏輯運算符的是_____。A A、NOT B、<> C、= D、<= 16.如果要求設置定時器時間間隔為0.5秒鐘，那么它的Interval屬性值應該等于：B A、5000 B、500 C、50 D、5 17.下列邏輯運算結果為―true‖的是（）C A、flase or not true B、flase and not true C、true or not true D、true and not true 18.已知變量x、y為整數型，且x=4 , y=12 ,s為字符串型，且s=―a‖，Label1為標簽控件，下列賦值語句合法的是（）A A、s = Label1.Caption B、Label1.Caption=s=x C、x*3=y D、Y=x*s 19.下列關于CommandButton 控件的敘述正確的是（）A A、CommandButton 控件的Caption 屬性決定按鈕上顯示的內容 B、單擊VB應用程序中的按鈕,則系統激活按鈕控件對應的Change 事件 C、CommandButton 控件的name 屬性決定按鈕上顯示的內容 D、以上都不對 20.一只漂亮的酒杯被摔碎了，則漂亮，酒杯，摔，碎了是()。D A、對象，屬性，事件，方法 B、對象，屬性，方法，事件 C、屬性，對象，方法，事件 D、屬性，對象，事件，方法 21.獲得系統時間的函數是B A、data$ B、time$ C、date$ D、gettime$ 22.下列關于添加―控件‖的方法正確的是（）B A、單擊控件圖標，將指針移到窗體上，雙擊鼠標 B、雙擊工具箱中的控件，即在窗體上出現該控件 C、單擊工具箱中的控件，將指針移到窗體上，再單擊 D、用鼠標左鍵拖動工具箱中的某控件到窗體的適當位置 23.雙擊窗體中的對象后，Visual Basic將顯示的窗口是C A、項目（工程）窗口 B、工具箱 C、代碼窗口 D、屬性窗口 24.下列關于For …next 語句的說法正確的是（）A A、循環變量、初值、終值和步長都必須為數值型 B、step后的步長只為正數 C、初值必須小于終值 D、初值必須大于終值 25.存文件時，整個工程以_____（工程文件）儲存。C A、*．Prg B、*．Frm C、*．Vbp D、*．Exe 26.清除圖片框(Picture1)中內容的方法是_____。B A、Picture1．Clear B、Picture1．Cls C、Picture1．Delete D、Picture1．UnLoad 27.以下變量Test定義語句正確的是：B A、Dim Test，as Integer B、Dim Test as Integer C、Dim Test =Integer D、Dim Test as Integer，28.在Visual Basic中，字符型變量用來_____。B A、存放日期、時間或同時存儲以上兩種數據。 B、存放人名、地址等文字信息。或電話號碼、郵政編碼等不需要計算的數字信息。C、存儲長文本信息，最多可包含1.2GB字符。D、精確表示貨幣錢款數值 29.通過執行通用對話框的方法，可以將其表示為不同的對話框。方法ShowColor , 顯示____對話框。D A、保存文件 B、字體 C、打開文件 D、顏色 30.設置通用對話框的文件類型框中所要顯示的文件類型選項，可由____屬性來設置。C A、Name B、File C、Filter D、Caption 31.VB 的全名是：C A、Violin BASIC B、Very BASIC C、Visual BASIC D、View BASIC 32.下列哪一種運算的優先級最低：C A、Mod B、整數除法 C、減法 D、除法 33.設置窗體的高度用屬性_______。D A、Caption B、Font C、BackColor D、Hight 34.設置窗體左上角到屏幕上方距離的屬性是______。B A、Left B、Top C、Width D、Name 35.設置窗體寬度的屬性是______。C A、Left B、Top C、Width D、名稱(Name)36.計算數x的正弦函數值的函數是______。A A、SIN(x)B、ABS(x)C、STR(x)D、SQR(x)37.數學式3abc(d+e)改寫為VB表達式為______。D A、3a*b*c(d+e)B、3abc(d+e)C、3abcd +3abce D、3*a*b*c*(d+e)38.不屬于程序的三種基本結構的是。C A、順序結構 B、循環結構 C、直線型結構 D、分支結構 39.在IF語句的條件中，M≠6應寫成： C A、M<6 AND M>6 B、M≠6 C、M<>6 D、NOT M<>6 40.在VB中數據類型為長整型的―數據類型保留字‖是。B A、integer B、long C、single D、string 41.在VB中數據類型為字符串型的―數據類型保留字‖是。D A、integer B、double C、single D、string 42.下列變量名正確的是。B A、X-1 B、XX1 C、123 D、A* 43.函數ABS(X)稱為。B A、算術平方根函數 B、絕對值函數 C、正弦三角函數 D、字符串轉換為數值函數 44.下列說法不正確的是。A A、1 B、關系表達式的判斷結果只能是“True”或“False” C、關系運算符共有6個,分別是：<、>、<=、>=、=、<> D、邏輯運算符有NOT、AND、OR 45.為了暫時關閉計時器，應把該計時器的某個屬性設置為False，這個屬性是C A、Visible B、Timer C、Enabled D、Interval 46.利用對象的方法Setfocus可獲得焦點，對于一個對象,只有其visible屬性和_____屬性為true，才能接受焦點。C A、name B、Timer C、Enabled D、visible 47.使用print方法可在圖片框中進行文本的輸出(如：picture1.print ―信息技術‖)，用_____方法可畫圓。C A、pset B、line C、circle D、move 48.設a=2,b=3,c=4,d=5,下列表達式的值是。C 3>2*b OR a=c AND b <>c OR c>d A、1 B、True C、False D、–1 49．設置標簽中顯示內容的屬性是。C A、Text B、Name C、Caption D、BackStyle 50．通過執行通用對話框的方法，可以將其表示為不同的對話框。顯示打開文件對話框方法是。A A．ShowOpen B．ShowSave C．ShowPrinter D．ShowColor vb練習題2 二、程序設計題 51．設計一個程序，輸入一個正整數N，求1＋2＋3＋…+N的和。界面如下： 當用戶輸入N后，單擊―計算‖按鈕，則輸出1＋2＋3＋…+N的和。參考答案： Private Sub Command1_Click()Dim i, a, b As Integer a = Val(Text1.Text)For i = 1 To a b = b + i Next i Label3.Caption = b End Sub Private Sub Command2_Click()End End Sub 52．編一個求圓柱的側面積的程序： 當用戶輸入半徑與高后，單擊―側面積為‖按鈕，輸出正確結果。參考答案： Private Sub Command1_Click()Dim r, h, c, s As Single r = Val(Text1.Text)h = Val(Text2.Text)c = 2 * 3.14159 * r s = c * h Label3.Caption = s End Sub 53．設計一個計時程序。該程序用戶界面如圖所示，由一個文本框（text1），和兩個按鈕：命令按鈕1（command l）、命令按鈕2（command 2）組成。程序運行后，用戶按開始按鈕，則開始計時，文本框中顯示秒數，接停止按鈕，則計時停止。單擊窗口則退出。（請閱讀下面程序，編寫出時鐘控件的計時事件中的程序代碼。）Dim i, t As Integer Private Sub Command1_Click()Timer1.Interval = 1000 Timer1.Enabled = True t = 0 End Sub Private Sub Command2_Click()Timer1.Enabled = False End Sub Private Sub Form_Click()End End Sub Private Sub Timer1_Timer()End Sub 參考答案： t = t + 1 Text1.Text = t & “秒” 54．編制一個能在窗體中畫出由用戶指定圓心位置和半徑大小的圓的程序,要求單擊―繪圓‖按鈕時繪圓，單擊―清除‖按鈕時清除繪圖區中的圖形及文本框中的內容。運行界面如下： 參考答案： Private Sub Command1_Click()Dim x, y, r As Single x = Val(Text1.Text)y = Val(Text2.Text)r = Val(Text3.Text)Picture1.Circle(x, y), r End Sub Private Sub Command2_Click()Picture1.Cls Text1.Text = “" Text2.Text = ”“ Text3.Text = ”“ End Sub 信息技術教師培訓自學部分VB練習題二 一、選擇題 1．在 Visual Basic環境下，當寫一個新的 Visual Basic程序時，所做的第一件事是B A、編寫代碼 B、新建一個工程 C、打開屬性窗口 D、進入VB環境 2．若要求從文本框中輸入密碼時在文本框中只顯示*號，則應當在此文本框的屬性窗口中設置D A、Text屬性值為* B、Caption屬性值為* C、password屬性值為空 D、Passwordchar屬性值為* 3．能夠將文本框控件隱藏起來的屬性是B A、Clear B、Visible C、Hide D、New 4．獲得系統日期的函數是C A、data$ B、time$ C、date$ D、gettime$ 5．下列運算符號中屬于算術運算符的是_____。B A、NOT B、^ C、= D、<= 6．Visual Basic屬于:A A、高級語言B、匯編語言C、機器語言D、低級語言。7．一個程序可以有_____窗體。C A、1個 B、2個 C、多個D、無窮多個 8．事件是指_____。B A、對象的外部特征。 B、預先設置好的能被對象識別的特定動作。C、對象的屬性。 D、對象原來就包含的內部函數或程序。9．VB在運行中使用_______來臨時存儲數據。B A、常量 B、變量 C、函數 D、方法 10．布爾型又稱_____。B A、數值型 B、邏輯型 C、字符串型 D、整型 11．下列運算符號中屬于關系運算符的是_____。D A、— B、+ C、AND D、<= 12．關于高級語言，下列敘述正確的是。B A、不必編譯即可執行 B、可讀性最高 C、難學難記 D、執行速度最快。13．下列各組控件都具有Caption屬性的是（）C A、窗體、文本框 B、標簽、定時器 C、窗體、標簽 D、文本框、定時器 14．下列運算結果中，值最大的是（）D A、34 B、3/4 C、4 mod 3 D、3 mod 4 15．Visual Basic語言中，下列那一項數值運算符號是正確的。(C)A、＠表示加 ?B、～表示減 ?C、*表示乘 ?D、÷表示除。16．下面程序執行的結果是________。C Private Sub Form_Click()A$ = ”123“: B$ = ”456“ C = Val(A$)+ Val(B$)Print C 100 End Sub A、123 B、3 C、5 D、579 17．函數Sqr(9)的值是（）B A、9 B、3 C、―3‖ D、―9‖ 18．下列控件中可用于接受用戶輸入文本，又可用于顯示文本的是（）B A、Label 控件 B、TextBox 控件 C、Timer 控件 D、CommandButton 控件 19．以下程序段執行后整型變量度n 的值為（）B n=0 for L=1 to 20 step 5 n=n+L next L A、50 B、34 C、15 D、210 20．如果要改變窗體的標題,需要設置窗體對象的_____屬性。B A、Name B、Caption C、BackColor D、BorderStyle 21．Visual Basic提供的標簽控件（LABEL）可具有功能是B A、輸入文本 B、顯示文本 C、計時 D、取得時間 22．以下選項中，不是 Visual Basic控件的是C A、文本框 B、定時器 C、窗體 D、命令按鈕 23．若整型變量a的值為 2、b的值為3，則下列程序段執行后整型變量c的值為（）D if a>5 then c=b-a else c=a + b endif A、2 B、-1 C、1 D、5 24.下列程序執行后，整型變量n的值為（）B n=0 for I=1 to 20 if I mod 4=0 then n=n+1 next I A、5050 B、5 C、6 D、33 25.下面哪些控件是輸入控件______。A A、文本框 B、標簽 C、列表框 D、滾動條 26．窗體初始化程序應寫在_______事件中。A A、Load B、UnLoad C、Active D、GotFocus 27．在Visual Basic中，布爾型變量用來_____。D A、存放需要計算的數字。 B、存放日期、時間或同時存儲以上兩種數據。C、存儲長文本信息，最多可包含1.2GB字符。D、存放性別、婚否等邏輯信息。 28． 通過執行通用對話框的方法，可以將其表示為不同的對話框。方法ShowOpen , 顯示____對話框。C A、保存文件 B、字體 C、打開文件 D、顏色 29． 通過執行通用對話框的方法，可以將其表示為不同的對話框。方法ShowFont , 顯示____對話框。B A、保存文件 B、字體 C、打開文件 D、顏色 30．計時器的Interval屬性是用來設置一時間間隔，單位是_____。D A、1秒 B、1毫秒 C、1/100秒 D、1/1000秒 31.VB 在計算三角函數時，所使用的度量單位是：B A、角度制 B、弧度制 C、角度制 D、弧度制都可以 32.設置窗體的背景色用屬性_______。C A、Caption B、Font C、BackColor D、Hight 33.設置窗體中顯示的文字前景色用屬性_______。A A、ForColor B、Font C、BackColor D、Hight 34．設置窗體左上角到屏幕左邊距離的屬性是______。A A、Left B、Top C、Width D、Name 35．計算數x的算術平方根的函數是___。D A、SIN(x)B、ABS(x)C、STR(x)D、SQR(x)36．計算數x的余弦函數值的函數是______。D A、SIN(x)B、ABS(x)C、STR(x)D、COS(x)37．數學式|xy|+2(d+e)改寫為VB表達式為______。C A、|xy|+2(d+e)B、-x*y+2*(d+e)C、ABS(x*y)+2*(d+e)D、|x*y|+2*(d+e)38．在IF語句的條件中，60≤F≤100應寫成：D A、60<=F<=100 B、60= C、正弦三角函數 D、字符串轉換為數值函數 44．下列說法不正確的是。B A、FOR語句中可省略STEP及步長值,默認步長值為1 B、循環變量只能用數值簡單變量 C、步長值可正可負 D、初值、終值、步長值可以是數值表達式 45．為了在運行時把圖形文件picfile.jpg裝入圖片框Picture1,所使用的語句為。A A、Picture1.Picture = LoadPicture(”picfile.jpg“)B、Picture1.Picture =”picfile.jpg“ C、Picture1.image = LoadPicture(”picfile.jpg“)D、Picture1.image =”picfile.jpg“ 46．使用print方法可在圖片框中進行文本的輸出(如：picture1.print ―信息技術‖)，用_____方法可畫點。A A、pset B、line C、circle D、move 47．使用print方法可在圖片框中進行文本的輸出(如：picture1.print ―信息技術‖)，用_____方法可使圖片框移動位置。D A、pset B、line C、circle D、move 48． 雙擊工具箱中某個控件，該控件將____。C A、被選中 B、出現在窗體左上角 C、出現在窗體中部 D、沒變化 49.為了取消窗體的最大化功能，需要把它的一個屬性設置為False，這個屬性是。D A、ControlBox B、MinButton C、Enabled D、MaxButton 50.執行下面的程序段后，x 的值為。C x=0 For i=1 To 10 x=x+i5 Next i A、5 B、6 C、7 D、8 二、程序設計題 51．編寫一個程序，輸入任意兩個整數，輸出其中較大的數。界面如下： 當用戶輸入兩個整數后，單擊―輸出‖按鈕，則輸出正確結果。參考答案： Private Sub Command1_Click()Dim a, b As Integer a = Val(Text1.Text)b = Val(Text2.Text)If a >= b Then Label3.Caption = a Else Label3.Caption = b End If End Sub 52.設計一程序，計算1*2+2*3+3*4+4*5+…+N*（N+1）的和。程序界面如下： 當用戶輸入N后，單擊―求1*2+2*3+3*4+4*5+…+N*（N+1）‖按鈕后，輸出正確結果。參考答案： Private Sub Command1_Click()Dim i, n, s As double n = Val(Text1.Text)s = 0 For i = 1 To n s = s + i *(i + 1)Next i Label1.Caption = s End Sub 53．設計一個從鍵盤接收三條邊的值，測試能否組成三角形，若能，則計算所組成三角形面積，否則，給出相應信息的程序，運行之后界面如下。 參考答案： Private Sub Command1_Click()Dim a, b, c, d As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If(a + b)> c And(a + c)> b And(b + c)> a Then d =(a + b + c)/ 2 Label3.Caption = Sqr(d *(db)*(dc 37．在IF語句的條件中，X≤-10或X>0應寫成：B A、X<=-10 AND X>0 B、X<=-10 OR X>0 C、X≤-10 OR X>0 D、X≤-10或X>0 38．在VB中數據類型為整型的―數據類型保留字‖是。A A、integer B、long C、single D、string 39．在VB中數據類型為雙精度浮點型的―數據類型保留字‖是。B A、integer B、double C、single D、string 40．在VB中數據類型保留字―boolean‖表示的數據類型是。C A、整型 B、長整型 C、布爾型 D、字符串型 41．函數SQR(X)稱為。A A、算術平方根函數 B、絕對值函數 C、正弦三角函數 D、字符串轉換為數值函數 42．數值表達式運算的先后順序為。A A、()→函數→乘方→* /→+ C、函數→乘方→()→* /→+43． 表達式4+5 6 * 7 / 8 Mod 9 的值是。A A、4 B、5 C、6 D、7 44．由語句txtname.text=”AB“,可知txtname一定是_____控件。A A、文本框控件 B、標簽控件 C、圖象框控件 D、命令按鈕 45．使用print方法可在圖片框中進行文本的輸出(如：picture1.print ―信息技術‖)，用_____方法可畫線。B A、pset B、line C、circle D、move 46．使用print方法可在圖片框中進行文本的輸出(如：picture1.print ―信息技術‖)，用_____方法可清除圖片框中的內容。C A、pset B、line C、cls D、move 47．VB中工程文件的擴展名為。A A、.vbp B、.frm C、.ds D、.bas 48.設a=2,b=3,c=4,d=5,下列表達式的值是。B a>b AND c<=d OR 2*a>c A、True B、False C、-1 D、1 49.表達式4+5-6*7/8 Mod 9的值是。A A、4 B、5 C、6 D、7 50.下列控件中，哪一個是外部控件。D A、PictureBox B、CommandButton C、Timer D、CommonDialog 二、程序設計題 51．設計一個程序，輸入一個長方體的長寬高，計算并輸出其體積V，界面如下： 當用戶輸入長寬高，后單擊―計算‖按鈕，則輸出結果。參考答案： Private Sub Command1_Click()Dim a, b, c As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)Label5.Caption = a * b * c End Sub Private Sub Command2_Click()End End Sub 52．編寫一個程序，輸入任意三個整數，輸出其中最小的自然數。界面如下： 當用戶輸入三個自然數后，單擊―最小自然數為‖按鈕，則輸出正確結果，請閱讀下面程序，把所缺的代碼寫出來。Private Sub Command1_Click()Dim a, b, c, d As Integer a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If a <= b Then d = a Else d = b End If Label3.Caption = d End Sub 參考答案： If d > c Then d = c End If 53．設計一個求ax2 +bx+c=0解的程序，用戶界面如下： 參考答案： Private Sub Command1_Click()Dim a, b, c, d, x1, x2 As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)d = b ^ 2Sqr(d))/(2 * a)Label3.Caption = ”x1=“ & x1 & Chr(13)& ”x2=“ & x2 Else Label3.Caption = ”此方程無實根！“ End If End Sub Private Sub Command2_Click()End End Sub 54．編一程序，將阿拉伯數字0、1、2、……、8、9轉換為漢語大寫數字零、壹、貳、……、捌、玖，程序界面如下： 參考答案： Dim a As Integer Dim b As String a = Val(Text1.Text)Select Case a Case 0 b = ”零“ Case 1 b = ”壹“ Case 2 b = ”貳“ Case 3 b = ”叁“ Case 4 b = ”肆“ Case 5 b = ”伍“ Case 6 b = ”陸“ Case 7 b = ”柒“ Case 8 b = ”捌“ Case 9 b = ”玖" End Select Label1.Caption = b End Sub VBP判斷題 套號 題號 題目 01 01 01 01 01 01 01 01 01 01 02 02 02 02 02 02 02 02 02 02 03 03 03 03 03 03 03 03 03 03 04 04 04 04 04 04 04 04 04 04 05 05 05 05 05 05 05 05 05 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 每當一個窗體成為活動窗口時將觸發Show事件。 Integer、Long、Single、Double是數值類型數據，但Byte不是。在打開某窗體時，初始化窗體中的各控件，應選用Load事件。 若行If語句中邏輯表達式值為True，則關鍵字Then后的若干語句都要執行。函數過程與Sub過程必須用關鍵字Private或Public聲明。 標簽控件可以響應Click事件。 屏幕（Screen）對象可作為窗體的容器，但它只能提供缺省的坐標系統，即坐標刻度不能改變 用通用對話框控件顯示“字體”對話框前，必須先設置Flags屬性，否則將發生“不存在字體” 的錯誤。 運行時目錄列表框的List屬性可以用AddItem和RemoveItem兩種方法來改變。 將組合框的Style屬性設置為0時，組合框稱為“下拉式組合框”，其選項可以從下拉列表框 的列表項中選擇，也可以由用戶輸入。 窗體啟動位置可在“窗體布局窗口”中直接設置。 在所有的數據類型中，Byte型占用的內存空間最小，只要用一個字節。表達式5>4>3的計算結果是True。 在行If語句中，關鍵字End If是必不可少的。用Function過程在過程中必須被賦值。 單擊組合框中的任一表項，該表項的文本就會替換這一組合框控件的Text屬性值。QBcolor函數的參數是一個介于0~255的整數。 用通用對話框控件顯示“字體”對話框前，必須先設置Flags屬性，否則將發生“不存在字體” 的錯誤。 運行時目錄列表框的List屬性可以用AddItem和RemoveItem兩種方法來改變。 當對DrawWidth進行設置后，將影響Line、Circle、Pset方法，但不會影響Line、Shape控件。在VB中，對象是代碼和數據的集合。 Boolean類型數據，可以用來保存邏輯值True和False。如果B是一個字節型變量，那么B可以用來保存數值-1。 如果在定義過程時，一個形式參數使用地址傳遞方式說明，則調用過程時與之對應的實參只能 按地址方式傳遞。 在行If語句中，關鍵字End If可以缺省。定時器控件只能響應Timer事件。 從幾十個項目中任選其中一項或多項時可選用列表框或組合框控件來實現。執行語句“C=Point(50,100)”，可將窗體坐標(50,100)處點的顏色值存入變量C。 在設計Windows應用程序時，用戶可以使用系統本身提供的某些對話框，這些對話框可以直接 從系統調入而不必由用戶用“自定義”的方式進行設計。Print #語句的作用是將數據從文件中讀出并顯示在窗體上。方法是VB預先定義的、只有用戶可直接使用的過程。 整型變量A、B,如果A的值是1，B的值是256，那么變量B比變量A需要占用更多內存。用語句Dim Str1 As String聲明的變量Str1，可以保存由100萬個字符組成的字符串數據。塊If結構中的Else子句是不可缺省的。 事件過程只能由系統調用，在程序中不能直接調用。 單選按鈕與復選框對象的Value屬性類型不同，單選按鈕只能取值0或1。列表框和文本框一樣都具有Text屬性。 執行語句“Form1.BackColor = &HFF&”可以將窗體的背景色設置為藍色。通過Open語句打開一個文件，操作完成后，必須用Close語句將其關閉。在窗體上繪制CommonDialog控件時，控件的大小、位置可由用戶自己加以設定。在“工程資源管理器”，可以實現多窗體的所有操作。 由于Single型變量的取值范圍比Long型變量大，所以Single型變量開銷內存也比Long型多。語句Const A=100是將A聲明為一個常量。塊If結構中的Else子句可以缺省。 定義一個過程時，有幾個形參，則在調用該過程時就必須提供幾個實參。 列表框控件List1的最后一個表項為List1.List(List1.ListCount)。 移動框架時框架內控件也跟隨移動，因此框架內控件的Left和Top屬性值也隨之改變。通過設置影像框的Picture屬性可改變影像框中顯示的圖片，若要清除圖片也是通過設置 Picture屬性來實現。 在消息框（MsgBox）中，“Prompt”（消息）是必選項，最大長度為64個字符。 選項A 選項B 答案 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 B B B A B A A A B A A A B B A A B A B A A A B A B A B A A B B B A A B B A B A B A B A B A B B A B 第 1 頁，共 4 頁 VBP判斷題 05 06 06 06 06 06 06 06 06 06 06 07 07 07 07 07 07 07 07 07 07 08 08 08 08 08 08 08 08 08 08 09 09 09 09 09 09 09 09 09 09 10 10 10 10 10 10 10 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 在程序運行中，目錄列表框將以樹形展開方式顯示某個盤或目錄內的各個子目錄名，并用是否 為打開的文件夾圖標來表示選定的目錄。 在打開某窗體時，初始化窗體中的各控件，應選用Load事件。不能使用Visual Basic的關鍵字作為變量名。表達式5>4>3的計算結果是True。 若用數組作為過程的參數，則實參和形參結合是按地址傳遞的，定義過程時，參數前不能使用 ByVal。 If語句中的條件表達式只能使用關系表達式或邏輯表達式。 執行滾動條控件的Change事件不是在拖動滾動條滑塊的過程中，而是在拖動過程停止時。將組合框的Style屬性設置為0時，組合框稱為“下拉式組合框”，其選項可以從下拉列表框的 列表項中選擇，也可以由用戶輸入。 將圖片框的Align屬性設置值為2，表示圖片框在窗體中居中顯示。 用戶要想在程序運行時改變目錄列表框的顯示內容，可以通過代碼來設置List屬性的值。如果創建的菜單的標題是一個減號“-”，則該菜單顯示為一個分隔線，此菜單項也可以識別單 擊事件。 決定對象是否可見的屬性是Show屬性，決定對象可用性的屬性是Load屬性。表達式5>4>3的計算結果是True。 Dim關鍵字可用來聲明過程級變量，但不能用來聲明模塊級變量。 在Select Case情況語句中，各個分支（即Case 表達式）的先后順序無關。Sub過程名在過程中必須被賦值。 Picture對象的AutoSize屬性值為True時，表示該對象不管原來圖片的大小，一律都自動調整 為控件的大小尺寸，以便能完整地顯示該圖片。 設置窗體的Fillcolor屬性使窗體的填充色為紅色后，形狀控件的填充色也是紅色。當使用Circle方法畫圓后，當前坐標在原點（0，0）。 菜單編輯器中的快捷鍵是指無須打開菜單就可以直接由鍵盤輸入選擇菜單項的鍵。若要新建一個磁盤上的順序文件，可用OUTPUT、APPEND方式打開文件。在任何狀態下都可以直接設置窗體的屬性。 在一個模塊中聲明了一個模塊級變量，則該變量可以被該模塊中的所有過程訪問。Print語句可以省略輸出項，省略輸出項，表示輸出一空行。在Select Case情況語句中，Case 表達式可以包含任意變量。 過程中的靜態變量是局部變量，當過程再次被執行時，它的值是上一次過程調用后的值。如果定時器的Interval屬性是0，當啟動定時器時，程序將進入死循環。 設置窗體的Fillcolor屬性使窗體的填充色為紅色后，形狀控件的填充色也是紅色。 將組合框的Style屬性設置為0時，組合框稱為“下拉式組合框”，其選項可以從下拉列表框的 列表項中選擇，也可以由用戶輸入。 若某文件已存在，用OUTPUT方式打開該文件，等同于用APPEND方式打開該文件。當一個菜單項不可見時，其后的菜單項就會往上填充留下來的空位。 面向對象程序設計是一種以對象為基礎，由事件驅動對象執行的設計方法。 Print語句的每個輸出項之間可以用逗號或分號分隔，不管用逗號還是分號，其輸出效果是一樣 的。 語句A=B的意思是將字符“B”賦值給A，即A的值是字符“B”。 若用數組作為過程的參數，則實參和形參結合是按地址傳遞的，定義過程時，參數前不能使用 ByVal。 要實現同樣的循環控制，在Do While/ Loop和Do/ Loop While循環結構中給定的循環條件是一 樣的。 ScaleWidth屬性和ScaleHeight屬性是容器的坐標屬性，因此有可能取到負值。要讓控件隱藏起來，處于不可見的狀態，可修改其enabled屬性。 如果定時器的Interval屬性是0，當啟動定時器時，程序將進入死循環。CommonDialog控件就像Timer控件一樣，在運行時是看不見的。用Kill語句刪除文件，只能刪除與指定文件名完全匹配的一個文件。 在一個窗體的代碼中不能使用Unload語句來卸載本窗體，即一個窗體只能由其它窗體卸載。聲明常量時給常量賦值可以使用表達式，但表達式不能包含函數調用。整除運算符，其兩邊的操作數可以是浮點型數據。 定義一個過程時，有幾個形參，則在調用該過程時就必須提供幾個實參。一個Do循環只能使用一個Loop關鍵字，但是可以使用多個Exit語句。 如果字符“Y”是某個命令按鈕的訪問鍵，在設計時，設置命令按鈕的Caption屬性時要在其中 字符“Y”前輸入&；運行時，可以通過按alt+ Y鍵執行單擊操作。 當列表框中表項太多、超出了設計時的長度時，Visual Basic會自動給列表框加上垂直滾動條 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 A A A B A A A A B A B B B B B B B B B A A B A A B A B B A B A A B B A B A B B A B B A A A A A A 第 2 頁，共 4 頁 VBP判斷題 10 10 11 11 11 11 11 11 11 11 11 11 12 12 12 12 12 12 12 12 12 12 13 13 13 13 13 13 13 13 13 13 14 14 14 14 14 14 14 14 14 14 15 15 15 15 15 15 15 15 15 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 容器控件的位置、大小均采用其所在容器坐標系的刻度，與容器本身的坐標刻度無關。Open語句中的文件號，必須是當前未被使用的、最小的作為文件號的整數值。設計菜單中每一個菜單項分別是一個控件，每個控件都有自己的名字。由Visual Basic語言編寫的應用程序有解釋和編譯兩種執行方式。算述運算符要比關系運算符、邏輯運算符的運算優先級低。表達式A=B的計算結果要么是True，要么是False。 For/Next語句正常（未執行Exit For）結束其循環變量的值一定大于終值。 因為Function過程有返回值，所以只能在表達式中調用，而不能使用Call語句調用。圖片框可以通過Print方法來顯示文本。 Picture對象的AutoSize屬性值為True時，表示該對象不管原來圖片的大小，一律都自動調整 為控件的大小尺寸，以便能完整地顯示該圖片。當使用Circle方法畫圓后，當前坐標在原點（0，0）。菜單一旦建成后，所有的菜單項均可識別Click事件。文件列表框的顯示內容發生變化時，會觸發Change事件。對象的基本特征是方法、事件和過程。 如果x、y、z是3個數值型變量，那么這3個變量的積的VB表達式可以寫成xyz。過程級變量不可以與模塊級變量同名。 事件過程只能由系統調用，在程序中不能直接調用。 For/Next語句正常（未執行Exit For）結束其循環變量的值一定大于終值，并等于“終值”+ “步長”。 對象的標題文字的顏色是由Fontcolor屬性決定的。 執行滾動條控件的Change事件不是在拖動滾動條滑塊的過程中，而是在拖動過程停止時。用Cls方法不能清除圖片框中用Picture屬性設置的圖形。可以用AddItem方法向目錄列表框中加入新表項。菜單項不僅可識別Click事件，還可識別ＤblClick事件。在VB中，對象的數據被稱為屬性。 如果x、y、z是3個數值型變量，那么這3個變量的積的VB表達式可以寫成xyz。內部函數是系統預定義的函數。 For/Next語句中，若循環變量的初值大于終值，Step缺省，則為死循環。數組作為參數，傳遞的是地址數據。 只要設置命令按鈕的backcolor為藍色，按鈕就一定可以變成藍色按鈕。 移動框架時框架內控件也跟隨移動，因此框架內控件的Left和Top屬性值也隨之改變。改變圖形對象的坐標系可以用ScaleMode方法。 在通用對話框的“打開文件對話框”中選擇一個文件后，能真正打開該文件。目錄列表框當前目錄的ListIndex為0，其子目錄的ListIndex屬性再按順序往下編號。用VB設計程序時，必須先設計窗體，再編寫代碼。表達式“123”+“1”的計算結果是“1231”。內部函數是系統預定義的函數。 For/Next語句中，循環控制變量只能是整型變量。用Function過程在過程中必須被賦值。 要在文本框中輸入6位密碼，并按回車鍵確認，則文本框的MaxLength屬性可設置為6。 定時器控件只能響應Timer事件。 在圖片框中添加的控件，其Top和Left屬性值是相對圖片框而言的，與窗體無關。在“顏色”對話框中選中某一顏色后，該顏色值會賦給Color屬性。 在盤驅動器列表框Drive1的Change事件過程中，代碼Dir1.Path=Drive1.Drive的作用是：當 Drive1的驅動器改變時，Dir1的目錄列表隨同驅動器作相應變化。在VB中如要使用調試工具，應使VB進入中斷模式。表達式1*2+3/42^2的計算結果是2。Rnd函數返回的最大值是1。 如果在定義過程時，一個形式參數使用地址傳遞方式說明，則調用過程時與之對應的實參只能 按地址方式傳遞。 For/Next語句中，“Step 1”可以缺省。 用Redim語句既可以改變數組的大小，也可以改變數組類型。標簽控件和其他控件對象一樣，可以獲得焦點。影像框和圖片框一樣，也可以作為其他控件的容器。 通用對話框的Filename和FileTitle屬性一樣，指的都是含路徑的文件全名。 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 A A A B B A B A A B B B B B B B B B B A A B B A B A B A B B B B B B A A B A A A A A A A A B A A B B B B 第 3 頁，共 4 頁 VBP判斷題 16 16 16 16 16 16 16 16 16 16 17 17 17 17 17 17 17 17 17 17 18 18 18 18 18 18 18 18 18 18 19 19 19 19 19 19 19 19 19 19 20 20 20 20 20 20 20 20 20 20 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 若某文件已存在，用OUTPUT方式打開該文件，等同于用APPEND方式打開該文件。VB是一種面向過程的可視化編程語言。表達式Sin(30)，就是求30度角的正弦值。 Val是用來把一個數字字符串轉換為相應的數值的函數。在循環體內，循環變量的值不能被改變。 在使用Redim重新定義數組時，下標可以用具有確定值的變量來表示。事件過程只能由系統調用，在程序中不能直接調用。 影像框和圖片框都可以用AutoSize屬性來控制控件大小調整的行為，當AutoSize屬性值為True 時，兩者控件大小根據圖片來調整；設置為False時，只有一部分圖片可見。通用對話框的FilterIndex屬性用于設置“打開”或“另存為”對話框的文件類型。單選鈕控件和復選框控件都具有Value屬性，它們的作用完全一樣。Print #語句的作用是將數據從文件中讀出并顯示在窗體上。控件的屬性值不可以在程序運行時動態地修改。表達式Int(-10.1)的計算結果是-10。執行語句A=B=2后，A的值是一個邏輯值。 用Redim語句既可以改變數組的大小，對于已經定義了類型的數組，還可以改變數組類型。用Public聲明的數組是一定全局量。 調用過程時的實參必須是與對應形參類型相同的表達式。組合框能響應Click事件，但不能響應change事件。ScaleMode的所有屬性值均表示打印長度。 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 對 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 錯 B B B A B A B B B B B B B A B B A B B A B A A A A B B A A A B A B B A B B A A B A A A A B B A A B B A 通用對話框不是一種標準控件，初始時工具箱中一般找不到，因此使用前需先將它添加到工具 箱中。 用Append模式打開文件，如果指定文件和路徑不存在，則會自動創建指定文件及路徑。VB中的變量名，如用的是英文字母，其大小寫是不區分的。 如果窗體的Enabled屬性為False，就不能對窗體上的任何控件進行操作。表達式Mid(“Nothing”,3,2)的計算結果是“th”。執行語句A=B=2后，A的值是一個邏輯值。 若要使定義數組的下標下界默認值為2，則可以用語句Option Base 2.聲明形參處缺省傳遞方式聲明，則為按值傳遞（Byval）。 使用單選鈕控件數組時，它們響應同一個Click事件，由Index參數值來區分不同的按鈕。圖形控件可以在運行時獲得焦點。 創建用戶自定義對話框時，一般應將ControlBox設為Ｆalse，使得控制菜單框不顯示。運行時目錄列表框的List屬性可以用AddItem和RemoveItem兩種方法來改變。修改控件的Top和Left屬性,可改變控件在窗體中位置。 事件是一種預先定義好的特定動作，只能由用戶觸發，常用于用戶的交互操作。表達式Len(x)和len(“x”)返回值必然相等。 使用On Error GoTo語句并編寫相應程序，可以捕獲程序中的編譯錯誤。Sub過程名在過程中必須被賦值。 若要使定義數組的下標下界默認值為2，則可以用語句Option Base 2.設置框架時，可先在窗體上畫好框架，再往框架內添置控件；也可以先設計控件，再建立框 架，然后將已有控件粘貼到框架中。 BorderWidth屬性表示指定直線和形狀邊界線的線條寬度，該屬性值不能設置為0。通用對話框的Filename和FileTitle屬性一樣，指的都是含路徑的文件全名。 選中文件列表框File1中某個選項時，File1.FileName屬性值為不包含路徑的文件名。Form_Load事件常用于作控件屬性和變量的初始化。 面向對象的程序設計是一種以對象為基礎，由事件驅動對象的編程技術。表達式“123”+“1”的計算結果是“1231”。 Print語句的每個輸出項之間可以用逗號或分號分隔，不管用逗號還是分號，其輸出效果是一樣 的。 Do/Loop Until結構的循環，是“先判斷、后執行（循環體）”的循環結構。 過程中的靜態變量是局部變量，當過程再次被執行時，它的值是上一次過程調用后的值。當列表框中表項太多、超出了設計時的長度時，Visual Basic會自動給列表框加上垂直滾動條 執行指令“Line(1200,1200)-Step(1000,500),B”后，CurrentX=1000。 若Visual Basic中容器取缺省坐標系，則坐標原點在容器左上角、單位長度為像素。盤驅動器列表框的Drive屬性，只能用程序代碼設置，不能通過屬性窗口設置。 第 4 頁，共 4 頁第二篇：vb選擇題及答案
第三篇：VB試題及答案
第四篇：vb練習題及答案
第五篇：VB判斷題及答案
點擊咨詢 