vb習(xí)題集給學(xué)生

1、第一章 習(xí)題一、選擇題1. 以下不能在工程資源管理器窗口中列出的文件類型是（ ）。（A）.bas （B）.res （C）.frm （D）.ocx2. 以下不屬于Visual Basic系統(tǒng)的文件類型是（ ）。（A）.frm （B）.bat C）.vbg D）.vbp3. 以下敘述中錯(cuò)誤的是（ ）。（A）打開一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件（B）保存Visual Basic程序時(shí)，應(yīng)分別保存窗體文件及工程文件（C）Visual Basic應(yīng)用程序只能以解釋方式執(zhí)行（D）事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā) 4. 以下敘述中錯(cuò)誤的是（ ）。 （A）Visual Bas

2、ic 是事件驅(qū)動(dòng)型可視化編程工具（B）Visual Basic應(yīng)用程序不具有明顯的開始和結(jié)束語(yǔ)句（C）Visual Basic工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性（D）Visual Basic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置（ ）。（A） 執(zhí)行“視圖”菜單中的“屬性窗口”命令（B) 按F4鍵（C） 按Ctrl+T（D） 單擊工具欄上的“屬性窗口”按鈕6. 假定一個(gè)Visual Basic應(yīng)用程序由一個(gè)窗體模塊和一個(gè)標(biāo)準(zhǔn)模塊構(gòu)成。為了保存該應(yīng)用程序，以下正確的操作是（ ）。（A）只保存窗體模塊文件（B）分別保存窗體模塊、標(biāo)準(zhǔn)模塊和工程文件（C）只保存窗體模塊和標(biāo)準(zhǔn)

3、模塊文件（D）只保存工程文件7. 以下敘述中錯(cuò)誤的是（ ）。（A）在工程資源管理器窗口中只能包含一個(gè)工程文件及屬于該工程的其他文件 （C）窗體文件包含該窗體及其控件的屬性（D）一個(gè)工程中可以含有多個(gè)標(biāo)準(zhǔn)模塊文件8. 下列可以打開立即窗口的操作是（ ）。 （A）Ctrl+D （B） Ctrl+E （C） Ctrl+F （D） Ctrl+G9. 在VB開發(fā)集成環(huán)境中，如果工具箱不可見，應(yīng)在（ ）主菜單中操作而使它可見。（A）視圖 （B）窗口 （C）文件 （D）編輯10. 在VB的工程中，窗體文件的擴(kuò)展名是（ ）。（A）.frm （ B）.vbg C） .vbp D） .bas11. 下列可以打開菜

4、單屬性窗口的操作是（ ）。（A） Ctrl+D （B） Ctrl+E （C） Ctrl+F （D） Ctrl+G12. VB是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言，構(gòu)成對(duì)象的三要素是（ ）。（A）屬性、事件、方法 （B）控件、屬性、事件（C）窗體、控件、過(guò)程 （D）窗體、控件、模塊13 有程序代碼：Command1.Enabled = True，其中Command1、Enabled、True分別代表（ ）。 （A）對(duì)象、屬性、值 （B）對(duì)象、方法、屬性 （C）對(duì)象、值、屬性 （D）屬性、對(duì)象、值 14 如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是 （ ）。（A）Caption （B）Name （C）Back

5、Color （D）BorderStyle15為了清除窗體上的一個(gè)控件，下列正確的操作是（ ）。 （A）按回車鍵 （B）按Esc鍵 （C）選擇（單擊）要清除的控件，然后按Del鍵（D）選擇（單擊）要清除的控件，然后按回車鍵16以下敘述中錯(cuò)誤的是 （ ）。 （A） 一個(gè)工程可以包括多種類型的文件（B）Visual Basic應(yīng)用程序既能以編譯方式執(zhí)行，也能以解釋方式執(zhí)行（C）程序運(yùn)行后，在內(nèi)存中只能駐留一個(gè)窗體（D) 對(duì)于事件驅(qū)動(dòng)型應(yīng)用程序，每次運(yùn)行時(shí)的執(zhí)行順序可以不一樣17程序運(yùn)行后，在窗體上單擊鼠標(biāo)，此時(shí)窗體不會(huì)接收到的事件是（ ）。 （A）MouseDown （B）MouseUp （C）Lo

6、ad （D）Click18以下沒(méi)有Caption屬性的控件是（ ）。 （A）CheckBox （B）Label （C）CommandButton （D）TextBox19以下關(guān)于窗體的描述中，錯(cuò)誤的是（ ）。 （A）執(zhí)行Unload Form1語(yǔ)句后，窗體Form1消失，但仍在內(nèi)存中（B）窗體的Load 事件在加載窗體時(shí)發(fā)生（C）當(dāng)窗體的Enabled 屬性為False時(shí)，通過(guò)鼠標(biāo)和鍵盤對(duì)窗體的操作都被禁止（D）窗體的Height、Width屬性用于設(shè)置窗體的高和寬20為了在運(yùn)行時(shí)能顯示窗體左上角的控制框（系統(tǒng)菜單），必須（ ）。 （A）把窗體的Contro1Box 屬性設(shè)置為False,其他

7、屬性任意（B） 把窗體的ControlBox 屬性設(shè)置為True,并且把Boder Style屬性設(shè)置為1-5（C） 把窗體的ControlBox 屬性設(shè)置為False,同時(shí)把BoderStyle屬性設(shè)置為非0值（D） 把窗體的ControlBox 屬性設(shè)置為True,同時(shí)把BoderStyle屬性設(shè)置為0值21TextBox的下列屬性能夠讓用戶接受多行文本的是（ ）。 （A）Name （B）MultiLine （C）Text （D）Autosize22設(shè)置TextBox控件文字顏色的屬性是（ ）。（A）Font （B）BackColor （C）ForeColor （D）ToolTipText

8、23使一個(gè)控件不可用，應(yīng)設(shè)置其（ ）屬性。（A） Visible （B） Enabled （C） Font （D）BackColour24一般不用來(lái)觸發(fā)事件的對(duì)象是（ ）。 （A）標(biāo)簽 （B）窗體 （C）命令按鈕 （D）文本框25以下敘述中錯(cuò)誤的是（ ）。 （A）雙擊鼠標(biāo)可以觸發(fā)DblClick事件 （B）窗體或控件的事件的名稱可以由編程人員確定（C）移動(dòng)鼠標(biāo)時(shí)，會(huì)觸發(fā)MouseMove事件 （D）控件的名稱可以由編程人員設(shè)定26在窗體上有若干控件，其中有一名稱為Text1的文本框，影響Text1的Tab順序的屬性是 （ ）。 （A）TabStop （ B）Enabled（C） Visible

9、 （D）TabIndex 27Visual Basic 6.0 集成開發(fā)環(huán)境有3種工作狀態(tài)，工作狀態(tài)顯示在（ ）。 （A）在狀態(tài)欄的中括號(hào)內(nèi) （B）窗體窗口的標(biāo)題欄中（C）標(biāo)題欄的中括號(hào)內(nèi) （D）工程窗口的標(biāo)題欄中28在Visual Basic工程中，可以作為“啟動(dòng)對(duì)象”的程序是（ ）。A）任何窗體或標(biāo)準(zhǔn)模塊 B）任何窗體或過(guò)程C）Sub Main過(guò)程或其他任何模塊 D） Sub Main過(guò)程或任何窗體29設(shè)窗體上有一個(gè)文本框，名稱為text1,程序運(yùn)行后，要求該文本框不能接受鍵盤輸入，但能輸出信息，以下屬性設(shè)置正確的是（ ）。A）text1.maxlength=0 B）text1.enabl

10、ed=flase C）text1.visible=flase D）text1.width=030以下能在窗體Form1的標(biāo)題欄中顯示“VisualBasic窗體的語(yǔ)句是（ ）。A）Form1.Name=VisualBasic窗體 B） Form1.Title=VisualBasic窗體C）Form1.Caption=VisualBasic窗體 D） Form1.Text=VisualBasic窗體”二、填空題1 .當(dāng)運(yùn)行程序時(shí)，系統(tǒng)首先執(zhí)行窗體的事件過(guò)程。 2. 改變控件在窗體中的水平方向上的位置應(yīng)修改該控件的屬性。3. 不任什么對(duì)象，都具有 屬性。 4. 在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)

11、，所打開的窗口是。 5. 改變文本框內(nèi)的內(nèi)容能觸發(fā)文本框的事件的操作。 6. 窗體的Load事件在時(shí)發(fā)生。7. 要使Print方法在Form_load事件中起作用，要設(shè)置窗體的屬性。 8. 在窗體上有命令按鈕OK，在代碼編輯窗口有與之對(duì)應(yīng)的CmdOK_Click()事件，則命令按鈕名稱屬性和Caption屬性的值分別為 。 9為了把焦點(diǎn)移到某個(gè)指定的控件，所使用的方法是。 10使一個(gè)控件不可見，應(yīng)設(shè)置屬性 。 11無(wú)論什么控件，都具有一個(gè)共有的屬性，這個(gè)屬性是。12要使得文本框輸入的文本為密碼，就要設(shè)置屬性。13設(shè)置TextBox控件背景顏色的屬性是 。 14Visual Basic應(yīng)用程序中

12、標(biāo)準(zhǔn)模塊文件的擴(kuò)展名是 。 15、一個(gè)窗體的名稱為frmEg，則該窗體的單擊事件過(guò)程名為。 16、在VB應(yīng)用程序中，控件常被用來(lái)在單擊時(shí)執(zhí)行指定的操作。 17. Visual Basic應(yīng)用程序通常由3類模塊組成，即標(biāo)準(zhǔn)模塊、類模塊和。 18. 設(shè)置文本框或者標(biāo)簽控件顯示內(nèi)容文字的字體名稱時(shí)使用屬性。 19. 設(shè)置文本框或者標(biāo)簽控件顯示內(nèi)容文字的大小時(shí)，使用屬性。20. VB中一個(gè)應(yīng)用程序稱為一個(gè)，它包含各種文件。第二章 習(xí)題一 選擇題1 定義貨幣類型數(shù)據(jù)應(yīng)該用關(guān)鍵字 （ ） 。（A）SINGLE （B）DOUBLE （C）CURRENCY （D）BOOLEAN 2. 下列的幾對(duì)數(shù)據(jù)類型中，（

13、 ）所占的內(nèi)存大小相同。 （A）Long，Single （B）Byte，Single （C）Integer，Double （D）Date，Long3. 下列（ ）數(shù)據(jù)類型的變量不能存放負(fù)值。（A）Integer （B）Long （C）Double （D）Byte4. 貨幣型數(shù)據(jù)需（）字節(jié) 。（A）2 （B）4 （C）6 （D）85. 聲明符號(hào)常量應(yīng)該用關(guān)鍵字（ ）（A）Static （B）Const （C）Private （D）Variant6.“計(jì)算機(jī)”作為字符串常量，在VB中可以表示為（ ）。 （A）計(jì)算機(jī) （B）（計(jì)算機(jī)）（C）計(jì)算機(jī) （D）計(jì)算機(jī)7. VB認(rèn)為下面（ ）組變量是同一個(gè)變

14、量 。（A）A1和a1 （B）SUM和SUMMARY （C）AVER和AVERAGE （D）A1和A_18. 下列字符串常量中，最大的是 （ ） 。（A）“北京” （B）“上?！?（C）“天津” （D）“廣州”9. 系統(tǒng)符號(hào)常量可以通過(guò)（ ）獲得 。（A）對(duì)象瀏覽器 （B）代碼窗口 （C）屬性窗口 （D）工具箱10. 在VB中，36&是（ ）類型的常數(shù)。 （A）整型數(shù) （B）長(zhǎng)整型數(shù) （C）字符常數(shù) （D）雙精度數(shù)11. 假定bln1是邏輯型變量，下面賦值語(yǔ)句中正確的是（ ）。 （A）bln1=True （B）bln1=.True. （C）bln1=#True# （D）bln1=3 b c后，

15、窗體上顯示的是（ ）。 （A）True （B）False （C）1 （D）出錯(cuò)信息16下列為日期型常量的是（ ） 。 （A）”2/1/02” （B）2/1/02 （C）#2/1/02# （D）|2/1/02|17以下對(duì)變量的類型說(shuō)明符的使用不正確的是（ ）。 （A）a=2000 （B）a%=50000 （C）a&=True （D）a$=”O(jiān)K”18以下聲明語(yǔ)句中錯(cuò)誤的是（ ）。 （A）Const var1=123 （B）Dim var2 = ABC（C）DefInt a-z （D）Static var3 As Integer19以下合法的Visual Basic標(biāo)識(shí)符是（ ）。 （A）ForL

16、oop （B）Const （C）9abc （D）a#x20下列對(duì)變量的定義中，不能定義A為變體變量的是（ ）。 （A）DIM A AS DOUBLE （B）DIM A AS VARIANT （C）DIM A （D）A=2421設(shè)有變量聲明Dim TestDate as Date，為變量TestDate正確賦值的表達(dá)式是（ ）。 （A）TestDate=#1/1/2002# （B）TestDate=# “1/1/2002 ”# （C）TestDate=date(“1/1/2002”) （D）TestDate=format(“m/d/yy”, “1/1/2002”)22Rnd函數(shù)不可能產(chǎn)生的（ ）

17、值。23表達(dá)式（73+1）*(185-1)的值是（ ）。24以下關(guān)系表達(dá)式中，其值為False的是（ ）。（A）ABCAbC （B）thethey（C）VISUAL=UCase(Visual) （D）IntegerInt25下列符合常量的聲明中，（ ）是不合法的。（C）Const x As SingleLog(2) （D）Const x=”123”26表達(dá)式4+5 6 * 7 / 8 Mod 9 的值是（ ）。（A）4 （ B）5 （C）6 （D）727在下面的表達(dá)式中，x取任何值都成立的表達(dá)式是（ ）。 （A）Int(x)=Abs(x) （ B） Int(x)Abs(x) （C）Int(x)

18、=Abs(x) （ D） Int(x)Abs(x)28下列可作為Visual Basic變量名的是（ ）。A）A#A B）4A C）?xy D）constA29如果在立即窗口中執(zhí)行以下操作：a=8 (是回車鍵，下同)b=9 print ab 則輸出結(jié)果是（ ） 。 A）-1 B）0 C）False D）True30設(shè)a=3，b=5，則以下表達(dá)式的值為真的是（ ）。A）a=b and b10 B）(ab) or (b0) C）(a0) D）(-3+5a) and (b0)二 填空題1. 表達(dá)式 3X10的VB表達(dá)式為 。 2. 設(shè)a=3，b=5，則表達(dá)式（ab）or （b0）的值為 。 3. 表

19、示條件“A為能被3或7整除的數(shù)”的邏輯表達(dá)式為 。 4. 變量未賦值時(shí)，數(shù)值型變量的值為 。 5. INT（100*RND（1）產(chǎn)生的隨機(jī)整數(shù)的閉區(qū)間是 。 6. 函數(shù)Len(trim(Str(Val(“”)的值是 。 7. 表達(dá)式：X MOD y/2(x=3，y=6) 的值是 。 8. 代數(shù)式abc 改寫成Visual Basic 表達(dá)式為 。9. 若要強(qiáng)制變量必須先定義再使用，應(yīng)該使用的說(shuō)明語(yǔ)句是 。 10. 表示條件“M是小于100的非負(fù)數(shù)”的表達(dá)式為 。 11. 表達(dá)式2+3*43-SIN（X+1）/2中最先進(jìn)行的運(yùn)算是 這一步。 12. 產(chǎn)生10，36之間的隨機(jī)整數(shù)的Visual B

20、asic表達(dá)式是 。 13.設(shè)a=6，則執(zhí)行 x=IIf(a5,-1,0)后，x 的值為 。“x的絕對(duì)值大于等于y同時(shí)不等于z”的邏輯表達(dá)式為 。 15.語(yǔ)句Print Format (32458.5 , “”)的輸出結(jié)果為 。 16.int（-3.5）、fix（-3.5）的值分別是 。17.表達(dá)式4+5 6 * 7 / 8 Mod 9 的值是 。 18.如果在立即窗口中執(zhí)行以下操作：a=8 (是回車鍵，下同)b=9 print ab 則輸出結(jié)果是 。 19.設(shè)x=4,y=8,z=7，以下表達(dá)式xz) Or zx 的值是 。 “&”是 運(yùn)算。 21.表達(dá)式（-1）*Sgn（-100+Int(R

21、nd*100)）的值是 。 22.語(yǔ)句PRINT “INT（-13.2）=”；INT（-13.2）的輸出結(jié)果是 。 23.設(shè)a = a，b = b，c = c，d = d，執(zhí)行語(yǔ)句x=IIf(a 2 * b Or a = c And b c Or c d 的值是 。 27.執(zhí)行語(yǔ)句s=Len(Mid(VisualBasic,1,6)后，s的值是 。 28.可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是 。 29.Cint(8.5)、Fix(-3.5)的值分別是 。 30.執(zhí)行如下兩條語(yǔ)句，窗體上顯示的是 。 Print Format(a,$00,00.00)31.變量未賦值時(shí)，數(shù)值型變量與字符型變量

22、的的值分別是 。 32.強(qiáng)制顯示聲明變量，應(yīng)放在模塊的 段中加入語(yǔ)句OPTION EXPLICIT 。 33.表達(dá)式INT（8*SQR（36）*10（-2）*10+0.5）/10的值是 。 34.設(shè)A=”abcdefghijklm ”， 的函數(shù)值為”jklm”。 35.函數(shù)Ucase(Mid(“visual basic”,8,8)的值為 。 36.表達(dá)式888 的值是 。 37.語(yǔ)句 Print Int(12345.6789 * 100 + 0.5) / 100 輸出的結(jié)果是 。 38. 字符型數(shù)據(jù)的比較是將兩個(gè)字符串中的字符逐對(duì)進(jìn)行比較，比較的是字符 碼值 。 39. 函數(shù)MSGBOX的返回

23、值是一個(gè) 數(shù)。40. 表達(dá)式True Or Not(7-3 0 And a 10 And a 20 And a 5，-1,0) 后，x的值為（ ）。 （A）5 （B）6 （C）)0 （D）-1 7. 下列語(yǔ)句正確的是（ ）。 （A） if AB Then T=A A=B B=T （B）if AB Then T=A；A=B；B=T（C） if AB Then T=A， A=B， B=T （D）if AB Then T=A： A=B ：B=T 8. 在窗體上畫兩個(gè)名稱分別為L(zhǎng)abel1和Label2的標(biāo)簽，然后編寫如下事件過(guò)程Private Sub Form_Click() x = -5: s =

24、 -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程序運(yùn)行后，單擊窗體，標(biāo)簽Label1和Label2中顯示的內(nèi)容分別是 （ ）。 （A）-5 和 -2 （B）-5 和 -4 （C）-5 和 -3 （D）-5 和 59. 若要使如下程序中循環(huán)體語(yǔ)句執(zhí)行3次，則應(yīng)在loop until 后添入（ ）。 X=1DoPrint xX=x+3Loop until （A）x=7 （B）x

25、=10 （D）x710. 下列程序段中能夠正確實(shí)現(xiàn)“如果XY，則A=15,否則A=-15，并輸出A的值”的是（ ）。 （A） （B）if XY Then A=15 A=15A=-15 if XY Then A=-15Print A Print A（C） （D）if XY Then if XY ThenA=15A=15Else ElseA=-15 A=-15PrintA End IfEnd If PrintA 11. 下面語(yǔ)句正確的是（ ）。 （A）If xy Then T=A A=B B=T （B）If xy Then T=A; A=B ;B=T（C）If x=y Then T=A A=B B

26、=T （D）If x=y Then T=A: A=B :B=T12. 以下程序段執(zhí)行后，變量c的值為（ ）。 A=2B=19Select Case baCase Is60 Then i=1If a70 Then i=2If a80 Then i=3If a90 Then i=4Print “i=”;i（A)i=1 （ B）i=2 （C）i=3 （D）i=414多分支選擇結(jié)構(gòu)中，Select Case 語(yǔ)句的“測(cè)試表達(dá)式”( )。 （A）只能是數(shù)值表達(dá)式 （B）只能是字符串表達(dá)式（C）可以是關(guān)系表達(dá)式或邏輯表達(dá)式 （D）可以是數(shù)值表達(dá)式或字符串表達(dá)式15 要使循環(huán)體至少執(zhí)行一次，應(yīng)使用( )循環(huán)

27、。 （A）ForNext （B）WhileWend （C）do Whileloop （D）DoLoopWhile|Until16下列程序段中，循環(huán)體語(yǔ)句將共執(zhí)行（ ）次。 t = 0c = 1Do t = t + c c = c + 1 If t = 10 Then Exit Do End IfLoop While c = 7Print i=; I, a=; a（A）i=4 a=5 （B）i=7 a=13 （C）i=8 a=7 （D）i=7 a=1120下列程序段中，循環(huán)體語(yǔ)句將共執(zhí)行（ ）次。 For i = 1 To 2 For j = 1 To i For k = 1 To j Prin

28、t a;Next k, j, i（A）4 （B）6 （C ） 7 （D）821以下程序段執(zhí)行后，變量n的值是（ ）。 For i = 1 To 5 n = 0 For j = i To 5 n = n + 1 Next jNext i（A）15 （B）10 （C）5 （D）122 .多分支選擇結(jié)構(gòu)執(zhí)行哪一個(gè)分支的根據(jù)是（ ）。（A）Select Case語(yǔ)句的“測(cè)試表達(dá)式”與Case語(yǔ)句的“變量值列表”同為false（B）Select Case語(yǔ)句的“測(cè)試表達(dá)式”與Case語(yǔ)句的“變量值列表”同為假（C）Select Case語(yǔ)句的“測(cè)試表達(dá)式”與Case語(yǔ)句的“變量值列表”相匹配（D）Sel

29、ect Case語(yǔ)句的“測(cè)試表達(dá)式”與Case語(yǔ)句的“變量值列表”完全相等23設(shè)有如下程序段：x = 2For i = 1 To 10 Step 2 x = x + iNext運(yùn)行以上程序后，x 的值是（ ）。（A）26 （ B）27 （C）38 （ D）5724下面程序的循環(huán)次數(shù)是（ ）。Private Sub Command1_Click() For i = 8 To 35 Step 3 Print i; NextEnd Sub（A）10 （B）9 （ C）27 （ D）2825下列程序的執(zhí)行結(jié)果是（ ）。Private Sub form_click() x = 3: y = 2: z =

30、 -1 Print x y = zEnd Sub（A）Ture （B） False （C）1 （D）-126以下程序段的輸出結(jié)果為（ ）。 x = 1y = 4Do Until y 4 x = x * y y = y + 1LoopPrint x（A）1 （B）4 （C）8 （D）2027退出DoLoop循環(huán)可使用的語(yǔ)句為（ ）。 （A）Exit For （B）End For（C）Exit Do（D）End Do28設(shè)a=9，則執(zhí)行x=IIf(a5,-1,0)后,x的值為（ ）。（A）5 （B）6 （C）0 （D）-129下列程序段的執(zhí)行結(jié)果為（ ）。x = Int(Rnd() + 4)Sel

31、ect Case x Case 5 Print 優(yōu)秀 Case 4 Print 良好 Case 3 Print 通過(guò) Case 2 Print 不通過(guò)End Select（A）優(yōu)秀 （B）良好 （C）通過(guò) （D）不通過(guò)30下面語(yǔ)句運(yùn)行后的輸出結(jié)果是（ ）。Private Sub Command1_Click() x = 0 While x 10 x = x + 1: x = x * x Wend Print xEnd Sub（A）16 （B）19 （ C）20 （D）25二 程序填空題1. 在窗體上畫一個(gè)命令按鈕，然后編寫如下事件過(guò)程：Private Sub Command1_Click() a = InputBox(請(qǐng)輸入一個(gè)整數(shù)) b = InputBox(請(qǐng)輸入一個(gè)整數(shù)) Print Val(a + b); Print Val(a) + Val(b)End Sub程序運(yùn)行后，單擊命令按鈕，在輸入對(duì)話框中分別輸入321和456，輸出結(jié)果為 、 。 2. 下列程序執(zhí)行的結(jié)果分別是 、 Private Sub