VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料_第1頁
VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料_第2頁
VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料_第3頁
VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料_第4頁
VB語言程序設(shè)計專升本期末考試總復(fù)習(xí)資料_第5頁
已閱讀5頁,還剩62頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認(rèn)領(lǐng)

文檔簡介

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窗體文件擴展名為vbpB:一個VisualBasic應(yīng)用程序可以包含多個窗體文件C:一個窗體文件可以有多個代碼窗口D:VisualBasic程序按過程編寫先后順序依次執(zhí)行5、以下四個選項中,對VisualBasic描述正確的是______。A:VisualBasic窗體文件擴展名為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、在以下表達式中結(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)模塊文件的擴展名為.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)清空,進行重新輸入。請將程序補充完整。PrivateSubCommand1_Click()IfText1.Text<>"admin"Or_【1】ThenMsgBox"對不起,你輸入的用戶名或密碼不正確,請重新輸入"Text1=""Text2=""ElseMsgBox"登錄成功!"EndIfEndSubPrivateSubForm_Load()Text2.【2】_="*"EndSub3、下面程序采用比較交換法對數(shù)組進行升序排序,請將程序補充完整。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ù)的邏輯表達式為_。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中,將多條語句寫在同一行,需加______進行分隔。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:窗體文件的擴展名為.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ù)的表達式為_______。A:Int(Rnd*80)+10B:Int(Rnd*81)+10C:Int(Rnd*80)+11D:Int(Rnd*81)+11答案:B35、下列說法錯誤的是_______。A:標(biāo)準(zhǔn)模塊文件的擴展名為.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

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論