VB開發(fā)基礎(chǔ)(習(xí)題卷24)

試卷科目：VB開發(fā)基礎(chǔ)VB開發(fā)基礎(chǔ)(習(xí)題卷24)PAGE"pagenumber"pagenumber/SECTIONPAGES"numberofpages"numberofpagesVB開發(fā)基礎(chǔ)第1部分：?jiǎn)雾?xiàng)選擇題，共83題，每題只有一個(gè)正確答案,多選或少選均不得分。[單選題]1.下列不能打開屬性窗口的操作是_____.A)B)C)D)A)執(zhí)行"視圖"菜單中的"屬性窗口"命令B)按F4鍵C)單擊工具欄上的"屬性窗體"按鈕D)按Ctrl+T答案:D解析:[單選題]2.有如下程序.PrivateSubCommand1_Click()m$="ABC"n$="abc"k$=LCase$(mS)j$=UCase$(n$)PrintAsc(k$+j$)EndSub程序運(yùn)行后,輸出的結(jié)果是().A)abcabcB)ABCABCC)65D)97答案:D解析:[單選題]3.如果設(shè)計(jì)時(shí)在屬性窗口將命令按鈕的()屬性設(shè)置為False,則運(yùn)行時(shí)按鈕從窗體上消失.A)VisibleB)EnabledC)DisabledPictureD)Default答案:A解析:[單選題]4.下列不能打開屬性窗口的操作是().A)執(zhí)行"視圖"菜單中的"屬性窗口"命令B)按F4鍵C)按Ctrl+TD)單擊工具欄上的"屬性窗口"按鈕答案:C解析:[單選題]5.語句DimAbc(5)所定義的數(shù)組元素個(gè)數(shù)是________。A)6B)5C)4D)10答案:A解析:[單選題]6.表達(dá)式"Turbo"+"c">"Ture"+"Basic"的值是().A)TrueB)FalseC)NullD)出錯(cuò)信息答案:B解析:[單選題]7.下列程序PrivateSubForm_Click()Forj=1To20a=a+jmod5NextjPrinta;jEndSub運(yùn)行后,單擊窗體輸出的值為A)4021B)3421C)2134D)3420答案:A解析:[單選題]8.三種不同風(fēng)格的組合框中,用戶不能輸入數(shù)據(jù)的組合框是()。A)下拉式組合框B)簡(jiǎn)單組合框C)下拉式列表框D)以上都不對(duì)答案:C解析:[單選題]9.下面程序運(yùn)行時(shí),內(nèi)層循環(huán)的循環(huán)總次數(shù)是().Form=1To3Forn=0Tom-1NextnNextmA)4B)5C)6D)7答案:C解析:[單選題]10.下面所列中，（）是不合法的單精度常數(shù)A)100！B)100.0C)1E+2D)100.0D+2答案:D解析:[單選題]11.下列能將輸入焦點(diǎn)置于名稱為txtAdd文本框中的語句是______。()A)txtAdd=SetFocusB)txtAdd.SetFocusC)txtAdd.SetFocus=TrueD)SetFocus=True答案:B解析:[單選題]12.設(shè)工程文件包含兩個(gè)窗體文件Form1.frm、Form2.frm及一個(gè)標(biāo)準(zhǔn)模塊文件Module1.bas。兩個(gè)窗體上分別只有一個(gè)名稱為Command1的命令按鈕。Form1的代碼如下:PublicxAsIntegerPrivateSubForm_Load()X=1Y=5EndSubPrivateSubCommand1_Click()Form2.ShowEndSubPrivateSubCommand1_Click()PrintForm1.x,yEndSubModule1的代碼如下:PublicyAsInteger運(yùn)行以上程序,單擊Form1的命令按鈕Command1,則顯示Form2;再單擊Form2上的命令按鈕Command1,則窗體上顯示的是()。A)15B)05C)00D)程序有錯(cuò)答案:A解析:[單選題]13.下列建立Sub過程不正確的語句是A)PrivateSubComp(arg1AsInteger,arg2AsString)B)PublicSubComp(arg1AsInteger,,Optionalarg3)C)StaticSubComp(arg1AsInteger,arg2AsString,Optionalarg3)D)ProtectedSubComp(arg1AsInteger)答案:D解析:[單選題]14.在窗體上建立通用對(duì)話框需要添加的控件是()A)Data控件B)Form控件C)CommonDialog控件D)VBComboBox控件答案:C解析:[單選題]15.寫出如下程序運(yùn)行結(jié)果().Functionf(mAsInteger)AsIntegerb=1StaticcAsIntegerb=b+1c=c+1f=m*b*cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=2sum=0ForI=1To3sum=sum+f(a)NextIprintsumEndSubA)12B)16C)20D)24答案:D解析:[單選題]16.有如下程序.a$=""122345876""d$=Left$(a$,1)Fori=2ToLen(a$)z$=Mid$(a$,i,1)Ifz$>d$Thend$=z$NextiPrintd$運(yùn)行后,輸出的結(jié)果是().A)1B)7C)4D)8答案:D解析:[單選題]17.下面程序段的執(zhí)行結(jié)果為().I=4A=5DoI=I+1A=A+2LoopUntilI>=7Print"I=";IPrint"A=";AA)I=4B)I=7C)I=8D)I=7答案:D解析:[單選題]18.下面()是日期型常量.A)"12/19/99"B)12/19/99C)<12/19/99<D){12/19/99}答案:C解析:[單選題]19.可視化編程的最大優(yōu)點(diǎn)是().A)具有標(biāo)準(zhǔn)工具箱B)一個(gè)工程文件由若干個(gè)窗體文件組成C)不需要編寫大量代碼來描述圖形對(duì)象D)所見即所得答案:C解析:[單選題]20.若使命令按鈕無效，應(yīng)設(shè)置其____屬性為Flase。A)EnabledB)VisibleC)StyleD)Cancel答案:A解析:[單選題]21.對(duì)于語句ifx=1theny=1，下列說法正確的是()。A)x=1B)x=1C)x=1D)x=1答案:C解析:[單選題]22.下列可縮放圖片的屬性是().A)autosizeB)pictureC)stretchD)OleDrawMode答案:C解析:[單選題]23.以下屬性和方法中（）可重定義坐標(biāo)系A(chǔ))DrawWidth屬性B)ScaleMode屬性C)DrawStyle屬性D)Scale方法答案:D解析:[單選題]24.下列關(guān)于SelectCase的敘述中,錯(cuò)誤的是()A)Case10To100表示判斷Is是否介于10與100之間B)Case"abc","ABC"表示判斷Is是否和"abc"、"ABC"兩個(gè)字符中的一個(gè)相同C)Case"X"表示判斷Is是否為大寫字母XD)Case-7,0,100表示判斷Is是否等于字符串"-7,0,100"答案:D解析:[單選題]25.下面四項(xiàng)中,______是VB中的數(shù)值變量.A)ABCB)E+2C)"True"D)0.0135答案:A解析:[單選題]26.VB工程文件的擴(kuò)展名是()。A)frmB)vbpC)basD)frx答案:B解析:[單選題]27.假定有如下的sub過程:SubFun(xAsSingle,yAsSingle)t=x:x=t\y:y=tModyEndSub在窗體上畫一個(gè)命令按鈕和兩個(gè)文本框(名稱分別為Txt1和Txt2),然后編寫如下事件過程PrivateSubCommand1_Click()DimaAsSingle,bAsSinglea=CInt(Txt1.Text):b=CInt(Txt2.Text)CallFun(a,b)Printa,bEndSub程序運(yùn)行后在兩個(gè)文本框中分別輸入5和6,單擊命令按鈕后,輸出結(jié)果為_____。A)56B)05C)14D)12答案:B解析:[單選題]28.下面關(guān)于順序文件的描述正確的是().A)每條記錄的長(zhǎng)度必須相同B)可通過編程對(duì)文件中的某條記錄方便地修改C)數(shù)據(jù)只能以ASCII碼形式存放在文件中,所以可通過文本編輯軟件顯示D)文件的組織結(jié)構(gòu)復(fù)雜答案:C解析:[單選題]29.有以下程序:OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()DimiAsInteger,jAsIntegerReDimarr(3,2)Fori=1To3Forj=1To2arr(i,j)=i*10+jNextjNextiReDimPreservearr(3,4)Forj=3To4arr(3,j)=10*j+5NextjPrintarr(3,2);arr(3,4)EndSub程序運(yùn)行后,單擊窗體,輸出結(jié)果為A)022B)3135C)3245D)00答案:C解析:[單選題]30.在代碼中，定義了一個(gè)子過程：SubP(a,b)…EndSub下面調(diào)用該過程的格式正確的___________。A)P()B)P10,20,30C)P10D)P10,20答案:D解析:[單選題]31.啟動(dòng)VisualBasic后,就意味著要建立一個(gè)新的()A)窗體B)程序C)工程D)文件答案:C解析:[單選題]32.在窗體中添加一個(gè)命令按鈕和一個(gè)文本框,并編寫如下程序代碼:PrivateSubCommand1_Click()Fora=1To5Y=1Forb=1To10ForC=1To6X=X+1Y=y+1NextCNextbNextaText.Text=yEndSub程序運(yùn)行后,單擊命令按鈕,文本框中的值為0.A)(A)61B)(B)60C)(C)36D)(D)6答案:A解析:[單選題]33.以下不能在?工程資源管理器?窗口中列出的文件類型是()。A)baB)reC)frD)ocx答案:B解析:[單選題]34.在代碼編輯窗口內(nèi)將文本框Text1的Text屬性設(shè)置為?水平考試?，正確的書寫形式是____。A)Text1.Text="水平考試"B)Text1.Caption="水平考試"C)Caption=水平考試D)Text1.Caption("水平考試")答案:A解析:[單選題]35.Image圖像框，用來設(shè)置自動(dòng)調(diào)整與圖片大小的自適應(yīng)狀態(tài)的屬性是A)AppearanceB)AutoRedrawC)StretchD)AutoSize答案:C解析:[單選題]36.終止應(yīng)用程序的正確方法是()A)卸載窗體,然后執(zhí)行End語句B)卸載窗體C)執(zhí)行End語句D)執(zhí)行Stop語句答案:C解析:[單選題]37.在窗體上建立一個(gè)通用對(duì)話框,其名稱為CommonDialog1,然后再添加一個(gè)命令按鈕,并編寫如下事件過程:PrivateSubCommand1_Click()CommonDialog1.Flags=cdlOFNHideReakOnlyCommonDialog1.Filter="AllFiles(*.*)**TextFiles"&?(*.txt)*.txtBatchFiles(*.bat)*.bat"CommonDialog1.FilterIndex=2CommonDialog1.ShowOpenMsgBoxCommonDialog1.FileNameEndsub程序運(yùn)行后,單擊命令按鈕,將顯示一個(gè)"打開"對(duì)話框,此時(shí)在?文件類型?框中顯示的是0.A)AllFiles(**)B)TextFiles(*.txt)C)BatchFiles(*.bat)D)不確定答案:B解析:[單選題]38.執(zhí)行語句a=MsgBox()后，所產(chǎn)生的信息框的標(biāo)題是___。A)BBBBB)空C)AAAAD)出錯(cuò)，不能產(chǎn)生信息框答案:A解析:[單選題]39.窗體上有一個(gè)由兩個(gè)文本框組成的控件數(shù)組,名稱為Text1,并有如下事件過程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1(1).FontSize=Text1(0).FontSize*2Text1(1).Text=Text1(0).TextCase1Text1(0).FontSize=Text1(1).FontSize/2Text1(0).Text=Text1(1).TextCaseElseMsgBox"執(zhí)行Else分支"EndSelectEndSub關(guān)于上述程序,以下敘述中錯(cuò)誤的是()。A)Index用于標(biāo)識(shí)數(shù)組元素B)本程序中CaseElse分支的語句永遠(yuǎn)不會(huì)被執(zhí)行C)向任何一個(gè)文本框輸入字符,都會(huì)在另一個(gè)文本框中顯示該字符D)下標(biāo)為0的文本框中顯示的字符尺寸將越來越小答案:B解析:[單選題]40.數(shù)組Arr(2To5,-2To5)中第三行第三個(gè)元素是()A)Arr(3,3)B)Arr(5,1)C)Arr(4,0)D)Arr(3,2)答案:C解析:[單選題]41.為了在按下Esc鍵時(shí)執(zhí)行某個(gè)命令按鈕的Click事件過程,需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是().A)ValueB)DefaultC)CancelD)Enabled答案:C解析:[單選題]42.使用()方法,可將選中項(xiàng)移出列表框。A)ClearB)RemoveItemC)PrintD)AddItem答案:B解析:[單選題]43.有如下程序:a=1:b=2:c=3a=a+b:b=b+c:c=b+aIfa<>3Orb<>3Thena=b-a:b=C-a:C=b+aEndIfPrinta+b+c運(yùn)行后,輸出的結(jié)果是().A)16B)3C)6D)8答案:A解析:[單選題]44.執(zhí)行以下程序段:A$="VisualBasicProgramming"B$="C++"C$=UCase(Left$(a$,7))&b$&Right$(a$,12)變量c$的值為()。A)VisualBASICProgrammingB)VISUALC++ProgrammingC)VisualC++ProgrammingD)VISUALBASICProgramming答案:B解析:[單選題]45.一個(gè)變量要保存-32786，不應(yīng)定義成______型變量A)IntegerB)LongC)SingleD)Double答案:A解析:[單選題]46.表達(dá)式Int()/100的值是___。A)19B)19.05C)18.55D)18.5答案:C解析:[單選題]47.下列變量命名正確的是().A)LenB)Test@qwC)6cost_1D)count2s答案:D解析:[單選題]48.為保存一個(gè)工程至少應(yīng)保存兩個(gè)文件,這兩個(gè)文件分別是()。A)文本文件和工程文件B)窗體文件和工程文件C)窗體文件和標(biāo)準(zhǔn)模塊文件D)類模塊文件和工程文件答案:B解析:[單選題]49.單擊一次命令按鈕,下列程序代碼的執(zhí)行結(jié)果為().PrivaeSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4PrintP2(c,b,a)EndSubPrivateFunctionP1(xAsInteger,yAsInteger)P1=2*x+y+3*zEndFunctionPrivateFunctionP2(xAsInteger,yAsInteger,zAsInteger)P2=P1(x,y)+xEndFunctionA)15B)19C)17D)34答案:A解析:[單選題]50.在代碼中定義了一個(gè)子過程：SubP(a,b)…EndSub下面調(diào)用該過程的正確格式為___________。A)CALLP(10,20,30)B)CallP()C)CALLP(10,20)D)CallP(10)答案:C解析:[單選題]51.設(shè)有語句x=InputBox(?AAAA?，?BBBB?，??),程序運(yùn)行后，所產(chǎn)生的對(duì)話框的標(biāo)題應(yīng)為()。A)AAAAB)空C)BBBBD)出錯(cuò)，不能產(chǎn)生對(duì)話框答案:C解析:[單選題]52.假定有如下的Sub過程：SubS(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗體上添加一個(gè)命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()DimaAsSingleDimbAsSinglea=5:b=4Sa,bPrinta,bEndSub程序運(yùn)行時(shí)，單擊命令按鈕得到的結(jié)果()。A)5B)1C)1.25D)1.25答案:D解析:[單選題]53.Check1為復(fù)選框，Command1為命令按鈕框，Text1為文本框，Option1為框，則以下賦值語句錯(cuò)誤的是_____。A)Command1.Caption="Exit"B)Check1.Caption="grayed"C)Option1.Value="grayed"D)Text1.Text="我的文檔"答案:C解析:[單選題]54.當(dāng)輸入4時(shí),以下程序的輸出結(jié)果是().PrivateSubCommand1_Click()x=InputBox(x)Ifx^2<15Theny=1/xIfx^2>15Theny=x^2+1PrintyEndSubA)4B)17C)18D)25答案:B解析:[單選題]55.文本框(Text1)中有選定的文本,執(zhí)行Text1.SelText="Hello"的結(jié)果是___.A)"Hello"將替換掉原來選定的文本B)"Hello"將插入到原來選定的文本之前C)Text1.SelLength為5D)文本框中只有"Hello"答案:A解析:[單選題]56.去掉字符串左邊空格的函數(shù)是()。A)Ltrim$B)Rtrim$C)Left$D)Right$答案:A解析:[單選題]57.數(shù)組聲明語句Dima(0to3,-2to2,0to5)中，數(shù)組a包含元素的個(gè)數(shù)為()。A)120B)75C)60D)13答案:A解析:[單選題]58.文件號(hào)最大可取的值為A)255B)511C)512D)256答案:B解析:[單選題]59.語句Print6*6\6/2的輸出結(jié)果是()。A)3B)12C)0D)1答案:B解析:[單選題]60.為了在按下回車鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過程需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是_____.A)ValueB)CancelC)EnabledD)Default答案:D解析:[單選題]61.在窗體上建立一個(gè)標(biāo)簽數(shù)組,名稱為L(zhǎng)abel1,下標(biāo)從0開始,自左至右順序增大,然后編寫如下事件過程:()PrivateSubForm_Click()ForEachLabelInLabel1Label1(i).Caption=Label1(i).IndexI=i+1NextEndSub運(yùn)行程序,單擊窗體,在4個(gè)標(biāo)簽(從左至右)中顯示的內(nèi)容分別為______。A)0123B)1234C)3210D)出錯(cuò)答案:A解析:[單選題]62.設(shè)a="a",b="b",c="c",d="d",執(zhí)行語句x=IIf((aA)"A"B)"B"C)BD)A答案:D解析:[單選題]63.要清除Picture1中的圖片，可用____語句。A)Picture1.Picture=LoadPicture()B)Picturel.Picture=""C)Picture1.Picture=LoadPicture("")D)ClsPicturel.Picture答案:C解析:[單選題]64.在用通用對(duì)話框控件建立?打開?或?保存?文件對(duì)話框時(shí)，如果需要指定文件列表框所列出的文件類型是文本文件(即.txt文件)，則正確的描述格式是()。A)?textB)?文本文件(C)?text(.txt)||(*.txt)?D)?text(.txt)(*.txt)?答案:A解析:[單選題]65.有一數(shù)組定義語句如下,則數(shù)組中共包含有()個(gè)元素。DimA(99,99)AsIntegerA)99B)9999C)9000D)10000答案:D解析:[單選題]66.要在窗體Form1內(nèi)顯示字符串"MyForm"，可以使用的語句是________。A)Form1.Caption="MyForm"B)Form1.Print"MyForm"C)Form.Caption="MyForm"D)Form.Print"MyForm"答案:B解析:[單選題]67.能改變當(dāng)前磁盤驅(qū)動(dòng)器的是下列的哪個(gè)命令()?A)ChDirB)ChDriveC)CloseD)CurDir$答案:B解析:[單選題]68.執(zhí)行以下程序段后,變量c的值為()a="VisualBasicPrograming":b="Quick"c=b&LCase(Mid(a,7,6))&Right(a,11)A)VisualbasicProgramingB)QuickbasicProgramingC)QUICKbasicProgramingD)QuickBasicPrograming答案:B解析:[單選題]69.要獲得計(jì)算機(jī)當(dāng)前屏幕的分辨率,可以使用()系統(tǒng)對(duì)象A)MouseB)AppC)PrinterD)Screen答案:D解析:[單選題]70.編寫如下事件過程:PrivateSubform_Click()Fori=1To4t=t*10+iS=S+tNextiPrintSEndSub程序運(yùn)行后,單擊窗體,則窗體上顯示的內(nèi)容是().A)1234B)4321C)1370D)4444答案:C解析:[單選題]71.下面4項(xiàng)中合法的字符常數(shù)是().A)ABC$B)"ABC"C)'ABC'D)ABC答案:B解析:[單選題]72.VisualBasic集成環(huán)境的大部分窗口都可以從主菜單項(xiàng)()的下拉菜單中找到相應(yīng)的打開命令.A)編輯B)視圖C)格式D)調(diào)試答案:B解析:[單選題]73.PrintFormat(32548.5,"####,##.##")______.A)#325,48.5#B)325,48.5C)032,548.50D)32,548.5答案:D解析:[單選題]74.骰子是一個(gè)正六面體,分別用1~6代表這六個(gè)面,擲一次骰子出現(xiàn)的數(shù)可表示為().A)int(rnd*6+1)B)int(rnd*6)C)int(rnd*7)D)int(rnd(6)+1)答案:A解析:[單選題]75.使用Dima()AsInteger語句聲明數(shù)組后,能夠正確引用數(shù)組元素的是____。A)a(-1,5)B)a(1)C)a[-1，2]D)a(0,6)答案:A解析:[單選題]76.Print#1,STR1$中的Print是______.A)順序文件的寫語句B)在窗體上顯示的方法C)子程序名D)打印命令答案:A解析:[單選題]77.不能通過()來刪除列表框中的選項(xiàng).A)List屬性B)Removeltem方法C)Clear方法D)Test屬性答案:D解析:[單選題]78.下面屬性用于顯示對(duì)象的標(biāo)題()A)TextB)CaptionC)Name(名稱)D)ForeColor答案:B解析:[單選題]79.當(dāng)組合框的Style屬性設(shè)置為0時(shí),其表現(xiàn)形式是。()A)下拉列表框B)下拉組合框C)簡(jiǎn)單組合框D)文本框答案:B解析:[單選題]80.以下選項(xiàng)中,不屬于標(biāo)簽的屬性是()A)EnabledB)CaptionC)MaxLengthD)WordWrap答案:C解析:[單選題]81.在窗體中添加一個(gè)列表框(ListBox1)和一個(gè)命令按鈕,并編寫如下代碼:PrivateSubCommand1_Click()DimEntry,I,MsgMsg="ChooseOKtoaddl00itemstoyourlistbox."MsgBoxMsgForI=1To100Entry="Entry"&IList1.AddltemEntryNextIEndSub程序完成的功能是().A)本示例使用Addltem方法增加100項(xiàng)給一個(gè)列表框B)本示例使用Addltem方法向一個(gè)列表框中添加的內(nèi)容是1~100的羅列C)本示例使用Addltem方法向一個(gè)列表框中添加的內(nèi)容是1~100的和D)本示例使用Addltem方法增加101項(xiàng)給一個(gè)列表框答案:A解析:[單選題]82.有如下程序:PrivateSubCommand1_Click()a$="AWORKERISOVERTHERE"x=Len(a$)Fori=1ToX-1b$=Mid$(a$,i,2)Ifb$="ER"Thens=s+1NextiPrintsEndSub程序運(yùn)行后的輸出結(jié)果是().A)1B)2