VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料

VB(VisualBasic)語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料《VisualBasic程序設(shè)計》復(fù)習(xí)題一.單選題1、InputBox函數(shù)返回值的類型是______。A：數(shù)值B：字符串C：變體D：數(shù)值或字符串2、下面關(guān)于數(shù)組操作正確的是______。A：OptionBase2B：n=10Dima(n)AsIntegerC：Dima()AsIntegera(1)=100D：Dimaa=Array(1,2,3,4,5,6)3、已知有如下數(shù)組定義Dima(-3To6,5,3To10)AsInteger則執(zhí)行語句PrintLBound(a,2);UBound(a,2)，輸出的值為______。A：-36B：05C：15D：3104、以下四個選項中，對VisualBasic描述正確的是______。A：VisualBasic窗體文件擴(kuò)展名為vbpB：一個VisualBasic應(yīng)用程序可以包含多個窗體文件C：一個窗體文件可以有多個代碼窗口D：VisualBasic程序按過程編寫先后順序依次執(zhí)行5、以下四個選項中，對VisualBasic描述正確的是______。A：VisualBasic窗體文件擴(kuò)展名為vbpB：一個VisualBasic應(yīng)用程序可以包含多個窗體文件C：一個窗體文件可以有多個代碼窗口D：VisualBasic程序按過程編寫先后順序依次執(zhí)行6、要改變窗體的標(biāo)題時，應(yīng)當(dāng)在屬性窗口中改變的屬性是________。A：NameB：TextC：CaptionD：Label7、設(shè)在名稱為Myform的窗體上只有一個名稱為C1的命令按鈕，下面敘述正確的是________。A：窗體的Click事件過程名是Myform_Click()B：命令按鈕的Click事件過程名是C1_Click()C：命令按鈕的Click事件過程名是Command1_Click()D：以上都是錯誤的8、以下能在窗體Form1的標(biāo)題欄上顯示"VB窗體"的語句是________。A：Form1.Name="VB窗體B：Form1.Title="VB窗體"C：Form1.Caption="VB窗體"D：Form1.Text="VB窗體"9、語句PrintFormat(12345,"0000,00.00")輸出結(jié)果為________。A：12345.00B：12345C：012,345.00D：123,4510、設(shè)窗體上有一個文本框，名稱為Text1，程序運行后，要求該文本框不能接受鍵盤輸入，但能輸出信息，以下屬性設(shè)置正確的是________。A：Text1.maxlengh=0B：Text1.Enabled=FalseC：Text1.Visible=FalseD：Text1.Width=011、設(shè)有語句x=InputBox("輸入數(shù)值"，"0"，"示例")程序運行后，如果從鍵盤上輸入數(shù)值10并按回車鍵，則下列敘述中正確的是________。A：變量x的值是數(shù)值10B：在InputBox對話框標(biāo)題欄中顯示的是"示例"C：0是默認(rèn)值D：變量x的值是字符串"10"12、在窗體上有一個文本框控件，名稱為TxtTime：一個計時器控件，名稱為Timerl，要求每一秒鐘在文本框中顯示一次當(dāng)前的時間。程序為：PrivateSubTimer1_________()TxtTime.text=TimeEndSub在下劃線后應(yīng)填入的內(nèi)容是________。A：EnabledB：VisibleC：IntervalD：Timer13、執(zhí)行下面的語句后，所產(chǎn)生的信息框的標(biāo)題是________。a=MsgBox("AAAA"，，"BBBB"，""，5)A：BBBBB：空C：AAAAD：出錯，不能產(chǎn)生信息框14、設(shè)列表框List1已有5個列表項，則以下不能實現(xiàn)將字符串"AAA"添加到列表框最末尾的語句是__。A：List1.AddItem"AAA"B：List1.AddItem"AAA",List1.ListCountC：List1.AddItem"AAA",List1.ListIndexD：-x15、在以下表達(dá)式中結(jié)果始終為"真"的是_______。A：Int(Rnd)=Fix(Rnd)B：Int(Rnd*20)>Fix(Rnd*3+5)C：Int(-Rnd)=Fix(-Rnd)D：-Int(Rnd*20)<-Fix(Rnd*3+5)16、根據(jù)變量的作用域，VB中可以將變量分為3類，分別是_______。A：局部變量、模塊變量和全局變量B：局部變量、模塊變量和標(biāo)準(zhǔn)變量C：局部變量、模塊變量和窗體變量D：局部變量、標(biāo)準(zhǔn)變量和全局變量17、以下敘述中錯誤的是_______。A：VisualBasic應(yīng)用程序既能以編譯方式執(zhí)行，也能以解釋方式執(zhí)行。B：對于事件驅(qū)動型應(yīng)用程序，每次運行時的執(zhí)行順序可以不一樣。C：保存VisualBasic程序時，應(yīng)分別保存窗體文件及工程文件。D：事件只能由用戶引發(fā)。18、對語句Dima&,b%,c$,d!判斷錯誤的是______。A：聲明變量a是長整型B：聲明變量b是整型C：聲明變量c是貨幣型D：聲明變量d是單精度型19、下列說法錯誤的是_______。A：標(biāo)準(zhǔn)模塊文件的擴(kuò)展名為.basB：一個窗體對應(yīng)一個窗體文件C：VisualBasic中的一個工程只包含一個窗體D：VisualBasic中一個工程最多可以包含255個窗體20、保存一個工程至少應(yīng)保存兩個文件，這兩個文件分別是_______。A：文本文件和工程文件B：窗體文件和工程文件C：窗體文件和標(biāo)準(zhǔn)模塊文件D：類模塊文件和工程文件21、通過以下_______窗口可以在設(shè)計時直觀的調(diào)整窗體在屏幕上的位置。A：代碼窗口B：窗體布局窗口C：窗體設(shè)計窗口D：屬性窗口22、下面可以正確定義2個整形變量和1個字符串變量的語句的是_________。A：Dimn,mAsInteger,sAsStringB：Dima%,b$,cAsStringC：DimaAsInteger,b,cAsStringD：Dimx%,yAsInteger,zAsString23、在窗體上畫一個文本框、一個標(biāo)簽和一個命令按鈕，其名稱分別為Text1、Label1和Command1，然后編寫如下事件過程：PrivateSubText1_Change()Label1.Caption=Right(Trim(Text1.Text),3)EndSub程序運行后，在文本框中輸入"abcdef"，單擊命令按鈕，則在標(biāo)簽中顯示的內(nèi)容是_________。A：空B：abcdefC：abcD：def24、Sub過程與Function過程最根本的區(qū)別是_______。A：Sub過程可以直接使用過程名調(diào)用，而Function過程不可以B：Function過程可以有參數(shù)，而Sub過程不可以C：兩種過程參數(shù)傳遞方式不同D：Sub過程的過程名不能返回值，而Function過程能通過過程名返回值25、在參數(shù)傳遞過程中，使用關(guān)鍵字_______來修飾參數(shù)，可以使之按值傳遞。A：ByValB：ByRefC：ValueD：reference26、設(shè)有如下通用過程：PublicFunctionfun(xAsInteger)DimyAsIntegerx=30:y=4fun=x*yEndFunction在窗體上添加一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()StaticxAsIntegerx=20:y=10y=fun(x)Printx;yEndSub程序運行后，如果單擊命令按鈕，則在窗體上顯示的內(nèi)容是_______。A：2010B：3010C：204D：3012027、下列敘述中正確的是________。A：在窗體的Form_Load事件過程中定義的變量是全局變量B：局部變量的作用域可以超出所定義的過程C：在某個Sub過程中定義的局部變量可以與其他事件過程中定義的局部變量同名，但其作用域只限于該過程D：在調(diào)用過程時，所有局部變量被系統(tǒng)初始化為0或空字符串28、在窗體上畫一個名稱為Command1的命令按鈕然后編寫如下程序PrivateSubCommand1_Click()DimXAsIntegerStaticYAsIntegerClsx=x+5y=y+3PrintX，YEndSub程序運行時，兩次單擊命令按鈕Command1后，窗體顯示的結(jié)果是________。A：106B：56C：53D：10329、有關(guān)VB應(yīng)用程序中過程的說法正確的是________。A：過程的定義可以嵌套，但過程的調(diào)用不能嵌套B：過程的定義不可以嵌套，但過程的調(diào)用可以嵌套C：過程的定義和調(diào)用都可能嵌套D：過程的定義和調(diào)用都不能嵌套30、在VB中，過程共有三種，它們是________。A：事件過程，子過程和函數(shù)過程B：Sub過程，函數(shù)過程和屬性過程C：事件過程，函數(shù)過程和通用過程D：Sub過程，函數(shù)過程和通用過程二、填空題1、窗體上有一個命令按鈕，事件代碼如下：PrivateSubCommand1_Click()a="3"b="5"a=Val(a)+Val(b)b=Val("35")Ifa=bThenPrinta-bElsePrintb-aEndSub程序運行后，單擊命令按鈕，輸出___。2、有下圖所示的用戶登錄界面，用戶輸入的密碼字符均以"*"顯示，若用戶輸入的用戶名為admin，且密碼為hello，則登錄成功，否則登錄失敗，提示用戶，并將兩文本框（名稱分別為Text1、Text2）清空，進(jìn)行重新輸入。請將程序補充完整。PrivateSubCommand1_Click()IfText1.Text<>"admin"Or_【1】ThenMsgBox"對不起，你輸入的用戶名或密碼不正確，請重新輸入"Text1=""Text2=""ElseMsgBox"登錄成功!"EndIfEndSubPrivateSubForm_Load()Text2.【2】_="*"EndSub3、下面程序采用比較交換法對數(shù)組進(jìn)行升序排序，請將程序補充完整。OptionBase1PrivateSubCommand1_Click()Dima,nAsInteger,i%,j%a=Array(23,546,34,27,5,68,435,9,78,89)n=【1】__Print"排序前數(shù)組值："Fori=1TonPrinta(i);NextiPrintFori=1To__【2】__Forj=i+1TonIfa(i)>a(j)Thent=a(i)__【3】__a(j)=tEndIfNextjNextiPrint"升序排序后數(shù)組值："Fori=1TonPrinta(i);NextiEndSub4、當(dāng)文本框得到焦點時觸發(fā)__事件，當(dāng)文本框失去焦點時觸發(fā)LostFocus事件。5、下列程序的輸出結(jié)果是__。PrivateSubForm_Click()a="HelloGoodMorning"b=Left(a,5)c=Mid(a,10)d=b+cPrintdEndSub6、表示Z是3的倍數(shù)或是7的倍數(shù)的邏輯表達(dá)式為_。7、運行以下程序，輸出的結(jié)果為_____。PrivateFunctionjc(xAsInteger)AsLongDimiAsIntegerjc=1Fori=1Toxjc=jc*iNextiEndFunctionPrivateSubForm_Click（）DimheasLonghe=jc(5)+jc(3)PrintheEndSub8、下面程序運行后，單擊命令按鈕，窗體上輸出的結(jié)果是：【1】、【2】和_【3】_。DimxAsInteger,yAsIntegerPrivateFunctionf(xAsInteger)DimyAsIntegerx=x+2f=x+yEndFunctionPrivateSubp(ByValzAsInteger)x=y+zEndSubPrivateSubCommand1_Click()x=1:y=1Callp(x)z=f(y)Printx;y;zEndSub9、在窗體上添加一個名稱為Command1的命令按鈕及3個名稱分別為Label1，Label2，Label3的標(biāo)簽，并編寫如下程序，程序運行后，單擊該命令按鈕，在Label1顯示的值為__【1】___，在Label2顯示的值為__【2】__，在Label3顯示的值為____【3】___。OptionBase1PrivateSubCommand1_Click()DimaAsVarianta=Array(10,25,5,15,5)Max=a(1):Min=a(1)Fori=1ToUBound(a)Sum=Sum+a(i)Ifa(i)>MaxThenMax=a(i)Ifa(i)<MinThenMin=a(i)NextiLabel1.Caption=MaxLabel2.Caption=MinLabel3.Caption=Sum/5EndSub10、下列程序代碼的功能是在窗體上打印數(shù)組a中的最小值，請將程序代碼補充完整。OptionBase1PrivateSubCommand1_Click()DimaAsVariantDimiAsInteger,xAsIntegera=Array(9,7,10,2,8,12)x=___【1】____Fori=LBound(a)+1ToUBound(a)Ifa(x)>a(i)Then____【2】_____NextiPrinta(x)EndSub三、判斷題1、標(biāo)簽和文本框的功能都是在程序運行時只能顯示文本內(nèi)容不能編輯文本內(nèi)容。2、MsgBox函數(shù)可用來接受用戶輸入的字符串內(nèi)容。3、要使計時器每隔1分鐘記一次時，設(shè)置該計時器的Interval屬性值為14、函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關(guān)系。5、在不同的模塊中可以聲明定義相同名字的模塊級變量，它們代表不同的變量，而且作用域范圍不同，因此互不干擾。6、若參數(shù)是按地址傳遞的，形參和實參類型可以不同。7、根據(jù)文件的存取方式不同，可以將文件分為順序文件和隨機文件。8、執(zhí)行程序段Fori=1To100Sum=Sum+iNexti后，i的值為1009、循環(huán)DoWhilen=100Loop表示當(dāng)n=100時循環(huán)10、VB中布爾型（Boolean）的值只有True和False。11、執(zhí)行程序段Fori=100To1Sum=Sum+iNexti后，i的值為012、折半（二分）查詢只適合于有序數(shù)組。13、有程序段Dima(10)AsIntegera(10)=100兩處的a(10)含義相同14、單選按鈕選中時，其Value屬性為True。15、為了清除列表框中所有內(nèi)容，應(yīng)使用Clear方法.16、確定一個控件在窗體上的位置的屬性是Left、Top。17、每一個If結(jié)構(gòu)必須以EndIf語句作為結(jié)束。18、用數(shù)組作為過程的參數(shù)時，既能以傳值方式傳遞，也能以傳地址方式傳遞。19、print方法可用于圖片框控件輸出信息。20、VB是一種面向過程的程序設(shè)計語言。四、編程題1、由隨機函數(shù)產(chǎn)生10道一位整數(shù)與兩位整數(shù)相加的加法題，產(chǎn)生的加法題依次顯示在屏幕上，每產(chǎn)生一道題后，由用戶輸入答案，如果答案正確，記10分；如果答案錯誤，允許第二次輸入答案，第二次輸入答案正確，記5分，錯誤記0分。最后給出總得分。2、驗證“哥德巴赫猜想：任何一個大于6的偶數(shù)，可以表示為兩個素數(shù)之和”，從鍵盤輸入一個大于6的偶數(shù)后，打印出所有的分解結(jié)果。3、一個簡易的成績評定程序，根據(jù)評委們給出的成績，按去掉一個最高分和一個最低分，求平均分的方法求選手的成績。參考界面如下：編寫單擊窗體事件過程，從鍵盤上輸入10個數(shù)據(jù)并保存在一個一維數(shù)組中，找出該數(shù)組中最大元素和最小元素的值，并將結(jié)果寫入順序文件"D:\test1.dat"。參考答案《VB程序設(shè)計》復(fù)習(xí)題一、選擇題1.B2.D3.B4.B5.A6.C7.B8.C9.C10.B11.D12.D13.A14.C15.A16.A17.D18.C19.C20.B21.B22.D23.D24.D25.A26.D27.C28.B29.B30.A二、填空題1.272.【1】Text2.Text=”hello”,【2】PasswordChar3.【1】Ubound(a)【2】n-1【3】a(i)=a(j)4.SetFocus5.HelloMorning6.ZMod3=0OrZMod7=07.1268.【1】2【2】3【3】39.【1】25【2】5【3】1210.【1】1【2】a(x)=a(i)三、判斷題1.F2.F3.F4.F5.T6.F7.T8.F9.T10.T11.F12.T13.F14.T15.T16.F17.F18.F19.T20.F四、編程題1、程序代碼如下PrivateSubForm_Click()s=0Fori=1To10a=Int(10*Rnd)b=Int(10+10*Rnd)str1$="第"&i&"題"&a&"+"&bc=Val(InputBox(str1$&"第一次回答"))Ifa+b=cThens=s+10str2$=str1$&"10分"Elsec=Val(InputBox(str1$&"第二次回答"))Ifa+b=cThens=s+5str2$=str1$&"5分"Elsestr2$=str1$&"0分"EndIfEndIfForm1.Printstr2$NextiForm1.Print"總分";sEndSubPrivateSubForm_Load()Form1.AutoRedraw=TrueForm1.Print"加法題，第一次回答正確10分，"Form1.Print"第二次回答正確5分"Form1.Print"單擊窗體開始"EndSub2、程序代碼如下PrivateSubForm_Click()n=Val(InputBox("輸入一個大于6的偶數(shù)"))Ifn<=6OrnMod2<>0ThenForm1.Print"數(shù)據(jù)錯誤"ElseForm1=2Ton/2m2=n-m1f=0Fori=2Tom1-1Ifm1Modi=0Thenf=1:ExitForNextiFori=2Tom2-1Ifm2Modi=0Orf=1Thenf=1:ExitForNextiIff=0ThenPrintm1;m2Nextm1EndIfEndSubPrivateSubForm_Load()Form1.AutoRedraw=TrueForm1.Print"打印兩個素數(shù)之和"Form1.Print"單擊窗體開始"EndSub3、程序代碼如下：PrivateSubCommand1_Click()DimsumAsSingleDimmaxAsSingle,minAsSinglesum=0Fori=0To5Text1(i).Text=Int(Rnd*10)/10+9sum=sum+Val(Text1(i).Text)Nextimin=Val(Text1(0).Text):max=Val(Text1(0).Text)Fori=1To5Ifmin>Val(Text1(i).Text)Thenmin=Text1(i).TextEndIfIfmax<Val(Text1(i).Text)Thenmax=Text1(i).TextEndIfNextiaverage=(sum-min-max)/4Label4.Caption=Int(average*10)/10EndSub4、程序代碼如下：OptionBase1PrivateSubForm_Click()Dima(10)AsIntegerFori=1To10a(i)=Val(InputBox("請輸入數(shù)"))NextiOpen"test1.dat"ForOutputAs#1Max=a(1)Min=a(1)Fori=2To10Ifa(i)>MaxThenMax=a(i)Ifa(i)<MinThenMin=a(i)NextiWrite#1,Max,MinClose#1EndSub《VisualBasic程序設(shè)計》復(fù)習(xí)題一.單選題1、在VB中，將多條語句寫在同一行，需加______進(jìn)行分隔。A：,B：:C：;D：空格答案：B2、下面程序段執(zhí)行后，輸出的結(jié)果是______。DimpiAsIntegerpi=3.14Print"pi"A：3.14B：3C：piD：有語法錯誤答案：C3、下面關(guān)于數(shù)組操作正確的是______。A：OptionBase2B：n=10Dima(n)AsIntegerC：Dima()AsIntegera(1)=100D：Dimaa=Array(1,2,3,4,5,6)答案：D4、以下均為窗體的事件，在一次程序執(zhí)行過程中，一定會被觸發(fā)的事件是______。A：LoadB：ClickC：UnloadD：DblClick答案：A5、以下敘述中錯誤的是_________。A：一個工程可以包括多種類型的文件B：VisualBasic應(yīng)用程序既能以編譯方式執(zhí)行，也能以解釋方式執(zhí)行C：程序運行后，在內(nèi)存中只能駐留一個窗體D：對于事件驅(qū)動型應(yīng)用程序，每次運行時的執(zhí)行順序可以不一樣答案C6、下面關(guān)于過程敘述錯誤的是______。A：可以在事件過程中調(diào)用通用過程B：不能在函數(shù)過程中定義事件過程C：函數(shù)過程可以返回多個值D：一個Sub過程必須有一個EndSub語句答案：C7、執(zhí)行語句s=Len(Mid("BeiJing",1,7))后，s的值是______。A："BeiJing"B："BeiJin"C：7D：8答案：C8、下面______是合法變量名。A：k-stringB：stringC：kstringD：k_string答案：D9、在窗體上畫一個文本框、一個標(biāo)簽和一個命令按鈕，其名稱分別為Text1、Label1和Command1，然后編寫如下兩個事件過程：PrivateSubCommand1_Click()S$=InputBox("請輸入一個字符串")Text1.Text=S$EndSubPrivateSubText1_Change()Label1.Caption=UCase(Mid(Text1.Text,7))EndSub程序運行后，單擊命令按鈕，將顯示一個輸入對話框，如果在該對話框中輸入字符串"VisualBasic"，則在標(biāo)簽中顯示的內(nèi)容是________。A：BASICB：BasicC：basicD：VisualBasic答案：A10、下面程序運行后，第3次單擊窗體后，窗體中輸出的是______。DimaAsIntegerPrivateSubForm_Click()StaticcAsIntegerClsa=a+1b=b+1c=c+1Printa;b;cEndSubA：111B：113C：313D：333答案：C11、下面選項中VisualBasic數(shù)據(jù)類型關(guān)鍵字與其說明符不一致的是______。A：Integer!B：String$C：Long&D：Double#答案：A12、要改變窗體的標(biāo)題時，應(yīng)當(dāng)在屬性窗口中改變的屬性是________。A：NameB：TextC：CaptionD：Label答案：C13、設(shè)在名稱為Myform的窗體上只有一個名稱為C1的命令按鈕，下面敘述正確的是________。A：窗體的Click事件過程名是Myform_Click()B：命令按鈕的Click事件過程名是C1_Click()C：命令按鈕的Click事件過程名是Command1_Click()D：以上都是錯誤的答案：B14、以下說法正確的是________。A：窗體文件的擴(kuò)展名為.vbpB：一個窗體對應(yīng)一個窗體文件C：VB中的一個工程只包含一個窗體D：VB一個工程最多可包含256個窗體答案：B15、無論何種控件，都具有一個共同的屬性________。A：CaptionB：NameC：TextD：Font答案：B16、語句a=InputBox("today","tomorrow","yesterday",,,"daybeforeyesterday",5)將顯示一個對話框，在對話框的輸入?yún)^(qū)中顯示的信息是（）。A：todayB：tomorrowC：yesterdayD：daybeforeyesterday答案：C17、設(shè)窗體上有一個文本框，名稱為Text1，程序運行后，要求該文本框不能接受鍵盤輸入，但能輸出信息，以下屬性設(shè)置正確的是________。A：Text1.maxlengh=0B：Text1.Enabled=FalseC：Text1.Visible=FalseD：Text1.Width=0答案：B18、在窗體上畫一個名稱為Timer1的計時器控件，要求每隔0.5秒發(fā)生一次計時器事件，則以下正確的屬性設(shè)置是________。A：Timer1.Interval=0.5B：Timer1.Interval=5C：Timer1.Interval=50D：Timer1.Interval=500答案：D19、在窗體（Name屬性為Forml）上畫兩個文本框（其Name屬性分別為Text1和Text2）和一個命令按鈕（Name屬性為Command1），然后編寫如下兩個事件過程：PrivateSubCommand1_Click()A=Text1.Text+Text2.TextPrintaEndSubPrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSub程序運行后，在第一個文本框（Text1）和第二個文本框（Text2）中分別輸入123和321，然后單擊命令按鈕，則輸出結(jié)果為__________。A：444B：321123C：123321D：132231答案：C20、以下循環(huán)結(jié)構(gòu)中，任何情況下至少執(zhí)行一次循環(huán)體的是______。A：For循環(huán)變量=初值To終止值循環(huán)體Next循環(huán)變量B：While<條件>循環(huán)體WendC：Do循環(huán)體LoopUntil<條件>D：DoWhile<條件>循環(huán)體Loop答案：C21、下面程序運行后，第3次單擊窗體后，窗體中輸出的是______。DimaAsIntegerPrivateSubForm_Click()StaticcAsIntegerClsa=a+1b=b+1c=c+1Printa;b;cEndSubA：111B：113C：313D：333答案：C22、以下能夠觸發(fā)文本框Change事件的操作是________。A：文本框失去焦點B：文本框獲得焦點C：設(shè)置文本框的焦點D：改變文本框的內(nèi)容答案：D23、在窗體上畫一個文本框，然后編寫如下事件過程：PrivateSubForm_Click()DimxAsIntegerx=Val(InputBox("請輸入一個整數(shù)"))Printx+Text1.TextEndSub程序運行時，在文本框中輸入12，然后單擊窗體，在輸入對話框中輸入34，單擊"確定"按鈕后，在窗體上顯示的內(nèi)容為______。A：46B：123C：3412D：1234答案：A24、根據(jù)變量的作用域，VB中可以將變量分為3類，分別是_______。A：局部變量、模塊變量和全局變量B：局部變量、模塊變量和標(biāo)準(zhǔn)變量C：局部變量、模塊變量和窗體變量D：局部變量、標(biāo)準(zhǔn)變量和全局變量答案：A25、執(zhí)行下面的語句后，所產(chǎn)生的信息框的標(biāo)題是________。a=MsgBox("AAAA"，，"BBBB"，""，5)A：BBBBB：空C：AAAAD：出錯，不能產(chǎn)生信息框答案：A26、Cls方法可以清除窗體或圖片框中的________內(nèi)容。A：在設(shè)計階段使用Picture設(shè)置的背景位圖B：在設(shè)計階段放置的控件C：在運行階段產(chǎn)生的文字D：以上全部內(nèi)容答案：C27、設(shè)列表框List1已有5個列表項，則以下不能實現(xiàn)將字符串"AAA"添加到列表框最末尾的語句是__。A：List1.AddItem"AAA"B：List1.AddItem"AAA",List1.ListCountC：List1.AddItem"AAA",List1.ListIndexD：-x答案：C28、在窗體上畫1個命令按鈕，并編寫如下事件過程：PrivateSubCommand1_Click()Fori=5to1step-0.8PrintInt(i);NextiEndSub運行程序，單擊命令按鈕，窗體上顯示的內(nèi)容為________。A：543211B：54321C：43211D：443211答案：A29、立即窗口執(zhí)行以下操作，則輸出的結(jié)果是_______。a＝10：b＝15debug.Printa>bA：-1B：0C：TrueD：False答案：D30、設(shè)a="MicrosoftVisualBasic",則以下使變量b的值為"VisualBasic"的語句是_______。A：b=Left(a,10)B：b=Mid(a,10)C：b=Right(a,10)D：b=Mid(a,11,10)答案：B31、在窗體中添加一個命令按鈕，名稱為Command1，然后編寫如下程序PrivateSubCommand1_Click()A=1234B$=Str$(A)C=Len(B$)PrintCEndSub程序運行后，單擊命令按鈕，則在窗體上顯示的內(nèi)容是_______。A：0B：5C：6D：7答案：B32、對語句Dima&,b%,c$,d!判斷錯誤的是______。A：聲明變量a是長整型B：聲明變量b是整型C：聲明變量c是貨幣型D：聲明變量d是單精度型答案：C33、有變量定義語句Dimmax,minAsInteger，可以知道m(xù)ax的類型是_______。A：變體類型B：單精度型C：雙精度型D：字符串型答案：A34、產(chǎn)生[10,90]閉區(qū)間之間的隨機整數(shù)的表達(dá)式為_______。A：Int(Rnd*80)+10B：Int(Rnd*81)+10C：Int(Rnd*80)+11D：Int(Rnd*81)+11答案：B35、下列說法錯誤的是_______。A：標(biāo)準(zhǔn)模塊文件的擴(kuò)展名為.basB：一個窗體對應(yīng)一個窗體文件C：VisualBasic中的一個工程只包含一個窗體D：VisualBasic中一個工程最多可以包含255個窗體答案：C36、下面各語句中，錯誤的語句是_______。A：DimA1,A2B：(A+B)=CC：A=B+CD：A="B"+C答案：B37、對變量名說法不正確的是_______。A：必須是字母開頭，不能是數(shù)字或其他字符B：不能是VisualBasic的保留字C：可以包含字母、數(shù)字、下劃線和標(biāo)點符號D：不能超過255個字符答案：C38、在窗體上畫一個命令按鈕，名稱為Command1，然后編寫如下事件過程：PrivateSubCommand1_Click()a$="softwareandhardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBoxa$,,b$,c$,9EndSub運行程序，單擊命令按鈕，則在彈出的信息框的標(biāo)題欄中顯示的是________。A：softwareandhardwareB：softwareC：hardwareD：9答案：C39、下面關(guān)于常量或變量定義錯誤的是_________。A：Constn%=1B：DimnAsDouble=3.14C：DimmAsIntegerD：Dims$答案：B40、要想在過程調(diào)用后返回兩個結(jié)果，下面過程定義語句中語法正確的是_______。A：Subswap(ByValm，ByValn)B：Subswap(m,ByValn)C：Subswap(m,n)D：Subswap(ByValm,n)答案：C41、Sub過程與Function過程最根本的區(qū)別是_______。A：Sub過程可以直接使用過程名調(diào)用，而Function過程不可以B：Function過程可以有參數(shù)，而Sub過程不可以C：兩種過程參數(shù)傳遞方式不同D：Sub過程的過程名不能返回值，而Function過程能通過過程名返回值答案：D42、下面程序的輸出結(jié)果是_______：PrivateSubproc(chAsString)s=""Fork=Len(ch)To1Step-1s=s&Mid(ch,k,1)Nextkch=sEndSubPrivateSubCommand1_Click()ch$="ABCDEF"procchPrintchEndSubA：ABCDEFB：AC：FEDCBAD：F答案：C43、以下是一個能返回數(shù)組a中最大數(shù)的函數(shù)過程代碼：Functionmaxval(a()AsInteger)AsIntegerDimmax%max=1Fori=2To10Ifa(i)>a(max)Thenmax=iNextimaxval=maxEndFunction程序運行時，發(fā)現(xiàn)函數(shù)過程的返回值是錯的需要修改，下面的修改方案中正確的是______。A：語句"max=1"應(yīng)改為"max=a(1)"B：語句"Fori=2To10"應(yīng)改為"Fori=1To10"C：if語句"max=k"應(yīng)改為"max=a(k)"D：語句"maxval=max"應(yīng)改為"maxval=a(max)"答案：D44、在窗體上畫一個名稱為Command1的命令按鈕，編寫下列程序：PrivateSubCommand1_Click()DimaAsIntegerStaticbAsIntegerclsa=a+bb=b+4Printa,bEndSub程序運行后，單擊該命令按鈕三次，屏幕上顯示的值是________。A：412B：O4C：48D：812答案：D45、單擊一次命令按鈕后，下列程序的執(zhí)行結(jié)果是________。PrivateSubCommand1_Click()s=P(1)+P(2)+P(3)+P(4)PrintsEndSubPublicFunctionP(NAsInteger)StaticSumFori=IToNSum=Sum+iNextiP=SumEndFunctionA：15B：25C：35D：45答案：C46、下面子過程語句說明合法的是________。A：Subf1(ByValx()AsInteger)B：Subf1(x%0)AsIntegerC：Functionf%(f1%)D：Functionf1%(xAsInteger)答案：D47、在窗體上畫一個名稱為Command1的命令按鈕，編寫如下程序PrivateSubCommand1_Click()Printpl(3,7)EndSubPublicFunctionpl(xAsSingle,nAsInteger)AsSingleIfn=0Thenpl=1ElseIfnMod2=1Thenpl=x*x+nElsepl=x*x-nEndIfEndFunction程序運行后，單擊該命令按鈕，窗體上顯示的結(jié)果是________。A：2B：1C：0D：16答案：D48、設(shè)有如下過程：Subff(x，y，z)x=y+zEnd