期末試卷(B卷)

1、項目1項目2項目3項目4項目5項目9項目8項目6項目7項目102014年Visual Basic程序教程期末考試試卷（B卷）（考試時間90分鐘，滿分100分）一、選擇題（135題，每題1分，共35分）下面各題A、B、C、D四個選項中，只有一個選項是正確的，請將正確選項涂抹在答題卡相應(yīng)的位置上，答在試卷上不得分。1與傳統(tǒng)的程序設(shè)計語言相比，Visual Basic最突出的特點是（ ）A 結(jié)構(gòu)化程序設(shè)計B程序開發(fā)環(huán)境C 事件驅(qū)動編程機(jī)制 D程序調(diào)試技術(shù)2為了用鍵盤打開菜單和執(zhí)行菜單命令，第一步應(yīng)按的鍵是（ ）A功能鍵F10或Alt B Shift+功能鍵F4C Ctrl或功能鍵F8D Ctrl+A

2、lt3下列可以激活屬性窗口的操作是（ ）A 用鼠標(biāo)雙擊窗體的任何部位B 執(zhí)行“工程”菜單中的“屬性窗口”命令C 按Ctrl+F4鍵D 按F4鍵4確定一個控件在窗體上的位置的屬性是（ ）A Width或HeightBWidth和HeightCTop或Left DTop和Left5確定一個窗體或控件的大小的屬性是（ ）AWidth或Height B Width和HeightC Top或LeftD Top和Left6為了同時改變一個活動控件的高度和寬度，正確的操作是（ ）A 拖拉控件4個角上的某個小方塊B 只能拖拉位于控件右下角的小方塊C 只能拖拉位于控件左下角的小方塊D 不能同時改變控件的高度和寬

3、度7若窗體的名稱（Name屬性）為Form1，則把窗體的標(biāo)題設(shè)為“VB Test”的語句為（ ）A Form1=”VB Test”B Caption=”VB Test”CForm1.Text=”VB Test”D Form1.Name=”VB Test”8下列不能打開代碼窗口的操作是（ ）A 雙擊窗體上的某個控件B 雙擊窗體C 按F7鍵D單擊窗體或控件9為了在按下ESC鍵時執(zhí)行某個命令按鈕的事件過程，需要把該按鈕的哪個（ ）屬性設(shè)為TrueA ValueB DefaultC CancelD Enabled10用菜單編輯器創(chuàng)建菜單時，如果要在菜單中添加一條分隔線，正確的操作是（ ）A 在標(biāo)題輸入

4、框中輸入“”（減號）B 在名稱輸入框中輸入“”（減號）C 在標(biāo)題輸入框中輸入“_”（下劃線）D 在名稱輸入框中輸入“_”（下劃線）11在Visual Basic中，下列優(yōu)先級最高的運算符是（ ）A*BCDNot12以下關(guān)系表達(dá)式中，其值為False的是AXYZ XYz BVisual Basic visualbasicCthe there DInteger Int13設(shè)有如下聲明：Dim x As Integer 如果Sgn(x)的值為-1，則表示x的值是（ ）A整數(shù)B大于0的整數(shù)C等于0的整數(shù)D小于0的整數(shù)14下列表達(dá)式中值為-6的是（ ）AFix(-5.678)BInt(-5.678)CF

5、ix(-5.678+0.5)DInt(-5.678+0.5)15以下語句的輸出結(jié)果是（ ）Print 3 + 4 5 * 6 /7 Mod 8A3B4C5D616下列可作為Visual Basic 的變量名的是（ ）A3*DeltaBPrintCharCAbsDAB17下列可作為Visual Basic 的變量名的是（ ）AFilenameBA(A+B)CA%DDPrint18下列可作為Visual Basic 中所允許的形式的數(shù)是（ ）A25.74B3.457E-100C.368D1.87E+5019下列可作為Visual Basic 中所允許的形式的數(shù)是（ ）A10(1.256)BD32C

6、2.5ED12E320下面（ ）的數(shù)寫成普通的十進(jìn)制數(shù)是 2.65358979335278D-006A0.0000265358979335278B0.00000265358979335278C0.000265358979335278D0.00000026535897933527821如果一個窗體的ControlBox屬性被設(shè)置為False，則隱藏的是標(biāo)題欄上的（ ）A按鈕和 按鈕，而顯示其他按鈕 B 按鈕，而顯示其他按鈕C按鈕和左上角的控制菜單按鈕，而顯示其他按鈕 D 所有按鈕22若窗體中有個名為CD1的通用對話框控件，則在程序中可打開保存文件對話框的語句是（ ）A CD1.Action=2

7、B CD1.ShowSave=TrueC CD1.ShowOpen D CD1.Action23在窗體上畫一個命令按鈕和一個文本框，然后編寫如下程序：Private Sub Command1_Click() a = 10 t = 旅游景點： _ & IIf(a 3, 長城, ) _ & IIf(a 8, 故宮, ) _ & IIf(a 7, 頤和園, ) Text1.Text = tEnd Sub程序運行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是（ ）A旅游景點：長城故宮B旅游景點：長城頤和園C旅游景點：頤和園 D旅游景點：故宮24在窗體上畫兩個名稱分別為Label1和Label2的標(biāo)簽，然后

8、編寫如下事件過程Private Sub Form_Click() x = -5: s = -5 Select Case s Case Is 0 y = x + 1 Case Is = 0 y = x + 2 Case Else y = x + 3 End Select Label1.Caption = x Label2.Caption = yEnd Sub程序運行后，單擊窗體，標(biāo)簽Label1和Label2中顯示的內(nèi)容分別是（ ）A-5和-2B-5和-4C-5和-3 D-5和-525設(shè)置復(fù)選框或單選按鈕標(biāo)題對齊方式的屬性是（ ）AAlignBAlignmentCSortedDValue26以下

9、敘述中正確的是（ ）A用屬性窗口只能設(shè)置窗體的屬性B用屬性窗口只能設(shè)置控件的屬性C用屬性窗口可以設(shè)置窗體和控件的屬性D用屬性窗口只能設(shè)置對象的屬性27.假定Picture1和Text1分別為圖片框和文本框的名稱，下列不正確的語句是（ ）APrint 25B Picture1.Print 25C Text1.Print 25 DDebug.Print 2528以下語句的輸出結(jié)果是（在立即窗口中）（ ）a=27 (為回車，下同)b=65Print a;bA 27 65 B 27 65 C 27 65 D 27 65 (表示空格，下同)29以下語句的輸出結(jié)果是（在立即窗口中）（ ）a=Beijing

10、b=ShangHai Print a;b ABeijing ShangHaiB Beijing ShangHaiC BeijingShangHai DBeijing ShangHai 30語句Print 5*55/5的輸出結(jié)果是（ ）A5 B25 C 0 D 131設(shè)a、b、c為整型變量，其值分別為1、2、3，以下程序段的輸出結(jié)果是a=b : b=c : c=aPrint a; b; cA 1 2 3 B 2 3 1 C) 3 2 1 D) 2 3 232語句Print Sgn(-62)+Int(-62)+Int(62)的輸出結(jié)果是A -36 B 1 C -1 D -7233當(dāng)一個工程含有多個

11、窗體時，其中的啟動窗體是A 啟動Visual Basic時建立的窗體B 第一個添加的窗體C 最后一個添加的窗體D 在“工程屬性”對話框中指定的窗體34關(guān)于多重窗體應(yīng)用程序，以下描述中不正確的是（ ）A 對于多重窗體應(yīng)用程序，可以有多個當(dāng)前窗體B 多重窗體應(yīng)用程序的啟動窗體可以在設(shè)計時設(shè)定C 多重窗體應(yīng)用程序中每個窗體作為一個磁盤文件保存，所有窗體、標(biāo)準(zhǔn)模塊等作為一個工程文件被保存D 多重窗體應(yīng)用程序可以編譯生成一個exe文件35當(dāng)拖動滾動條中的滾動塊時，將觸發(fā)滾動條的事件是（ ）A MoveBChangeCScrollD SetFocus二、填空題（每空2分，共30分）請將每一個空的正確答案寫

12、在答題卡【1】【15】序號的橫線上，答在試卷上不得分。注意以命令關(guān)鍵字填空的必須拼寫完整。1退出VB的快捷鍵是 【1】_。2工程文件的擴(kuò)展名是 【2】_，窗體文件的擴(kuò)展名是 【3】_。3屬性窗口分為4個部分，分別是 【4】_， 【5】_， 【6】_， 【7】_。4在窗體上畫兩個文本框和一個命令按鈕，并在命令按鈕的代碼窗口中編寫如下事件過程 Private Sub Command1_Click()Text1.Text = VB Programming Text2.Text = Text1.Text Text1.Text = ABCDEnd Sub程序運行后，單擊命令按鈕，兩個文本框中顯示的內(nèi)容分

13、別為 【8】_和 【9】_。5假定一個文本框的Name屬性為Text1，為了在該文本框中顯示“Hello”，所使用的語句為 【10】_。6以下語句的輸出結(jié)果是 【11】_。Print chr$(65) (為回車，下同)7以下語句的輸出結(jié)果是 【12】_。Print sgn(2) 8.語句Print 25+32=; 25+32的輸出結(jié)果是 【13】_。9.以下語句的輸出結(jié)果是 【14】_。s$=Chinas$=BeijingPrint s$10以下程序段的功能是 【15】_。x = 8.6y = Int(x + 0.5) Print y三、分析下列程序，寫出程序的運行結(jié)果。（每題5分，共20分）

14、請將每一個空的正確答案寫在答題卡【1】【5】序號的橫線上，答在試卷上不得分。1Sub newQuestion() Dim intOp1 As Integer, intOp2 As Integer, intTemp As IntegerDim strOprator As StringDim intOpratorNum As IntegerRandomizeintOp1 = Int(10 * Rnd + 1) intOp2 = Int(10 * Rnd + 1) intOpratorNum = Int(4 * Rnd + 1) Select Case intOpratorNum Case 1str

15、Oprator = +: intAnswer = intOp1 + intOp2Case 2strOprator = :If intOp1 intOp2 Then intTemp = intOp1: intOp1 = intOp2: intOp2 = intTempEnd IfintAnswer = intOp1 - intOp2Case 3strOprator = : intAnswer = intOp1 * intOp2Case 4strOprator = If intOp1 intOp2 Then intTemp = intOp1: intOp1 = intOp2: intOp2 = i

16、ntTempEnd IfIf intOp1 Mod intOp2 0 ThenintOp1 = intOp1 - intOp1 Mod intOp2End IfEnd Select lblQuestion為標(biāo)簽lblQuestion.Caption = intOp1 & & strOprator & & intOp2 & = End Sub上述程序功能是： 【1】_2Private Sub Form_Click() Dim a(1 To 2, 1 To 2) As Integer Dim i As Integer, j As Integer For i = 1 To 2 For j = 1 T

17、o 2 a(i, j) = (2 * i - 1) * 4 + j Next j Next i For i = 1 To 2 Print a(i, 3 - i), a(3 - i, i) Next iEnd Sub程序運行后，單擊命令按鈕，輸出結(jié)果是 【2】_3Private Sub Command1_Click() Dim a As Integer, b As Integer a = 3: b = 2 Call f(8, a) Print a=; a, b=; b Call f(a, b) Print a=; a, b=; bEnd SubPrivate Sub f(ByVal x As Integer, y As Integer) x = x + 1 y = y - 1End Sub程序運行后，單擊窗體，輸出結(jié)果為 【3】_4若有如下窗體模塊：Dim a As IntegerPrivate Sub test() Dim b As Integer a = a + 1: b = b + 1 Print Sub: ; a, bEnd SubPrivate Sub Command1_Click() a = 2: b = 3 Call test Call testEnd Sub程序運行后，單擊窗體，輸出結(jié)果是 【4】_四、