vb試題和答案

1、1.工程文件的擴(kuò)展名是vbp。2.VB中若要產(chǎn)生一個(gè)消息框用msgbox 實(shí)現(xiàn)。3.若要獲得滾動(dòng)條的當(dāng)前位置，可以通過(guò)value屬性來(lái)實(shí)現(xiàn)。4.關(guān)閉正在運(yùn)行的VB窗口將自動(dòng)觸發(fā)的事件是unload.5.窗體的標(biāo)題欄屬性由窗體對(duì)象的caption屬性決定。 1、VB程序設(shè)計(jì)的主要特點(diǎn)是 可視化設(shè)計(jì) 和 事件編程 。2、在VB中，最主要的兩種對(duì)象是 窗體（form） 和 控件 。3、工程是構(gòu)成應(yīng)用程序文件的 集合 。4、方法是VB提供的一種 特殊子程序 ，用來(lái)完成一定的操作。5、浮點(diǎn)類型數(shù)據(jù)包括單精度型和_雙精度_數(shù)據(jù)。6、事件是窗體或控件對(duì)象識(shí)別的_動(dòng)作_。7、可用窗體的_print_ 方法在窗

2、體中顯示文字。8、 復(fù)選框控件Value屬性指示復(fù)選框處于_選中_或禁止?fàn)顟B(tài)(暗淡的)中的某一種。9、在VB中，修改窗體的 高度（height）和 寬度（width） 屬性值，可改變窗體的大小。10、雙擊工具箱中的控件圖標(biāo)，可在窗體的 中央 出現(xiàn)一個(gè)尺寸為缺省值的控件。11、在MsgBox函數(shù)中，如果缺省title參數(shù)，則使用 工程1 作為消息框的標(biāo)題。12、設(shè)x34.58，語(yǔ)句Print Format(x,“000.0”)的輸出結(jié)果是 34.6 。13、在VB 中，數(shù)值型變量的初值為 0 ，Varant型變量的初值為 空 ，布爾型變量的初值為 FALSE 。14、設(shè)置窗體的 picture

3、屬性，可在窗體上顯示圖片。15、程序運(yùn)行工程中，清除MP圖片框中的圖片應(yīng)使用語(yǔ)句 cls 。二、選擇題1、菜單控件只包括一個(gè)事件，即 C ，當(dāng)用鼠標(biāo)單擊或鍵盤選中后按“回車”鍵時(shí)觸發(fā)該事件，除分隔條以外的所有菜單控件都能識(shí)別該事件。A、GotFocus B、Load C、Click D、KeyDown2、滾動(dòng)條控件(如圖所示)的Max屬性所設(shè)置的是 A 。A、滾動(dòng)框處于最右位置時(shí)，一個(gè)滾動(dòng)條位置的Value屬性最大設(shè)置值B、 單擊滾動(dòng)條和滾動(dòng)箭頭之間的區(qū)域時(shí)，滾動(dòng)條中滾動(dòng)塊的最大移動(dòng)量C、單擊滾動(dòng)條的箭頭區(qū)域時(shí)，滾動(dòng)條中滾動(dòng)塊的最大移動(dòng)量D、滾動(dòng)條控件無(wú)該屬性3、SQL 語(yǔ)句 Select *

4、 Form student 中的 *表示 B 。A、所有記錄 B、所有字段 C、所有表 D、都不對(duì)4、以下選項(xiàng)中，不屬于標(biāo)簽的屬性是 C 。A、Enabled B、Caption C、Default D、Font5、要求改命令按鈕顯示的文本，應(yīng)當(dāng)在屬性窗口中改變的屬性是 A 。 A、Caption B、Name C、Text D、Label6、設(shè)置一個(gè)單選按鈕(OptionButton)所代表選項(xiàng)的選中狀態(tài)，應(yīng)當(dāng)在屬性窗口中改變的屬性是 D 。 A、Caption B、Name C、Text D、Value7、允許在菜單項(xiàng)的左邊設(shè)置打勾標(biāo)記，下面哪種論述是正確的？ D 。 A、在標(biāo)題項(xiàng)中輸入&

5、，然后打勾 B、在索引項(xiàng)中打勾 C、在有效項(xiàng)中打勾 D、在復(fù)選項(xiàng)中打勾8、當(dāng)執(zhí)行以下過(guò)程時(shí)，在窗體上將顯示 A 。Private Sub Command1_Click( )Print VB;Print Hello! ;Print VBEnd SubA、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB9、語(yǔ)句Print The answer is:;20/4-2的結(jié)果為 B 。A、The answer is 20/4-2 B、The answer is 3C、The answer is 20/4-2 D、非法語(yǔ)句 10、下列哪個(gè)

6、控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要將窗體從內(nèi)存中卸載出去，其實(shí)現(xiàn)的方法是 D 。A.Show B.Hide C.Load D.UnLoad12、以下選項(xiàng)中，不是 Visual Basic控件的是 A 。 A.窗體 B.定時(shí)器 C.單選框 D.命令按鈕13、雙擊窗體中的對(duì)象后，Visual Basic將顯示的窗口是 A 。 A.代碼窗口 B工具箱 C項(xiàng)目（工程）窗口 D屬性窗口14、可決定窗體的左上角是否有控制菜單的屬性是 A 。A.ControlBox B.MinButton C.MaxButton D.Bo

7、rderStyle15、設(shè)有如下語(yǔ)句： StrlInputBox（輸人，練習(xí)）從鍵盤上輸人字符 “示例”后，Strl的值是 D 。 A“輸入” B“ ” C“練習(xí)” D“示例” 16、窗體Form1的Name屬性是Frm1,它的單擊事件過(guò)程名是 C 。 A. Form1_Click B.Form_Click C. Frm1_Click D. Me_Click 17、窗體的hide屬性的含義是 A 。 A.隱藏 B.展現(xiàn) C.裝入 D.卸載18、若要設(shè)置定時(shí)器控件的定時(shí)時(shí)間，需設(shè)置的屬性是 C 。AEnabled BValue CInterval DText19、能夠改變復(fù)選框中背景顏色的屬性是

8、 C 。 AValue BFontColor CBackColor DFont20、窗體能響應(yīng)的事件是 B 。 AActiveForm BLoad CDrive DChange三、判斷題(判斷下列正確與否，正確的打，錯(cuò)誤的打。)1、三種方式的組合框都允許用戶輸入哪些不在列表框中的選項(xiàng)。X2、圖象框中的Stretch屬性為true時(shí)，其作用是圖形自動(dòng)調(diào)整大小以適應(yīng)圖象控件。X3、在菜單編輯器中使用“索引”時(shí)，可有一組菜單項(xiàng)具有相同的“名字”。X4、通過(guò)改變屬性窗口中的Name屬性，來(lái)改變窗體的標(biāo)題。5、創(chuàng)建VB應(yīng)用程序的三個(gè)主要步驟是：(1)創(chuàng)建應(yīng)用程序界面(2)設(shè)置控件(3)編寫代碼。X6、變

9、量是指在程序運(yùn)行過(guò)程中其值可以改變的那些量，而值不能改變的是常量。7、已知PMsgBox(“Howareyou?，VbYesNo+VbQuestion，“Hello!”)，變量P是Integer數(shù)據(jù)類型。8、工程文件的擴(kuò)展名是 .vbg 。9、VB允許設(shè)計(jì)和使用用戶自己設(shè)計(jì)的控件。10、OptionButton控件沒(méi)有DblCliek事件。X11、同一條記錄中的各數(shù)據(jù)具有相同的類型。12、使用Data控件可以直接顯示數(shù)據(jù)庫(kù)中的數(shù)據(jù)。X13、ImageList 是一個(gè)圖像容器控件，可用作工具欄的圖像庫(kù)。14、當(dāng)用戶單擊工具欄按鈕時(shí)，將觸發(fā)工具欄按鈕的ButtonClick事件。15、在VB的工程

10、資源管理器中，如果從工程中移除已經(jīng)保存過(guò)的文件，該文件仍然被物理刪除（真正刪除）。X16、如果列表框的ListConut的屬性為10，則列表框最后一項(xiàng)的ListIndex值為10。X17、要是某個(gè)命令按鈕不起作用，應(yīng)將該按鈕的Enabeld屬性設(shè)置為False。18、使用數(shù)組定義語(yǔ)句：Dim D$（10），則數(shù)組D中各元素的值為空。X19、如果在一行中輸入多條語(yǔ)句，各語(yǔ)句之間用使用 ；分隔。X20、在代碼窗口中輸入某行代碼并按回車鍵之后，如果代碼變成紅色，說(shuō)明該行代碼有語(yǔ)法錯(cuò)誤。 四、讀程序題，寫出程序運(yùn)行結(jié)果 1、 Private Sub Form_Click()Static SUM As

11、IntegerI = 1Do While I=10SUM = SUM + II = I + 1LoopPrint SUMEnd Sub 運(yùn)行程序，第一次單擊窗體： 55 第二次單擊窗體： 110 2、 Private Sub Form_Click()Print *; Tab(6); 2, Tab(15); 5PrintFor I = 15 To 16Print I;For j = 2 To 6 Step 3 Print Tab(3 * j); j * I;Next jPrintNext IEnd Sub 程序運(yùn)行結(jié)果： * 2 5 15 30 75 16 32 80 五、編程題 （一）窗體中有

12、圖片框(Picture1)和計(jì)時(shí)器(Timer1)兩個(gè)控件，運(yùn)行程序時(shí)，將圖片加載到圖片框中，然后圖片框以每2秒鐘一次的速度向窗體的右下腳移動(dòng)，每次向左、向右移動(dòng)100twip（20分之一像素）。請(qǐng)?zhí)羁眨?Private Sub Form_load( ) Picture1.picture =loadPicture(“c:picball.ico”) Timer1 .Interval=200 End Sub Private Sub Timer1_Timer( ) Static x , y As Integer x=x+100 y=y+100 Picture1.Move x , y End Sub

13、（二）有一個(gè)單擊按鈕過(guò)程，其作用是產(chǎn)生50個(gè)60100的隨機(jī)數(shù)，統(tǒng)計(jì)其中被6整除余2的個(gè)數(shù)，并將這些數(shù)輸出。請(qǐng)?zhí)羁眨?Private Sub Command1_Click() Dim x As Integer, N% Dim Counter As Integer randomize Timer For N=1 To 50 X=Rnd()* rnd()*41+60 If x Mod 6 =2 Then Print x Counter= Counter+1 End if Next N Print Counter End Sub六、隨機(jī)產(chǎn)生30-100（包括30、100）的10 個(gè)正整數(shù)，求最大值、最小值、平均值、和。Private Sub Form_click()Dim i%, s%, aver%, max%, min%Dim a%(10)min = 100: max = 30Print 10個(gè)數(shù)為：F