VB（3）期末考試
高二年級VB期末試卷
一、單選題（2分×20，共40分）
1、可以在窗體上輸出資料的方法的是 （ A ）
A、Print B、Cls C、Show D、Hide
2、在VB中，被稱為物件的是（ C ）
A、窗體 B、控制元件 C、控制元件和窗體 D、窗體、控制元件和屬性
3、資料：“abcde”是（ C ）資料
A、整型 B、長整型 C、字元型 D、日期型
4、以下各項中，可以作為VB變數名的是（ ）
A、Book B、2_Seek C、123.58 D、Book-1
5、以下各項中，能作為VB變數名的是（ A ）
A、AB7 B、7AB C、If D、A[B]7
6、InputBox函式返回值的型別為（ B ）
A、數值 B、字串
C、變體 D、數值或字串(視輸入的資料而定)
7、確定窗體控制元件啟動位置的屬性是（ D ）
A、Width 和 Height B、Width 或 Height
C、Top 和 Width D、Top 和 Left
8、數學式sin30°寫成VB表示式是（ D ）
A、Sin30 B、Sin(30)
C、Sin(30°) D、Sin(30*3.14/180)
9、決定控制元件上文字的字型、字形、大小、效果的屬性是（ D ）
A、Text B、Caption
C、Name D、Font
10、設a、b、c為整型變數，其值分別為1、2、3，以下語句的輸出結果是（ A ）
Print a;b;c
A、1 2 3 B、 2 3 1 C、3 2 1 D、2 3 2
11、下列說法中錯誤的是（ C ）
A、窗體檔案的副檔名為.frm B、一個窗體對應一個窗體檔案
C、VB中一個工程只包含一個窗體檔案 D、VB中一個工程最多可以包含255個窗體
12、Visual Basic程式中的註釋所使用的字元是（ A ）
A、' B、: C、\ D、_
13、VB中下列兩個變數名相同的是（ B ）
A、Japan 和Ja_pan B、English 和ENGLish
C、English 和Engl D、China 和 Chin
14、若要求從文字框中輸入密碼時在文字框中只顯示 * 號，則應在此文字框的屬性視窗中設
置（ D ）。
A、Text 屬性值為 * B、Caption 屬性值為 *
C、Password 屬性值為空 D、Passwordchar 屬性值為 *
15、表示式“XYZ” + “487”的值是（A ）
A、“XYZ487” B、“XYZ” C、“487” D、“487XYZ”
16、將窗體中的某個按鈕設定為無效狀態，應設定命令按鈕的哪個屬性（ C ）
A、Value B、Visible C、Enabled C、Default
17、單擊窗體上的關閉按鈕時，觸發的事件是（ C ）
A、Form_Initialize() B、Form_Load()
C、Form_Unload() D、Form_Click()
18、用於將窗體中的物件分組的控制元件是（ ）
A、列表框 B、組合框 C、標籤 D、框架
19、能獲得一個文字框中被選中文字內容的屬性是（ D ）
A、Text B、Length C、Seltext D、SelStart
20、下列程式段的執行後Y的結果為（ C ）
X=2：Y=5
If X*Y<1 Then Y=Y-1 Else Y=-1
A、4 B、 3 C、 －1 D、 1
二、填空題（每題2分×10，共20分）
1、布林型資料只有__True______和__False______兩個值。
2、關係運算符有>、<、=、<>、__>=______、______<=__ 6種。
3、Visual Basic 的print方法輸出格式有 輸出 和_____計算_______兩種。
4、______inputbox()__________函式顯示一個能接收使用者輸入資料的對話方塊，並返回使用者在對話方塊中輸入的訊息。
5、__cls_________方法可以清除窗體或圖片框中由Print方法在執行時所生成的文字或圖形。
6、如果x是一個正實數，對x保留3位小數的表示式_____round(x,3)_______ 。
7、假定一個文字框的Name屬性為Text1,為了使該文字框獲得焦點，應執行的語句是 text1.setfocus 。
8、當物件失去焦點時，將觸發 lostfocus 事件。
9、表示式Ucase(Mid(“abcdefgh”,3,4))的值是 “CDEF” 。
10、產生[5,200]的隨機整數的表示式是 ____int(rnd*196+5)_______________。
三、把下列數學表示式改為VB表示式。（4分×4，共16分）
1、3(a-b) 2、1≤X＜5
3、x3÷4y 4、
四、寫出下列表達式的值（4分×3，共12分）
1、Abs(-100)+Sqr(100)
2、Not 3<=4 And 4 < > 5
3、Int(Abs(99-100)/2)
五、閱讀程式並填空(每空2分，共12分)
1、新建一個工程，內有兩個窗體Form1和Form2，窗體Form1上有一個命令按鈕Command1，單擊該按鈕，Form1窗體消失，顯示Form2窗體，補充完整。
Private Sub Command1_Click( )
__form1.hide_____________
Form2.__show________
End Sub
2、下列程式可以實現在窗體上由使用者任意輸入一個整數，程式可以判斷該數的奇偶。程式由一個文字框（Textbox）、兩個標籤（Label）、一個按鈕（Command）組成。要求：奇或偶的結果在Label2內顯示，請在空格處填入相應的語句，使之完成上述功能。
Private Sub Form_Load ( )
Text1.Text = “”
Label1.Caption = “請輸入一個整數”
Label2.Caption = “”
Command1.Caption = “判定”
End Sub
Private Sub Command1_Click( )
Dim x As Integer
x = Val(Text1.text)
If __x mod 2=0______________ Then
label2.caption= x & “是偶數”
Else
label2.caption= x & “是奇數”
End If
End Sub
3、設計工程，輸出在指定範圍內的1個隨機整數（參見執行效果圖），範圍在文字框中輸
入。
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = __ Val(Text1)_____________
b = Val(Text2)
__c=int(rnd*(b-a+1)+a)_______________________
Text3.Text = c
End Sub