《vb程序設(shè)計》期末復(fù)習(xí)題及答案

1、«vb程序設(shè)計期末復(fù)習(xí)題及答案一、填空題1 .創(chuàng)建一個VB應(yīng)用程序三個主要的步驟是、和O2 .當(dāng)程序運行時，要求窗體中的文本框呈現(xiàn)空白，則在設(shè)計時，應(yīng)當(dāng)在此文本框的窗口中，把此文本框的屬性設(shè)置成空白。3 .Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信息，可使用控件；若允許用戶輸入文本，則應(yīng)使用控件。4 .窗體的常用方法有、和。5 .要想在代碼中給名為txtshow的文本框賦予文本：GOODWORK應(yīng)當(dāng)編寫的語句是O6 .若命令按鈕的名稱為Cmdopen程序要求單擊該命令按鈕時，打開一個窗口frm1,請對以下事件過程填空。PrivateSub

2、CmdopenEndSub7 .VisualBasic6種類型的表達(dá)式是、。VisualBasic根據(jù)表達(dá)式的來確定表達(dá)式的類型。8 .表達(dá)式937Mod2A2的值是。9 .已知a=3,b=4,c=5,表達(dá)式a>bandNotc>aOrc>bAndc<a+b的值是。表達(dá)式c>aAndNotb<c的值是010 .日期表達(dá)式#2/24/02#-#2/12/02#的值為。11 .數(shù)學(xué)表達(dá)式sin2x+寫成等價的VisualBasic表達(dá)式為。12 .設(shè)某個程序中要用到一個二維數(shù)組，要求數(shù)組名為A,類型為字符串類型，第一維下標(biāo)從1到5,第二維下標(biāo)從-2到6,則相應(yīng)的

3、數(shù)組聲明語句為。13 .事件就是在對象上所發(fā)生的事情，VisualBasic中的事件如、等。一個對象響應(yīng)的事件可以有個，用戶不能建立新的事件。事件過程是指。假設(shè)某一事件過程如下：PrivateSubcmd1_Click（）?Form1.Caption="VB示例"EndSub則響應(yīng)該過程的對象名是,事件名是。14 .對象的方法用于。當(dāng)方法不需要任何參數(shù)并且也沒有返回值時，調(diào)用對象的方法的格式為,例如，對窗體Form1使用Show方法，應(yīng)寫成。15 .PictureBox控件可通過設(shè)置其屬性為True使之可自動調(diào)整大小；而Image控件可通過設(shè)置其屬性為True,使其加載的圖

4、片能自動調(diào)整大小以適應(yīng)Imageo16 .在VisualBasic程序中實現(xiàn)復(fù)制文件"c:”到d:盤根目錄下的語句為二、單項選擇題1 .下列控件中沒有Caption屬性的是（？?？）A、標(biāo)簽?B、文本框?C、框架？?？D、命令按紐2 .除框架外，能對單選按紐分組的控件是（？?？）。A、窗體？?？B、標(biāo)簽？?？C、圖片框？?？D、圖像?A、ABCDEFG?BP00000?C、89YWDDF?Dxyz4 .下列不屬于VisualBasic數(shù)據(jù)文件的是（？?？）。A、順序文件?B、隨機文件？?？C、二進制文件？?？D、數(shù)據(jù)庫文件5 .若要求從文本框中輸入密碼時在文本框中只顯示*號，則應(yīng)用在

5、此文本框的屬性窗口中設(shè)置（？?？）。A、Text屬性值為*?B、Caption屬性值為*C、Password屬性值為空？?？D、PasswordChar屬性值為*6 .表達(dá)式2*3A2+2*8/4+3人2的值為（?）。?A、64?B、31?C、49?D、427 .表達(dá)式mid（"abcdefg”,3,2）的值是（？?？）A、abc?B、cd?C、bcd?D、abcde8 .數(shù)學(xué)表達(dá)式Sin25°寫成VB表達(dá)式是（？?？）。A、Sin25?B、Sin（25）C、Sin（25°）?D、Sin（25*3.14/180）9 .Sub過程與Function過程最根本的區(qū)別是

6、（？）。A、Sub過程可以使用Call語句或直接使用過程名調(diào)用，而Function過程不可以。B、Function過程可以有參數(shù)，Sub過程不可以。C、兩種過程參數(shù)的傳遞方式不同。D、Sub過程的過程名不能返回值，而Function過程能夠通過過程名返回值。10 .選拔身高T超過1.7米且體重W、于62.5公斤的人，表示該條件的布爾表達(dá)式為（？?？）A、T>=1.7AndW<=62.5?B、T<=1.7OrW>=62.5C、T>1.7AndW<62.5?D、T>=1.7OrW<62.5?A、列表框？?？B、圖片框？?？C、窗體？?？D、計時器12

7、 .在VisualBasic中，按文件的訪問方式不同，可以將文件分為（？?？）A、順序文件、隨機文件和二進制文件?B、文本文件和數(shù)據(jù)文件C、數(shù)據(jù)文件和可執(zhí)行文件?D、ASCH文件和二進制文件13 .將通用對話框CommonDialog的類型設(shè)置成“顏色”對話框，可調(diào)用該對話框的（？?？）方法。A、ShowOpen?BShowSave?C、ShowColor?D、ShowFont三、指出下列句中的錯誤，修改或者說明原因。1 .sum和int.sum都可以作為VB的變量名。2 .變量名的長度最長可達(dá)1024個字符。3 .下列程序運行結(jié)果：3,3OptionExplicitPrivateSubCom

8、mand1_Click（）Dima,bAsIntegera=3.6b=3.6Text1.Text=aText2.Text=bEndSub4 .程序可以改變定長字符串的內(nèi)容和長度。5 .Variant是一種特殊的數(shù)據(jù)類型，可以包含任何種類型的數(shù)據(jù)。6 .下列程序運行結(jié)果為True?PrivateSubCommand1_Click()a=1b=2c=3Textl.Text=c>a+bOrb-1>c-1Andc+a>aXorb<c-2EndSub7 .#12/31/1999#-#12/20/1999#的運算結(jié)果是#12/11/1999#8 .可以在窗體的通用部分聲明靜態(tài)變量。

9、9 .使用聲明語句建立一個變量后，VisualBasic會自動對數(shù)值類型的變量賦初值0,變長的字符串被初始化為一個零長度的字符串""，定長字符串用空格填充，Variant變量被初始化為Empty,布爾型的變量被初始化為False。10 .事件過程通常由事件驅(qū)動執(zhí)行，而Sub過程通過過程調(diào)用執(zhí)行。11 .將焦點主動設(shè)置到指定的控件或窗體上應(yīng)采用SetFocus方法。12 .當(dāng)圖像控件(Image)的Stretch屬性為True時，Image控件能自動調(diào)整自己的尺寸與顯示的圖片匹配。四、讀程序題，寫出程序運行結(jié)果。1. PrivateSubForm_Click()?ForI=1

10、To9?Forj=1To30-3*I?Print""?Nextj?Fork=1ToI?Printk;?Nextk?Fork=I-1To1Step-1?Printk;?Nextk?Print?NextIEndSub2.OptionExplicitPrivateSubCommand1_Click()?StaticSAsInteger?DimiAsInteger?S=1?Fori=1To5?S=S*i?NextiEndSub3.?ForX=5To1Step-1?For丫=1To6-X?PrintTab(Y+5);"*"?NextY?PrintNextX4.?P

11、rivateSubForm_Activate()Print"aa"&"bb",-5*6,Not2<=3Print"aa"&"bb"-5*6;Not2<=3PrintPrint"30+60",Print30+60?"30+60"30+60EndSub5.X=1DoWhileX<=10IfXMod7=0ThenY=X+6ElseZ=XEndIfX=X+2LoopPrintX,Y,Z五、編程題1 .設(shè)計一個計算程序。該程序用戶界面如圖所示，由四個文

12、本框：文本框1(text1)、文本框2(text2)、文本框3(text3)、文本框4(text4),和三個按鈕：命令按鈕1(command)、命令按鈕2(command2、命令按鈕3(command4組成。程序運行后，用戶單擊清除按鈕，則清除文本框中顯示的內(nèi)容。單擊計算按鈕，如果成績填寫不完全，則給出提示信息，否則計算三科平均成績。單擊退出按鈕則退出。2 .設(shè)計程序。要求：從文本框Text1中接收輸入的數(shù)據(jù)，當(dāng)單擊確定按鈕(command)時，如果該數(shù)據(jù)滿足條件：除以3余2,除以5余3,除以7余4,則輸出；否則將焦點定位在文本框Text1中，選中其中的文本。3 .設(shè)計一個歡迎程序。該程序用戶

13、界面如圖所示。要求程序運行后，用戶選中粗體復(fù)選框時，標(biāo)簽(Labell)中的文字(歡迎您！)的字體變成粗體，用戶選中斜體復(fù)選框時，標(biāo)簽的字體變成斜體。若取消選中，則恢復(fù)原字體。單擊結(jié)束，則退出。4 .任意輸入3個數(shù)，求大小排第二的那個數(shù)，寫出程序代碼。?VB»期末復(fù)習(xí)參考答案一、填空題1. .創(chuàng)建應(yīng)用程序界面？?？設(shè)置屬性？?？編寫代碼2. 屬性、text3. Label?TextBox4. Load方法？Show方法？?？Hide方法？?？Unload方法5. txtshow.text="GOODWORK"6. Click()、frm1.show7.算術(shù)表達(dá)式字

14、符串表達(dá)式關(guān)系表達(dá)式布爾表達(dá)式?日期表達(dá)式？?？對象表達(dá)式?運算符8. 19. TrueFalse10. 1211. Sin(x)A2+Sqr(xA2-yA2)/(2*x)12. DimA(1To5,-2To6)AsString13 .單擊？雙擊？裝載？多？?？響應(yīng)某個事件后所執(zhí)行的程序代碼?cmd1?Click14 .完成某種特定的功能？?？對象名.方法名？?？Form1.Show15. AutoSize?Stretch16. FileCopy"c:","d:"二、單項選擇題1.B?2.C?3.C?4.D?5.D?6.B?7.B8.D?9.D?10.C

15、?11.D?12.A?13.C三、指出下列句中的錯誤，修改或者說明原因。1.int.sum不正確。變量名中不能包括小數(shù)點。2.變量名的長度最長可達(dá)255個字符。3 .3.6,4因為a不是整型變量。4 .不正確。程序不可以改變字符的長度，這是VB規(guī)定。5.不完全正確。Variant是一種特殊的數(shù)據(jù)類型，除了定長字符串?dāng)?shù)據(jù)及用戶定義類型外，可以包含任何種類型的數(shù)據(jù)，這是VB規(guī)定。6 .False。邏輯表達(dá)式計算結(jié)果。7 .不正確。兩個日期型數(shù)據(jù)相減，其結(jié)果是一個數(shù)值型數(shù)據(jù)。8 .不正確。靜態(tài)變量為局部變量，只能在過程中聲明。9 .正確。10 .正確。11 .正確。12.不正確。該屬性設(shè)為Ture時

16、，Image控件不能自動調(diào)整自己的尺寸與顯示的圖片匹配，而可以使圖片自動擴展以適應(yīng)控件的尺寸。四、讀程序題，寫出程序運行結(jié)果。1.程序運行后，單擊窗體，輸出結(jié)果為:11 21123211234321123454321123456543211234567654321123456787654321123456789876543212 .程序運行后，單擊按鈕Command1輸出結(jié)果為：120。3.?*?*?*?*?*4.aabb?-30?Falseaabb-30False30+60?9030+60905.?11?13?9五、編程題1. .PrivateSubCommand1_Click()?Text

17、1.Text=""?Text2.Text=""?Text3.Text=""?Text4.Text=""EndSubPrivateSubCommand2_Click()?a=Trim(Text1.Text)?b=Trim(Text2.Text)?c=Trim(Text3.Text)?Ifa=""Orb=""Orc=""Then?MsgBox"成績填寫不完全！",vbCritical?Else?Text4.Text=(Val(a)+Val(

18、b)+Val(c)/3?EndIfEndSubPrivateSubCommand3_Click()?UnloadMeEndSub2.PrivateSubCommand1_Click()?x=Val(Text1.Text)?IfxMod3=2AndxMod5=3AndxMod7=4Then?Printx?Else?Text1.SetFocus?Text1.SelStart=0?Text1.SelLength=Len(Text1.Text)?EndIfEndSub3.PrivateSubCheck1_Click()?IfCheck1.Value=1Then?Else?EndIfEndSubPriv

19、ateSubCheck2_Click()?IfCheck2.Value=1Then?Else?EndIfEndSubPrivateSubCommand1_Click()?UnloadMeEndSub4.a=Val(InputBox("輸入第一個數(shù)：")b=Val(InputBox("輸入第二個數(shù)：")c=Val(InputBox("輸入第三個數(shù)：")Ifa<bThent=a:a=b:b=tIfa<cThent=a:a=c:c=tIfb<cThent=b:b=c:c=tMsgBox("求大小排第二的數(shù)是：&q

20、uot;&b)?VB期末考試試題A卷一、填空題1、VB程序設(shè)計的主要特點是(1)和(2)。2、在VB中，最主要的兩種對豪度(3)知(4)。3、工程是構(gòu)成應(yīng)用程序文件的(5)。4、方法是VB提供的一種(6),用來完成一定的操作。5、浮點類型數(shù)據(jù)包括單精度型和(7)數(shù)據(jù)。6、事件是窗體或控件對象識別的一(8)。7、可用窗體的(9)_方法在窗體中顯示文字。8、復(fù)選框控件Value屬性指示復(fù)選框處于(10)或禁止?fàn)顟B(tài)(暗淡的)中的某一種。9、在VB中，修改窗體的(11)和(12)屬性值,可改變窗體的大小。10、雙擊工具箱中的控件圖標(biāo)，可在窗體的(13)出現(xiàn)一個尺寸為缺省值的控件。11、在Msg

21、Box函數(shù)中，如果缺省title參數(shù)，則使用(14)作為消息框的標(biāo)題。12、設(shè)x=34.58,語句PrintFormat(x,“000.0”)的輸出結(jié)果是(15)。13、在VB中，數(shù)值型變量的初值為(16),Varant型變量的初值為(17),布爾型變量的初值為(18)。14、設(shè)置窗體的(19)屬性,可在窗體上顯示圖片。15、程序運行工程中，清除一MP圖片框中的圖片應(yīng)使用語句(20)。、選擇題1、菜單控件只包括一個事件，即(1),當(dāng)用鼠標(biāo)單擊或鍵盤選中后按“回車”鍵時觸發(fā)該事件，除分隔條以外的所有菜單控件都能識別該事件。A、GotFocusB、LoadC、ClickD、KeyDown2、滾動條

22、控件(如圖所示)的Max屬性所設(shè)置的是(2)。A、滾動框處于最右位置時，一個滾動條位置的Value屬性最大設(shè)置值B、單擊滾動條和滾動箭頭之間的區(qū)域時，滾動條中滾動塊的最大移動量C、單擊滾動條的箭頭區(qū)域時，滾動條中滾動塊的最大移動量H滾動條控件無該屬性3、SQL 語句 Select * Form studentA、所有記錄B 、所有字段4、以下選項中，不屬于標(biāo)簽的屬性是A、Enabled B 、Caption中的*表示(3)C 、所有表 D、都不對(4)。C 、Default D 、Font5、要求改命令按鈕顯示的文本，應(yīng)當(dāng)在屬性窗口中改變的屬性是(5)A、CaptionB、NameC、Text

23、D、Label6、設(shè)置一個單選按鈕(OptionButton)所代表選項的選中狀態(tài)，應(yīng)當(dāng)在屬性窗口中改變的屬性是(6)A、CaptionB、NameC、TextD、Value7、允許在菜單項的左邊設(shè)置打勾標(biāo)記，下面哪種論述是正確的？(7)。A、在標(biāo)題項中輸入&,然后打勾B、在索引項中打勾C、在有效項中打勾D、在復(fù)選項中打勾8、當(dāng)執(zhí)行以下過程時，在窗體上將顯示(8)PrivateSubCommand1_Click()Print"VB"Print"Hello!"Print"VB"EndSubAVBHello!VBB、VBHello

24、!VBCVBD、VBHello!VBHello!VB9、語句Print"Theansweris:"20/4-2的結(jié)果為(9)。ATheansweris20/4-2B、Theansweris3CTheansweris"20/4-2"D、非法語句10、下列哪個控件是容器控件(10)。A、ImageB、PictureC、ComboBoxD、FileListBox11、若要將窗體從內(nèi)存中卸載出去，其實現(xiàn)的方法是(11)。A.ShowB.HideC.LoadD.UnLoad12、以下選項中，不是VisualBasic控件的是(12)。A.窗體B.定時器C.單選框D

25、.命令按鈕13、雙擊窗體中的對象后，VisualBasic將顯示的窗口是(13)。A.代碼窗口B.工具箱C.項目(工程)窗口D.屬性窗口14、可決定窗體的左上角是否有控制菜單的屬性是(14)。A.ControlBoxB.MinButtonC.MaxButtonD.BorderStyle15、設(shè)有如下語句：Strl=InputBox("輸人"，""，"練習(xí)")從鍵盤上輸人字符“示例”后，Strl的值是(15)。A.“輸入"B.""C.DT.“示例”16、窗體Form1的Name屬性是Frm1,它的單擊事件過

26、程名是(16)?A.Form1_ClickB.Form_ClickC.Frm1_ClickD.Me_Click17、窗體向hide屬性的弓義是(17)。?a.隱藏b.展現(xiàn)"C-D.卸載18、若要設(shè)置定時器控件的定時時間，需設(shè)置的屬性是(18)。A.EnabledB.ValueC.IntervalD.Text19、能夠改變復(fù)選框中背景顏色的屬性是(19)。A.ValueB.FontColorC.BackColorD.Font20、窗體能響應(yīng)的事件是(20)。A.ActiveFormB.LoadC.DriveD.Change、判斷題(判斷下列正確與否，正確的打，錯誤的打X。)1、三種方式

27、的組合框都允許用戶輸入哪些不在列表框中的選項。2、圖象框中的Stretch屬性為true時，其作用是圖形自動調(diào)整大小以適應(yīng)圖象控件。3、在菜單編輯器中使用“索引”時，可有一組菜單項具有相同的“名字”。4、通過改變屬性窗口中的Name屬性，來改變窗體的標(biāo)題。5、創(chuàng)建VB應(yīng)用程序的三個主要步驟是：(1)創(chuàng)建應(yīng)用程序界面(2)設(shè)置控件(3)編寫代碼。6、變量是指在程序運行過程中其值可以改變的那些量，而值不能改變的是常量。7、已知P=MsgBox("Howareyou?",VbYesNo+VbQuestion,"Hello!"),變量P是Integer數(shù)據(jù)類型。

28、8、工程文件的擴展名是.vbg。9、VB允許設(shè)計和使用用戶自己設(shè)計的控件。10、OptionButton控件沒有DblCliek事件。11、同一條記錄中的各數(shù)據(jù)具有相同的類型。12、使用Data控件可以直接顯示數(shù)據(jù)庫中的數(shù)據(jù)。13、ImageList是一個圖像容器控件，可用作工具欄的圖像庫。14、當(dāng)用戶單擊工具欄按鈕時，將觸發(fā)工具欄按鈕的ButtonClick事件。15、在VB的工程資源管理器中，如果從工程中移除已經(jīng)保存過的文件，該文件仍然被物理刪除(真正刪除)。16、如果列表框的ListConut的屬性為10,則列表框最后一項的ListIndex值為10。17、要是某個命令按鈕不起作用，應(yīng)將

29、該按鈕的Enabeld屬性設(shè)置為False。18、使用數(shù)組定義語句：DimD$(10),則數(shù)組D中各元素的值為空。19、如果在一行中輸入多條語句，各語句之間用使用；分隔。20、在代碼窗口中輸入某行代碼并按回車鍵之后，如果代碼變成紅色，說明該行代碼有語法錯誤。四、讀程序題，寫出程序運行結(jié)果1、PrivateSubForm_Click()StaticSUMAsIntegerI=1DoWhileI<=10SUM=SUM+II=I+1LoopPrintSUMEndSub運行程序，第一次單擊窗體：第二次單擊窗體：2、PrivateSubForm_Click()Print"*"T

30、ab(6);2,Tab(15);5PrintForI=15To16PrintI;Forj=2To6Step3PrintTab(3*j);j*I;NextjPrintNextIEndSub程序運行結(jié)果：五、編程題(一)窗體中有圖片框(Picture1)和計時器(Timeh)兩個控件，運行程序時，將圖片加載到圖片框中，然后圖片框以每2秒鐘一次的速度向窗體的右下腳移動，每次向左、向右移動100twip(20分之一像素)。請?zhí)羁眨篜rivateSubForm_load()(1)=loadPicture("cball.ico”)2.Interval=200EndSubPrivateSubTim

31、er1_Timer()Staticx,yAsIntegerx=x+100y=y+100Picture1.Move(3)EndSub(二)有一個單擊按鈕過程，其作用是產(chǎn)生50個60100的隨機數(shù)，統(tǒng)計其中被6整除余2的個數(shù)，并將這些數(shù)輸出。請?zhí)羁眨篜rivateSubCommand1_Click()DimxAsInteger,N%DimCounterAsInteger(1)TimerForN=1To50X=Rnd()*(2)If(3)=2ThenPrintxCounter=(4)(5)NextNPrintCounterEndSub«VB程序設(shè)計與應(yīng)用參考答案一、填空題12345答案可視

32、化設(shè)計事件驅(qū)動編程窗體（form）控件集合題號678910答案特殊子程序雙精度動作Print選中題號1112131415答案高度（Height）寬度（Width）中央工程134.6題號1617181920答案0空FalsePictureCis二、選擇題1P2P345答案CABCA題號678910答案DDABB題號1112131415答案DAAAD題號1617181920答案CACCB三、判斷題12345678910答案XXXVXVVVVX11121314151617181920答案VXVVXXVXXV四、程序閱讀題:（一）（10分）1 、552 、110（二）、（10分）*2515307516

33、3280五、編程題（20分）1、Picture1.Picture2、 Timeh3、 x,y（二）1、Randomize2 、Rnd（）*41+603 、xMod64 、Counter+15 EndIf一、單項選擇題（共10分）1 .在代碼中引用一個控件時，應(yīng)使用控件的（B）屬性。A.CaptionB.NameC.TextD.Index2 .設(shè)變量x=4,y=-1,a=7,b=-8,下面表達(dá)式（A）的值為假”。A.x+a<=b-yB.x>0ANDy<0C.a=bORx>yD.x+y>a+bANDNOT（y<b）3 .表達(dá)式Int（Rnd*71）+10產(chǎn)生的隨

34、機整數(shù)范圍是（C）。A.（10,80）B.（10,81）C.10,80D.10,814 .函數(shù)Sgn（3.1416）的返回值是（C）。A.-1B.0C.1D.以上都不對5 .67890屬于（D）類型數(shù)據(jù)。A.整型B.單精度浮點數(shù)C,貨幣型D.長整型6 .下列變量名中正確的是（D）。A.3sB.PrintC.SelectMyNameD.Select_17 .下列賦值語句(A)是有效的。A.sum=sum-sumB.x+2=x+2C.x+y=sumD.last=y/08 .以下的控件或方法具有輸入和輸出雙重功能的為(B)。A.PrintB.TextboxC.OptionbuttonD.Checkb

35、ox9 .若要獲得列表框中被選中的列表項的內(nèi)容，可以通過訪問(D)屬性來實現(xiàn)。A.NameB.ListIndexC.ListCountD.Text10 .下列代碼的運行結(jié)果為(B)。PrivateSubcommand1_click()Dimm(10)Fork=1To10m(k)=11-kNextkx=5Printm(2+m(x)EndSubA.2B.3C.4D.5二、填空題(10分)1 .寫出整數(shù)n能同時被13和17整除的Basic表達(dá)nMod13=0AndnMod17=0式2 .代碼窗口中有兩個下拉列表框：左側(cè)是(對象)列表框，右側(cè)是過程列表框。,6)3 .寫出在字符串"Visua

36、lBasic6.0中截取"Visual的Basic表達(dá)式LEFT("VisualBasic6.04 .函數(shù)Len("abcdef返返回值是(6)。5 .設(shè)a=2,b=5,c=-2,d=100,則a>b>=cANDa<b>=d的值為False三、將下列數(shù)學(xué)表達(dá)式轉(zhuǎn)換為VB表達(dá)式。(6分)1,a2+2ab+b2:aA2+2*a*b+bA22.8exln10:8*exp(x)*log(10)3.2sin(450)cos(450):2*sin(3.1416/4)*cos(3.1416/4)6.在VB中，用戶定義常量使用Const語句，聲明變量使用D

37、im語句。1 .在VB6.0中，擴展名為.vbp的文件稱為A。A）工程文件B）窗體文件C）類模塊文件D）標(biāo)準(zhǔn)模塊文件2 .在VB6.0集成開發(fā)環(huán)境的設(shè)計模式下，用鼠標(biāo)雙擊窗體上的某個對象后，打開的窗口是AA）代碼窗口B）窗體設(shè)計窗口C）屬性窗口D）工程資源管理器窗口3 .設(shè)有變量定義語句Dima%,則變量a的數(shù)據(jù)類型是A。A）整型B）單精度類型C）雙精度類型D）字符串類型4,下列表達(dá)式中，值為False的是D。A）"AB"<"abc"B）"ABC"=UCase（"abc"）C) "ABCD"

38、;<"abc"D)Mid("ABCD",3,1)=Left("ABCD",3)5 .函數(shù)InStr("ABCDEF","CD")的值是B。D) CDEFA)2B)3C)True6 .下列程序運行后，單擊窗體，輸出結(jié)果是C。PrivateSubForm_Click()DimaAsInteger,bAsIntegera=3b=5Printa+b;a&bEndSubA)88B)3535C)8357 .下列程序運行后，單擊窗體，輸出結(jié)果是B。PrivateSubForm_Click()a=

39、3:b=7a=a+b:b=a-b:a=a-bPrinta;bEndSubA)43B)73C)37D) 35 8D) 10 78 .下面程序段所表示的數(shù)學(xué)關(guān)系式是CIf(a<b)ThenIfd=cThenx=1ElseA) xC) x =1(a < bHc =d)：2(a > b)B) x =1(a < b且c = d)=D) x =2(a<b且 c#d) 1(a < b且c = d) 2(c*d)9.下列程序運行后，單擊窗體，輸出結(jié)果是Private Sub Form_Click()s = 0: k = 1Dos = s + k: k = k + 1Loop

40、 Until k <= 5Print sEnd SubA) 15B) 10C)1D)010 .下列程序段的輸出結(jié)果是BFor k = 4 To 2 Step -2 m = kNext kPrint m; k;A) 2 2B) 2 0C) 2 1D) 0 011 .用下面的語句定義數(shù)組，則數(shù)組中的元素個數(shù)是D 個。Option Base 1Dim A(-1 To 2 , 5) As IntegerA) 5B) 10C) 15D) 2012 .下面程序段的輸出結(jié)果是C。Dim a(4) As Integer, s As IntegerFor k = 1 To 4a(k) = 2 * kNex

41、t kFor k = 1 To 4 Step 2 s = s + a(k) Print s;Next kA) 8B) 20C)2 8D) 2 6 12 2013 .設(shè)有如下的用戶自定義類型EndIfPrivateTypeStunameAsString*10ageAsIntegerB。B) Dim s As Stu = "zhang"D) Dim s As Type = "zhang"EndType則以下正確引用該類型成員的代碼是A)S="zhang"C)DimsAsTypeS=

42、"zhang"14 .用“B”關(guān)鍵字聲明的變量稱為全局變量。D) StaticA)PrivateB)PublicC)Dim15 .在窗體上放置一個文本框，程序運行后，在文本框中輸入abc,但顯示的卻是*,可能的原因是該文本框的D屬性值已經(jīng)被設(shè)置為"*"。D) PasswordCharD)名稱D。D) Value中，能夠刪除最后A)FontB)TextC)Name16 .在VB6.0中，Print是對象的B。A)屬性B)方法C)事件17 .在VB6.0中，要判斷復(fù)選框是否為選中狀態(tài)，使用的屬性是A)CaptionB)CheckedC)Selected18

43、.設(shè)列表框List1中共有3個列表項，如右圖所示。則下列語句個列表項的是A。A) List1.RemoveItem2B) List1.RemoveItem"項目C"C) List1.RemoveItemList1.ListcountD) List1.RemoveItemList1.Listindex“屬性”窗口中這三D) BorderStyleValue屬性所增加或減少的值，是由 DD) LargeChange19 .組合框分為下拉式組合框、簡單組合框和下拉式列表框，在種類型是由A屬性設(shè)置的。A)StyleB)FillStyleC)BackStyle20 .用戶單擊滾動條的

44、空白處(滑塊與兩端滾動箭頭之間的區(qū)域)時，屬性決定的。A)MinB)MaxC)SmallChange21 .將圖片文件“b.jpg”作為背景圖片，裝入當(dāng)前窗體，正確的語句是DA) Me.Picture=b.jpgC) Me.Picture="b.jpgB)Me.Picture=LoadPicture(b.jpg)D)Me.Picture=LoadPicture("b.jpg")22 .要將兩個單選按鈕放置在同一個框架內(nèi)，使它們成為一組，正確的操作是A_。A)先放置一個框架，然后在框架中放置兩個單選按鈕B)先放置兩個單選按鈕，再放置一個框架，放置框架時覆蓋在單選按鈕

45、上C)先放置兩個單選按鈕，再放置一個框架，然后將兩個單選按鈕拖動到框架內(nèi)D)以上三種方法都正確23 .計時器控件能夠響應(yīng)的事件是D。A)LoadB)ClickC)ChangeD)Timer24 .要使命令按鈕處于無效狀態(tài)，可以設(shè)置按鈕的B屬性值為False。A)CaptionB)EnabledC)StyleD)Visible25 .如果在一個工程中有多個窗體和模塊，則VB默認(rèn)的啟動對象是C。A)第一個標(biāo)準(zhǔn)模塊B)最后一個被添加的窗體C)設(shè)計時的第一個窗體D)最后一個被添加的標(biāo)準(zhǔn)模塊26 .在窗體上放置一個圖像框，名稱為Image1。程序運行時，要保持圖像框大小不變，使框中的圖片能夠自動適應(yīng)圖像

46、框的大小，可以執(zhí)行語句B。A)Image1.AutoSize=TrueB)Image1.Stretch=TrueC)Image1.AutoSize=FalseD)Image1.Stretch=False27 .使用“菜單編輯器”建立菜單項之間的分隔線時，在菜單項的“標(biāo)題”中輸入的符號是2AA)減號-B)下劃線_C)&D)#28 .要將窗體Forml從內(nèi)存中卸載，正確的語句是D。A)Forml.ShowB)LoadFormlC)Forml.HideD)UnLoadForml29 .在窗體上單擊時，會觸發(fā)鼠標(biāo)事件MouseDown其事件過程的一般格式如下：PrivateSubForm_Mo

47、useDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub此時，如果單擊的是鼠標(biāo)右鍵，則Button參數(shù)的值是BD) 4D) LOG()答案 sqr(3*y)/(x+y)。答案：字符串類型或 StringA)1B)2C)330 .獲取文件的長度(字節(jié)數(shù))，可以使用的函數(shù)是B。A)LEN()B)LOF()C)EOF()1 .數(shù)學(xué)表達(dá)式曲y改寫為VB表達(dá)式，形式是1】。xy2 .在VB6.0中，InputBox函數(shù)返回值的數(shù)據(jù)類型是【2】3 .語句PrintTab(5);"ABC"的功能是。答案：從第5列開

48、始輸出字符串“ABC4 .下面程序段的功能是：在文本框Textl中輸入一個數(shù)值x,如果滿足5Vx<10,那么輸出“Yes”，否則輸出“N。”。請?zhí)羁?。x=Val(Text1.Text)答案5<xAndx<10If【4】ThenPrint"Yes"ElsePrint"No"5 .設(shè)a=1,b=2,c=3,語句Printa<bOrb<cAndc<a的輸出結(jié)果是【5】。答案：True6 .在窗體上放置一個標(biāo)簽，名稱為Label1,使用語句【6】可以把標(biāo)簽的前景色設(shè)置為藍(lán)色。Label1.ForeColor=vbBlue或RG

49、B(0,0,255)或QBColor(9)7 .在窗體上放置一個圖像框，名稱為Image1,要使該圖像框向下移動10個默認(rèn)單位(twip),正確的語句是Image1.Top=7答案：Image1.Top+108 .使用“菜單編輯器”建立了一個主菜單，名稱為menul要把它作為窗體Form1的快捷菜單(也稱為彈出式菜單)彈出，使用的語句是：答案：PopupmenuForm1.【8】menu19 .在窗體上放置一個通用對話框控件，名稱為CommonDialogK使用該控件建立“打開”文件對話框時，要求只能顯示文本文件(即擴展名為“.txt”的文件)，則正確的設(shè)置語句是CommonDialog1.【

50、9="文本文件(*.txt)|*.txt"。答案：Filter10 .設(shè)磁盤上已存在順序文件“a.txt”，為了從文件中順序讀取數(shù)據(jù)而打開該文件，正確的語句是Open"a.txt"For【10】As#1。答案：Input1.下列面程序運行后，單擊窗體，輸出結(jié)果是1。答案：139PrivateSubForm_Click()s=0Forn=1To3p=1Fork=1Tonp=p*kNextks=s+pPrints;NextnEndSub2.下列程序運行后，單擊窗體，輸出結(jié)果是PrivateSubForm_Click()m=0Fork=1To4SelectCa

51、sekCase1,2m=m+1CaseIs>3m=m+2Case1To4m=m+3EndSelectNextkPrintmEndSub3. ?在窗體上放置一個文本框，名稱為【3】。答案：adePrivateSubForm_Click()Text1.Text=""s="aBd12Re”Fork=1ToLen(s)ch=Mid(s,k,1)Ifch>="a"Andch<="z"ThenText1.Text=Text1.Text+chEndIfNextkEndSub4. ?下列程序運行后，單擊窗體，輸出結(jié)果是Op

52、tionBase1PrivateSubForm_Click()x=Array(3,5,4,8,2,6,11,9,7,4)p=x(1):s=0Fork=2ToUBound(x)Ifx(k)>pThenP=x(k)s=s+pEndIfNextkPrintp;sEndSub5. ?下列程序運行后，單擊窗體，輸出結(jié)果是。答案：7Text1。下列程序運行后，單擊窗體，Text1【4】。答案：1124【5】。答案：151中顯示的內(nèi)容是PrivateSubForm_Click()Dima(1To3,1To3)Fori=1To3Fork=1To3Ifk=1Ori=kThena(i,k)=1Elsea(i

53、,k)=i+kEndIfNextkNextiPrinta(1,1);a(2,3);a(3,3)EndSub6 .在窗體上放置一個命令按鈕，名稱為Command2并編寫如下代碼。PrivateSubCommand2_Click()DimmAsInteger,nAsInteger,gAsIntegerm=18:n=12:g=0Callsub1(m,n,g)Printm;n;gEndSubPublicSubsub1(ByValaAsInteger,ByValbAsInteger,cAsInteger)Ifa<bThent=a:a=b:b=tDoWhileb<>0r=aModba=b

54、b=rLoopc=aEndSub程序運行后，單擊命令按鈕，則輸出結(jié)果是6。答案：181267 .在窗體上放置一個命令按鈕，名稱為Command?并編寫如下代碼。PrivateSubCommand3_Click()DimkAsIntegerk=1Printfun1(k);Printfun1(k);Printfun1(k);EndSubFunctionfun1(aAsInteger)AsIntegerStaticcAsIntegerDimbAsIntegera=a+2:b=b+2:c=c+2fun1=a+b+cEndFunction程序運行后，單擊命令按鈕，則輸出結(jié)果是7。答案：711158 .在窗體上放置一個文本框，其名稱為Text1,并編寫如下代碼。DimsAsStringPrivateSubText1_KeyPress(KeyAsciiAsInteger)s=s+Chr(KeyAscii)Prints;EndSub程序運行后，在文本框中輸入abc,則窗體上輸出的內(nèi)容是8】。答案：aababc1 .在窗體上放置一個計時器和一個標(biāo)簽，計時器名稱為Timer1,標(biāo)簽名稱為Label1。下