vb期末理論復(fù)習(xí)資料

1、vb1 滿分：293分姓名：_1、單項(xiàng)選擇題(本題共計(jì)169分)1、能被對(duì)象所識(shí)別的動(dòng)作與可執(zhí)行的活動(dòng)分別稱為對(duì)象的_。 ( )A、方法、事件 B、事件、方法 C、事件、屬性 D、過程、方法2、一個(gè)應(yīng)用程序_窗體。 ( )A、只許有一個(gè) B、可以沒有 C、應(yīng)該有兩個(gè) D、可包括多個(gè)3、對(duì)象在響應(yīng)某個(gè)事件時(shí)，計(jì)算機(jī)要執(zhí)行一段程序，以完成相應(yīng)的操作，這樣的程序片段叫做 _過程。 ( )A、方法 B、事件 C、調(diào)動(dòng) D、編譯4、以下關(guān)于事件的說法，正確的是_。 ( )A、事件是由系統(tǒng)預(yù)先定義好的，能夠被對(duì)象識(shí)別的動(dòng)作 B、用戶可以根據(jù)需要建立新的事件 C、事件的名稱是可以改變的，由用戶預(yù)先定義 D、

2、不同類型的對(duì)象所能識(shí)別的事件一定不相同5、VisualBasic中的工程文件的擴(kuò)展名是_。 ( )A、.reg B、.frm C、.bas D、.vbp6、_是接收用戶鼠標(biāo)或鍵盤輸入的能力。當(dāng)對(duì)象具有_時(shí)，可接受用戶的輸入。 ( )A、事件 B、屬性 C、焦點(diǎn) D、對(duì)象7、所謂_就是使某個(gè)對(duì)象進(jìn)入活動(dòng)狀態(tài)（又稱激活）的一種操作或動(dòng)作。 ( )A、事件 B、屬性 C、方法 D、對(duì)象8、一只白色的足球踢進(jìn)球門，則白色、足球、踢、進(jìn)球門是_。 ( )A、屬性,對(duì)象,方法,事件 B、屬性,對(duì)象,事件,方法 C、對(duì)象,屬性,方法,事件 D、對(duì)象,屬性,事件,方法9、VisualBasic是一種面向_的程

3、序設(shè)計(jì)語言。 ( )A、過程 B、用戶 C、方法 D、對(duì)象10、下面_語句，可以將列表框List1中當(dāng)前選定的列表項(xiàng)的值替換成“ABC”。 ( )A、List1.AddItem“ABC”,List1.ListIndex B、List1.Text=“ABC” C、List1.List(List1.ListIndex)=“ABC” D、前三項(xiàng)均可11、下面所列的控件屬性中，其值既能在程序設(shè)計(jì)時(shí)設(shè)定，又能在程序運(yùn)行時(shí)通過賦值改變的是_。 ( )A、List1.ListCount B、Text1.Index C、Dir1.Path D、Label1.Visible12、單選按鈕（OptionButto

4、n）用于一組互斥的選項(xiàng)中。若一個(gè)應(yīng)用程序包含多組互斥條件，可在不同的_中安排適當(dāng)?shù)膯芜x按鈕，即可實(shí)現(xiàn)。 ( )A、框架控件(Frame)或圖象控件(Image) B、組合框(ComboBox)或圖象控件(Image) C、組合框(ComboBox)或圖片框(PictureBox) D、框架控件(Frame)或圖片框(PictureBox)13、以下有關(guān)對(duì)象屬性的說法中正確的是_。 ( )A、對(duì)象所有的屬性都羅列在屬性窗口列表 B、不同對(duì)象不可能有同名屬性 C、不同對(duì)象的同名屬性取值一定相同 D、對(duì)象的某些屬性即可在屬性窗口設(shè)置，也可以通過屬性代碼設(shè)置或改變。14、用窗體的_屬性來設(shè)置窗體的標(biāo)題

5、。 ( )A、Style B、Text C、Caption D、Name15、如果要在兩個(gè)菜單命令項(xiàng)之間加一條分隔線，可在標(biāo)題文本框中鍵入_。 ( )A、- B、+ C、& D、#16、關(guān)于窗體Name屬性的敘述，正確的是_。 ( )A、窗體Name屬性可以具有與別的公共對(duì)象相同的名字 B、窗體Name屬性和變量定義一樣 C、窗體Name屬性最長可達(dá)255個(gè)字符 D、窗體Name屬性不能具有與別的公共對(duì)象相同的名字17、窗體有一個(gè)方法可以使窗體隱藏但不從內(nèi)存中卸載，該方法是_。 ( )A、Show B、Release C、Hide D、Unload18、設(shè)在菜單編輯器中定義了一個(gè)菜單項(xiàng)

6、，名為menu1。為了在運(yùn)行時(shí)讓該菜單項(xiàng)變灰，應(yīng)使用的語句是_。 ( )A、menu1.Enabled=True B、menu1.Enabled=False C、menu1.Visible=True D、menu1. Visible = False19、當(dāng)對(duì)象失去焦點(diǎn)時(shí)，將會(huì)發(fā)生_事件。 ( )A、GetFocus B、LostFocus C、Focus D、SetFocus20、要使文本框能顯示多行文字，則需設(shè)定它的_屬性為True。 ( )A、Caption B、PasswordChar C、MultiLine D、Seleted21、將文本框的ScrollBars屬性設(shè)置為非零值，卻沒有

7、效果，原因是_。 ( )A、文本框中沒有內(nèi)容 B、文本框的MultiLine屬性值為False C、文本框的MultiLine屬性值為True D、文本框的Locked屬性值為True22、當(dāng)命令按鈕的_屬性被設(shè)置為True時(shí)，按Esc鍵與單擊該命令按鈕的作用相同。 ( )A、Cancel B、Default C、Style D、Picture23、對(duì)于一個(gè)含有計(jì)時(shí)器控件的窗體，每經(jīng)過一段由_屬性指定的時(shí)間間隔，就會(huì)產(chǎn)生一個(gè)Timer事件。 ( )A、Name B、Enabled C、Caption D、Interval24、只有當(dāng)一個(gè)對(duì)象的_和_屬性為True時(shí)，它才能獲得焦點(diǎn)。 ( )A、

8、Enabled; Visible B、Visible; Caption C、Visible; Name D、Enabled; Caption25、下列控件中，可以接收焦點(diǎn)的是_。 ( )A、文本框 B、圖像框 C、框架 D、形狀26、在3種類型的組合框中，只有_才能接收DblClick事件。 ( )A、下拉式組合框 B、簡單組合框 C、下拉式列表框 D、下拉式列表框和下拉式組合框27、在運(yùn)行過程中要把某控件變灰，應(yīng)把_屬性設(shè)置為False。 ( )A、Default B、Visible C、Activate D、Enabled28、能夠獲得一個(gè)文本框中被選取文本的內(nèi)容的屬性是_。 ( )A、T

9、ext B、Length C、SelStart D、SelText29、某些對(duì)象有只讀屬性，如Name屬性，這種屬性在設(shè)計(jì)階段設(shè)置，不能在運(yùn)行期間改變。以下_屬性為只讀屬性。 ( )A、ControBox B、Enabled C、BorderStyle D、WindowState30、描述X、Y中只有一個(gè)小于Z的邏輯表達(dá)式是_。 ( )A、X<Z And Y<Z B、X<Z Or Y<Z C、X<Z Xor Y<Z D、X<Y<Z31、下列語句運(yùn)行時(shí)系統(tǒng)給出錯(cuò)誤提示的是_。 ( )A、Print -32000-769 B、Print "

10、1E2"+8 C、Print "AB" & 128 D、Print 3=2=432、對(duì)于某對(duì)象的SetFocus與GotFocus描述正確的是_。 ( )A、SetFocus是方法，GotFocus是事件 B、SetFocus是事件，GotFocus是事件 C、SetFocus是方法，GotFocus是方法 D、SetFocus是事件，GotFocus是方法33、有應(yīng)用代碼：Text1.Text="VisualBasic"，其中的Text1、Text和"VisualBasic"分別代表_。 ( )A、對(duì)象、值、屬性

11、B、對(duì)象、方法、屬性 C、對(duì)象、屬性、值 D、屬性、對(duì)象、值34、在使用菜單編輯器創(chuàng)建菜單時(shí)，可在菜單名稱中首字母前插入符號(hào)_，那么在運(yùn)行程序時(shí)按Alt鍵和該字母鍵就可打開該命令菜單。 ( )A、下劃線 B、& C、$ D、35、在程序中可以通過復(fù)選框和單選框按鈕的_屬性值來判斷它們的當(dāng)前狀態(tài)它。 ( )A、Caption B、Value C、Checked D、Selected36、應(yīng)用程序窗體的名稱屬性為Frm1，窗體上有一個(gè)命令按鈕，其名稱屬性為Cmd1，窗體和命令按鈕的Click事件過程名分別為_。 ( )A、Form_Click() Command1_Click B、Frm1

12、_Click() Command1_Clic C、Form_Click() Cmd1_Click D、Frm1_Click() Cmd1_Click37、在下列關(guān)于菜單的說法中，錯(cuò)誤的是_。 ( )A、每個(gè)菜單項(xiàng)都是一個(gè)控件，與其他控件一樣也有自己的屬性和事件 B、除了Click事件之外，菜單項(xiàng)還能響應(yīng)其他的如DblClick等事件 C、菜單項(xiàng)的捷徑鍵不能任意設(shè)置 D、在程序執(zhí)行時(shí)，如果菜單項(xiàng)的Enabled屬性為False，則該菜單項(xiàng)變成灰色，不能被用戶選擇38、在用菜單編輯器設(shè)計(jì)菜單時(shí)，必須輸入的項(xiàng)有_。 ( )A、快捷鍵 B、標(biāo)題 C、索引 D、名稱39、將數(shù)據(jù)項(xiàng)“China”添加到列表

13、框(Listl)中成為第一項(xiàng)應(yīng)使用_語句。 ( )A、Listl.Addltem "China",0 B、Listl.Addltem "China",1 C、Listl.Addltem 0,"China" D、Listl.Addltem 1,"China"40、下列控件中，沒有Caption屬性的是_。 ( )A、框架 B、列表框 C、復(fù)選框 D、單選按鈕41、窗體Form1的名稱屬性是frm，它的Load事件過程名是_。 ( )A、Form-Load B、Form_Load C、frm_Load D、Me_Cmd

14、OK42、以下有關(guān)對(duì)象屬性的說法中錯(cuò)誤的是_。 ( )A、所有的對(duì)象都具有Name(名稱)屬性 B、只能在執(zhí)行時(shí)設(shè)置或改變的屬性為執(zhí)行時(shí)屬性 C、對(duì)象的某些屬性只能在設(shè)計(jì)時(shí)設(shè)定，不能使用代碼改變 D、Enabled屬性值設(shè)為False的控件對(duì)象在窗體上將不可見43、使用_方法，可以將列表框List1中的所有項(xiàng)刪除掉。 ( )A、List1.Txt="" B、AddItem C、RemoveItem D、Clear44、對(duì)正實(shí)數(shù)X的第四位小數(shù)四舍五入的VB表達(dá)式是_。 ( )A、0.001*Int(x+0.0005) B、0.001*(1000*x+0.5) C、0.001*

15、Int(1000*x+5) D、0.001*Int(1000*(x+0.0005)45、設(shè)整型變量a、b的當(dāng)前取值分別為200與20，以下賦值語句中不能正確執(zhí)行的是_。 ( )A、Text1=a/b*a B、Text1=a*a/b C、Text1=“200”*a/b D、Text1=a&amp;b&amp;a46、函數(shù)Cint(3.5)，Int(3.5)，F(xiàn)ix(3.5)的值分別是_。 ( )A、-3，4，3 B、-4，4，3 C、-3，4，4 D、-4，3，347、執(zhí)行語句"Print format(5459.478,"#,#0.00")&quo

16、t;，正確的輸出結(jié)果是_。 ( )A、5459.48 B、5,459.48 C、5,459.478 D、5,459.4748、下列沒有類型說明符的變量是_。 ( )A、日期型 B、長整型 C、字符串型 D、貨幣型49、VB表達(dá)式Sqr(a+b)3*2中優(yōu)先進(jìn)行運(yùn)算的是_。 ( )A、Sqr函數(shù) B、+ C、 D、*50、下列語句中不能正常執(zhí)行的是_。 ( )A、print +32758+10 B、print 5+9=15 C、print "65"+12 D、print "65"&1251、如果一個(gè)變量未指明數(shù)據(jù)類型，那么，VB默認(rèn)這個(gè)變量為_變量

17、。 ( )A、變體型 B、整型 C、公共 D、字符串型52、在窗體Form1上畫兩個(gè)文本框（Name屬性分別為Fext1和Text2）和一個(gè)命令按鈕（Name屬性為Command1），程序如下。執(zhí)行后結(jié)果為_。Private Sub Command1_Click()a=Text1.Text+Text2.TextPrint aEnd SubPrivate Sub Form_load()Text1.Text="123"Text2.Text="321"End Sub ( )A、444 B、321123 C、123321 D、13223153、要判斷&l

18、dquo;月收入在2000元以上（含2000元）且5000元以下（不含5000元）&rdquo;的職工，應(yīng)該使用的邏輯表達(dá)式是_。 ( )A、M>2000 AND M<=5000 B、M>2000 Or M<=5000 C、M>=2000 AND M<5000 D、M&gt;=2000 Or M&lt;500054、下列程序的執(zhí)行結(jié)果是_。x=62Print Sgn(x)+Abs(x)+Int(x) ( )A、36 B、1 C、0 D、7255、下列語句執(zhí)行后的輸出結(jié)果是_。 (一個(gè)方格表示一個(gè)空格)Wage = 26Print &q

19、uot;工資"Print Wage ( )A、工資26 B、工資26 C、“工資”26 D、“工資”2656、語句Print 4 + 56*7/8 Mod 9的值是_。 ( )A、4 B、5 C、6 D、757、下列_是合法的VB變量名。 ( )A、_5a B、我_AB C、5name D、Use&amp;DASF58、MsgBox函數(shù)返回值的類型為_。 ( )A、整體數(shù)值 B、字符串 C、變體 D、數(shù)值或字符串59、用于字符串連接的運(yùn)算符是_。 ( )A、& B、+ C、And D、A、B都可以60、表達(dá)式(-1)*Sgn(-100+Int(Rnd*100)的值是_

20、。 ( )A、隨機(jī)數(shù) B、0 C、1 D、-161、如果a是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)四舍五入的表達(dá)式是_。 ( )A、0.01*Int(a+0.005) B、0.01*Int(a+0.05) C、0.01*Int(100*(a+0.005) D、0.01*Int(100*(a+0.05)62、不能正確表示條件“兩個(gè)整型變量X和Y之一為0，但不能同時(shí)為0”的布爾表達(dá)式是_。 ( )A、X*Y=0 And (X<>0 Or Y<>0) B、( X=0 Or Y=0 ) And (X<>0 Or Y<>0) C、Not ( (X=0 Or Y=0)

21、 And (X<>0 Or Y<>0) ) D、X*Y=0 And X+Y<>063、函數(shù)Int(Rnd*11)+10的值的范圍是_。 ( )A、10，20 B、0，20 C、10，10 D、10，1164、滿足“當(dāng)a的值是偶數(shù)時(shí)為0，是奇數(shù)時(shí)為1”的要求的表達(dá)式是_。 ( )A、a Mod 2 = 0 B、Not a Mod 2&lt;&gt;0 C、Not (a Mod 2) D、(a2*2-a)=065、VisualBasic的一行可以寫多條語句，語句之間用_隔開。 ( )A、逗號(hào) B、分號(hào) C、頓號(hào) D、冒號(hào)66、如果將布爾常量Fal

22、se賦值給一個(gè)整形變量，則整型變量的值為_。 ( )A、0 B、-1 C、True D、False67、設(shè)a為Integer型變量，s為Single型變量，把3.75賦值給s后，再執(zhí)行下列某一語句，則在文本框中顯示的結(jié)果與執(zhí)行語句a=s:Text1=a的結(jié)果相同的有_個(gè)。a=Int(s):Text1=aa=Fix(s):Text1=aa=CInt(s):Text1=aa=Format(s,”#”):Text1=a ( )A、1 B、2 C、3 D、468、i被j整除的邏輯表達(dá)式是_。 ( )A、i/j = 0 B、ij = 0 C、i<>0 D、i mod j = 069、x+y小

23、于10且x-y要大于0的邏輯表達(dá)式是_。 ( )A、x+y<10,x-y>0 B、(x+y<10):(x-y)>0 C、x+y<10 And x-y>0 D、x+y<10 x-y>070、賦值語句：a=123+MID("123456",3,2)執(zhí)行后，a變量中的值是_。 ( )A、"12334" B、123 C、12334 D、15771、表達(dá)式Len("123程序設(shè)計(jì)ABC")的值是_。 ( )A、10 B、14 C、20 D、1772、己知A$"12345678"

24、，則表達(dá)式Val(Left(A,4)+Mid(A,4,2)的值為_。 ( )A、123456 B、123445 C、8 D、673、/、Mod、*四個(gè)算術(shù)運(yùn)算符中，優(yōu)先級(jí)別最低的是_。 ( )A、 B、/ C、Mod D、*74、表達(dá)式16/4-25*8/4 MOD 5/2的值為_。 ( )A、14 B、4 C、20 D、275、語句Print "5*20" 輸出的結(jié)果是_。 ( )A、"5*20" B、出現(xiàn)錯(cuò)誤信息 C、5*20 D、10076、x+y小于10且x-y大于0的邏輯表達(dá)式是_。 ( )A、x+y &lt; 10 Or x-y&am

25、p;gt;0 B、(x+y)&lt;10 : (x-y) &gt; 0 C、x+y &lt; 10 And x-y &gt;0 D、x+y &lt;10 . And. x-y &gt;077、在文本框Text1中輸入數(shù)字12，Text2中輸入數(shù)字34，執(zhí)行以下語句，只有_。可使文本框Text3中顯示46。 ( )A、Text3. Text=Text1. Text &amp; Text2. Text B、Text3. Text=Val(Text1. Text)+Val(Text2.Text) C、Text3. Text=Text1. Tex

26、t+Text2.Text D、Text3. Text=Val(Text1. Text) &amp; Val(Text2.Text)78、在程序中將變量Inta、Bl、St、D分別定義為Integer類型、Boolean類型、String類型和Date類型，下列賦值語句中，正確的是_。 ( )A、Inta= "333" + "22" B、D=#10/05/01# C、St=5+ "abc" D、Bl=#True#79、以下_程序段可以實(shí)施X，Y變量值的變換. ( )A、Y=X:X=Y B、Z=X:Y=Z:X=Y C、Z=X:X=

27、Y:Y=Z D、Z=X:W=Y:Y=Z:X=Y80、語句Print “Int(-13.2)=”;Int(-13.2)的輸出結(jié)果為_. ( )A、Int(-13.2)=-13.2 B、Int(-13.2)=13.2 C、Int(-13.2)=-13 D、Int(-13.2)=-1481、語句x=x+1的正確含義是_. ( )A、變量X的值與X+1的值相等 B、將變量X的值存在X+1中去 C、將變量X的值加1后賦給變量X D、變量X的值為182、下列語句中的語句可以用來正確地聲明一個(gè)動(dòng)態(tài)數(shù)組。 ( )A、Private A(n) As Integer B、Dim A() As Integer C、

28、Dim A(,) As Integer D、Dim A(1 to n)83、在窗體上畫一個(gè)命令按鈕，名稱為Command1，然后編寫如下程序：Private Sub Command1_Click( ) Dim a As Integer,b As Integer Do While b <100 B=b+5a=a+bIf b>20 Then Exit DoLoopPrint a,bEnd Sub程序運(yùn)行后，如果單擊命令按鈕，則在窗體上顯示的內(nèi)容是_。 ( )A、50 20 B、75 25 C、50 25 D、75 2084、有如下程序：Private Sub Command1_Clic

29、k( )score=65select Case score Case Is<60a$="F" Case 60 To 69a$="D" Case 70 To 79a$="C" Case 80 To 89a$="B" Case elsea$="A"End SelectMsgBox a$End Sub程序運(yùn)行后，消息對(duì)話框中顯示的內(nèi)容為_。 ( )A、A B、B C、C D、D85、下列程序：Private Sub Form_Click( )For j=1 To 15a=a+j Mod 3Nex

30、t jPrint aEnd Sub運(yùn)行后輸出的結(jié)果是_。 ( )A、1 B、15 C、90 D、12086、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序：Private Sub Command1_Click( )Static A As IntegerStatic B As Integer Cls B = 2 B = B+3A= 3+Aprint A, BEnd Sub程序運(yùn)行時(shí)，3次單擊命令按鈕Command1后，窗體上顯示的結(jié)果為_。 ( )A、3 5 B、6 6 C、9 5 D、3 387、在窗體中添加一個(gè)命令按鈕，并編寫如下程序代碼：Private Sub Comma

31、nd1_Click( ) Dim y As Integery = 0 Do While y<7y=y+2LoopMsgBox yEnd Sub程序運(yùn)行后，消息對(duì)話框中顯示_。 ( )A、0 B、7 C、8 D、288、在單擊窗體中的按鈕Command1第3次后，如下程序打印結(jié)果是_。Private Sub Command1_Click( )Static a AS Integera = a+1Select Case a Case 1: Print "歡迎大家" Case 2 :Print "努力就能成功 Case 3: Print "希望你能通過考試

32、" Case 4: Print "再見"End SelectEnd Sub ( )A、“歡迎大家” B、“努力就能成功” C、"希望你能通過考試" D、“再見”89.下面是計(jì)算1100奇數(shù)的和的程序，請(qǐng)補(bǔ)充完整，填空應(yīng)為_。Private Sub Command1_Click()    Dim s As Long, x As Integer    s = 0    For x = _ Step -2     

33、;      s = s + x    Next x    Print sEnd Sub    A. 100 To 1    B. 1 To 100C. 99 To 1    D. 1 To 9990.下列程序的輸出結(jié)果是_。Dim y As Integery=10Do While y<>0  &

34、#160;   y=y-1LoopPrint "y=" y(本題1分)A. y=0    B. y=1    C. y=隨機(jī)值    D. y=191.以下程序的輸出結(jié)果是_。Dim i As Integer,a As IntegerDo While i<20 Do While True   If i Mod 10=0 Then   

35、;  Exit Do   Else     i=i-1   End If Loop i=i+11 a=a+iLoopPrint a    A. 21B. 32    C. 33    D. 1192.下列程序段的執(zhí)行結(jié)果為_。x = Int(69 - 60) * Rnd + 60)Select Case xCase I

36、s >= 90    Print "優(yōu)秀"Case 80 To 89    Print "良好"Case 60 To 79    Print "合格"Case Else    Print "不合格"End Select    A. 優(yōu)秀    B. 良好C. 合格 

37、0;  D. 不合格93、下面程序的內(nèi)層循環(huán)次數(shù)是_。For i=1 TO 3For j=1 TO iFor k=j TO 3Next kNext jNext i ( )A、3 B、14 C、9 D、2194、結(jié)構(gòu)化程序設(shè)計(jì)方法的核心是規(guī)定了三種基本結(jié)構(gòu)：_結(jié)構(gòu)、分支結(jié)構(gòu)、循環(huán)結(jié)構(gòu)。 ( )A、條件 B、順序 C、當(dāng)型 D、邏輯95、下列循環(huán)能正常結(jié)束循環(huán)的是_。 ( )A、i=5 Doi=i+1Loop Until i<0 B、i=1 Doi=i+2Loop Until i=10 C、i=10 Doi=i+1Loop Until i>0 D、i=6

38、Doi=i-2Loop Until i=196、語句If x=1Then y=1，下列說法正確的是_。 ( )A、x=1和y=1均為賦值語句 B、x=1和y=l均為關(guān)系表達(dá)式 C、x=1為關(guān)系表達(dá)式，y=1為賦值語句 D、x=1為賦值語句，y=l為關(guān)系表達(dá)式97、在過程中有語句ForI=N1 To N2 Step N3，在該循環(huán)體內(nèi)有下列四條語句，其中_會(huì)影響循環(huán)執(zhí)行的次數(shù)。 N1=N1+I N2=N2+N3 I=I+N3 N3=2*N3 ( )A、 B、 C、 D、98、執(zhí)行下面的程序，單擊窗體后在窗體上顯示的結(jié)果是_Private Sub Form_Click() Dim Str1 As

39、String, Str2 As String Dim Str3 As String, I As IntegerStr1 = "e"For I = 1 To 2Str2 = UCase(Str1)Str1 = Str2 & Str1Str3 = Str3 & Str1Str1 = Chr(Asc(Str1) + I)Next IPrint Str3End Sub ( )A、EeFF B、eEfF C、EEFF D、eeFF99、用Msgbox "你好", vbokonly, "Hello"顯示的消息對(duì)話框窗口的標(biāo)題是_。

40、 ( )A、你好 B、vbokonly C、Ok D、Hello100.執(zhí)行以下語句后，a的值為_。Dim a As Integera=1Do Until a=100 a=a+2 Loop(本題1分)    A. 99    B. 100C. 溢出    D. 101101、表達(dá)式（73+1）*(185-1)的值是_. ( )A、8.67 B、7.8 C、6 D、6.67102、102.表達(dá)式X+1>X是_.(本題1分) 

41、;   A. 算術(shù)表達(dá)式    B. 非法表達(dá)式    C. 字符串表達(dá)式D. 關(guān)系表達(dá)式103、下列有關(guān)數(shù)組的說法中，不正確的是_。 ( )A、在窗體模塊中不可以定義全局?jǐn)?shù)據(jù)組 B、可以使用Erase語句釋放所有數(shù)組所占據(jù)的存儲(chǔ)儲(chǔ)空間 C、語句Dim X(3.6+2)As Integer定義了一個(gè)維上界是6的一維的整型數(shù)組 D、形參數(shù)組的類型可以是定長符串類型104、在窗體模塊的通用聲明處用下面的語句聲明變量、數(shù)組，正確語句有_個(gè)。Public

42、 A(5) As IntegerPublic N As IntegerPublic St As StringPrivate b() As Integer ( )A、2 B、3 C、4 D、1105、對(duì)窗體編寫如下代碼：Option Base 1Private Sub Command1_Click( )a=Array(237,126,87,48,498)m1=a(1)m2=1For i=2 To 5If a(i)>m1 Thenm1=a(i)m2=iEnd IfNext iPrint m1;m2End Sub程序運(yùn)行后，按回車鍵，輸出結(jié)果為_。 ( )A、48 4 B、237 1 C、49

43、8 5 D、498 4106、在窗體上畫一個(gè)命令按鈕，然后編寫如下事件過程：Option Base 1Private Sub Command1_Click( ) Dim a As Varianta = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1s = s + a(i)*jj = j * 10Next iPrint sEnd Sub運(yùn)行上面的程序，單擊命令按鈕，其輸出結(jié)果是_。 ( )A、4321 B、12 C、34 D、1234107、程序代碼如下，當(dāng)單擊窗體上Command1控件時(shí)，窗體上顯示的結(jié)果是_。Option Base 1Private Sub

44、 Command1_Click( ) Dim i As Integer Dim x(3,3)As IntegerFor i = 1 To 3For j = 1 To 3x(i,j) = (i-1) * 3+jNext jNext iFor i = 1 To 3Print x(i,4-i)Next iEnd Sub ( )A、1 5 9 B、1 4 7 C、3 5 7 D、3 6 9108.運(yùn)行以下程序段，輸出結(jié)果是            。Dim a(1 To 10)Dim p(1 T

45、o 4)k = 5For i = 1 To 4    p(i) = i * 2Next iFor i = 1 To 4    k = k + p(i) * 2Next iPrint k(本題1分)    A. 48    B. 32    C. 30D. 45109.當(dāng)發(fā)生Command1_Click事件后，程序輸出結(jié)果是_。Option Base 1Pri

46、vate Sub Command1_Click()Dim a(4, 4) As Integer,i As Integer,s As Integers=0For i=1 To 4   For j=1 To 4       a(i, j) = (i-1)*4+j*2   Next jNext iFor i = 1 To 4   s=s+a(i, i)Next iPrint sEnd Sub(本題1分)A. 28 B. 32 C. 30 D.

47、 44110.下列程序段的輸出結(jié)果是_。Dim i As IntegerDim a(8) As Integery = 18: i = 0Do    a(i) = y Mod 2    i = i + 1    y = y 2Loop Until y < 1For j = i - 1 To 0 Step -1    Print a(j);Next j(本題1分)A. 1 0 0 0 B. 1 0 0 1 0 C. 0 0 1 1 0

48、 D. 1 0 1 0 0111.下列程序的輸出結(jié)果是_。Dim i As Integer, k As IntegerDim a(10) As Integer, p(3) As Integerk = 5For i = 0 To 9     a(i) = iNext iFor i = 0 To 2     p(i) = a(i * (i + 1)Next iFor i = 0 To 2     k = k + p(i) * 2Next iPrint k(本題1分)A、

49、17 B、21 C、22 D、23112、下列程序段的執(zhí)行結(jié)果是_。 Dim A(3,3)For M=1 TO 3For N=1 TO 3If N=M Or N=3-M+1 ThenA(M,N)=1ElseA(M,N)=0End IfNext NNext MFor M=1 TO 3For N=1 TO 3Print A(M,N);Next NPrintNext M ( )A、1 0 0 0 1 0 0 0 1 B、1 1 1 1 1 1 1 1 1 C、0 0 0 0 0 0 0 0 0 D、1 0 1 0 1 0 1 0 1113、如下數(shù)組聲明語句，則數(shù)組a包含元素的個(gè)數(shù)有_。 Dim a(

50、3 , -2 to 2 , 5) ( )A、120 B、75 C、60 D、13114、如下二維數(shù)組聲明語句，_正確。 ( )A、Dim a3，4 As Integer B、Dim a(3，4) As Integer C、Dim a(n，n) As Integer D、Dim a(34) As Integer115、Option Base 1Private Sub Command1_Click() Dim a%(3, 3)For i = 1 To 3For j = 1 To 3If j > 1 And i > 1 Thena(i, j) = a(a(i - 1, j - 1), a

51、(i, j - 1) + 1Elsea(i, j) = i * jEnd IfPrint a(i, j); " "Next jPrintNext iEnd Sub ( )A、1 2 3 2 3 1 3 2 3 B、1 2 3 1 2 3 1 2 3 C、1 2 3 2 4 6 3 6 9 D、1 1 1 2 2 2 3 3 3116、要分配存放如下方陣的數(shù)據(jù)，_數(shù)組聲明語句能實(shí)現(xiàn)(不能浪費(fèi)空間)。每行三個(gè)元素，第一行為：1.1 2.2 3.3第二行為：4.4 5.5 6.6第三行為：7.7 8.8 9.9 ( )A、Dim a(9) As Single B、Dim a(3，

52、3) As Single C、Dim a(-1 To l，-5 To -3) As Single D、Dim a(-3 To -1，5 To 7) As Integer117.在窗體的通用聲明處有語句Dim A() As Single，以下在某事件過程中重定義此數(shù)組的一組正確語句是：_。(本題1分)A. ReDim A(3,3) ReDim A(4,4) As Integer B.ReDim A (3,3) ReDim Preserve A (4,4)C. ReDim A(3) ReDim A(3,3) As Integer D. ReDim A (3,3) Re

53、Dim Preserve A(3,4)118、下列程序段的輸出結(jié)果是_。 Dim A(5)For I=0 TO 4A(I)=I+1M=I+1If M=3 ThenA(M-1)=A(I-1)ElseA(M)=A(I)End IfIf I=3 Then A(I+1)=A(M-4)Print A(I);Next I ( )A、1 1 1 2 2 B、2 1 1 4 4 C、1 2 2 4 5 D、2 2 1 4 1119、運(yùn)行程序產(chǎn)生死循環(huán)時(shí)，按_鍵可以終止程序的運(yùn)行。 ( )A、Ctrl+C B、Ctrl +Z C、Ctrl+Break D、單擊停止運(yùn)行按鈕120.單擊按鈕,輸出為_。 Priva

54、te Sub fun( )   Static a As Integer   a=a+2   Print a;End SubPrivate Sub Command1_Click( )   Dim m As Integer   For m=1 To 3       Call fun   Next m End Sub(本題1分)A. 2  2  2 B. 0  0 

55、; 0 C. 2  4  8 D. 2  4  6121.在單擊命令按鈕時(shí)的輸出結(jié)果是_。Private Sub Command1_Click ( ) Dim x%, y% x=1:y=1 For n=1 to 3   z=First (x, y)   Print n, z Next nEnd SubPrivate Function First% (x%, y%) Dim n% Do While n <= 4  

56、; x=x+y   n=n+1 Loop First=xEnd Function(本題1分)A. 1 6 2 11 3 16 B. 2 6 1 3 11 16 C. 1 2 3 4 5 6 D. 2 1 3 1 3 3122.設(shè)有下列程序代碼，在單擊命令按鈕時(shí)的輸出結(jié)果是_。Sub SS (ByVal x, ByRef y, z)   x=x+1    y=y+1   z=z+1End SubPrivate Sub Comma

57、nd1_Click ( )   A=1: B=2 :C=3   Call SS (A,B,C)   Print A,B,CEnd Sub(本題1分)A. 1 2 3 B. 1 3 4 C. 2 2 4 D. 1 3 3123.程序運(yùn)行后，如果單擊命令按鈕，則在文本框中顯示的內(nèi)容是_。 Private Sub Command1_Click( )     dim x, y, z As Integer   x=5: y=7

58、: z=0   text1=“”    call p1(x,y,z)    text1=str(z)End SubPrivate Sub p1(ByVal a%, ByVal b%, c%)   c=a+b End Sub(本題1分)A. 0 B. 12 C. Str(z)  D. 沒有顯示124.當(dāng)在Cmd1按鈕上單擊時(shí)，程序的輸出是         &#

59、160; .Public Function Func(a%,b%)As Integer  Static m As Integer : Dim i As Integer  m=0 : i=2:  i=i+m+1 : m=i+a+b : Func=mEnd FunctionPrivate Sub Cmd1_Click( )  Dim k%,m%,n%  k=4 : m=1 :n=Func(k,m)  Print n, Func(k, m)End Sub(本題1分)A. 8  8 B. 8  20 C. 8  16 D. 8  17125.在Cmdl_C1ick事件中有效的地址傳遞的調(diào)用語句是                   。Public Sub Fl(n%)    n =3*n+4  End SubPr