Visual Basic程序設(shè)計(jì)（吉林醫(yī)藥學(xué)院）知道智慧樹(shù)章節(jié)答案

目錄第一章單元測(cè)試第二章單元測(cè)試第三章單元測(cè)試第四章單元測(cè)試第五章單元測(cè)試第六章單元測(cè)試第七章單元測(cè)試第八章單元測(cè)試第九章單元測(cè)試第十章單元測(cè)試第十一章單元測(cè)試第十二章單元測(cè)試第一章單元測(cè)試1【單選題】(10分)正確答案：B以下關(guān)于VB語(yǔ)言的說(shuō)法中，正確的是（）。A.;VB是一種低級(jí)語(yǔ)言B.;VB是一種面向?qū)ο蟮恼Z(yǔ)言C.;VB是一種面向過(guò)程的語(yǔ)言D.;VB是一種機(jī)器語(yǔ)言2【單選題】(10分)正確答案：C在VisualBasic環(huán)境下，當(dāng)寫(xiě)一個(gè)新的VisualBasic程序時(shí)，所做的第一件事是（）。A.;編寫(xiě)代碼B.;打開(kāi)屬性窗口C.;新建一個(gè)工程D.;進(jìn)入VisualBasic環(huán)境3【單選題】(10分)正確答案：C以下可以構(gòu)成語(yǔ)句的是（）。A.;對(duì)象名.函數(shù)名B.;對(duì)象名.事件名C.;對(duì)象名.方法名D.;對(duì)象名.屬性4【單選題】(10分)正確答案：A（）是由VisualBasic提供的一種專門(mén)的子程序，由對(duì)象本身所具有，反映該對(duì)象功能的內(nèi)部函數(shù)或過(guò)程。A.;方法B.;屬性C.;窗體D.;文件5【單選題】(10分)正確答案：D下列不是VisualBasic文件的是（）。A.;*.frm文件B.;*.basC.;*.cls文件D.;*.txt6【單選題】(10分)正確答案：D下列不能打開(kāi)工具箱窗口的操作是()。A.執(zhí)行“視圖”菜單中的“工具箱”命令B.按Alt+V，然后按Alt+X鍵C.單擊工具欄上的“工具箱”按鈕D.按Alt+F8鍵7【單選題】(10分)正確答案：D下列可以打開(kāi)立即窗口的操作是()。A.Ctrl+FB.Ctrl+EC.;Ctrl+DD.Ctrl+G8【單選題】(10分)正確答案：BVisualBasic6.0集成環(huán)境的主窗口中不包括()。A.標(biāo)題欄B.狀態(tài)欄C.工具欄D.菜單欄9【單選題】(10分)正確答案：A在VisualBasic中，不能關(guān)閉的窗口是()。A.工程窗口B.屬性窗口C.立即窗口D.窗體設(shè)計(jì)器窗口10【單選題】(10分)正確答案：BVisualBasic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語(yǔ)言，采取了()的編程機(jī)制。A.按書(shū)寫(xiě)順序執(zhí)行B.事件驅(qū)動(dòng)C.從主程序開(kāi)始執(zhí)行D.從窗體開(kāi)始執(zhí)行第二章單元測(cè)試1【單選題】(10分)正確答案：C下列符號(hào)常量的聲明中，（）是不合法的。A.;Consta=“OK”B.;ConstaAsSingle=1.1C.;ConstaAsInteger=“12”D.;ConstaAsDouble=Sin（1）2【單選題】(10分)正確答案：A表達(dá)式“Turbo”+“c”>“Ture”+“Basic”的值是（）。A.;FalseB.;出錯(cuò)信息C.;NullD.;True3【單選題】(10分)正確答案：B執(zhí)行下列語(yǔ)句后，V的值是（）。"text-indent:37pxA=“56789”V=Val（Mid（A，3，2））A.67B.78C.89D.04【單選題】(10分)正確答案：A表達(dá)式4+56*7/8Mod4的值是（）。A.5B.7C.6D.45【單選題】(10分)正確答案：B下列符號(hào)（）是VisualBasic中合法的變量名。A.;ENDB.;x23C.;8xyD.;X8[B]6【單選題】(10分)正確答案：A在一行內(nèi)寫(xiě)多條語(yǔ)句時(shí)，每個(gè)語(yǔ)句之間用（）來(lái)分隔。A.：B.、C.；D."FONT-SIZE:24px，7【單選題】(10分)正確答案：A在VB中，用Single來(lái)表示的數(shù)據(jù)類型是（）。A.單精度型B.字符型C.長(zhǎng)整型D.邏輯型8【單選題】(10分)正確答案：B下列程序段的運(yùn)行結(jié)果是（）。DimAAsInteger,BAsIntegerA=15B=4Print4+ABA.7.75B.7C.8D.-79【單選題】(10分)正確答案：B三種邏輯運(yùn)算符號(hào)優(yōu)先次序?yàn)?（;;）。A.;NOT、OR、ANDB.NOT、AND、ORC.AND、NOT、ORD.OR、NOT、AND10【單選題】(10分)正確答案：C數(shù)學(xué)式3abc(d+e)改寫(xiě)為VB表達(dá)式為;（;;）。A.;3abc(d+e)B.3a*b*c(d+e)C.3*a*b*c*(d+e)D.3abcd+3abce第三章單元測(cè)試1【單選題】(10分)正確答案：A結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu)不包括（）。A.倒序結(jié)構(gòu)B.選擇結(jié)構(gòu)C.;循環(huán)結(jié)構(gòu)D.順序結(jié)構(gòu)2【單選題】(10分)正確答案：D下面四個(gè)語(yǔ)句中，能打印顯示20*30字樣的是（）。A.;Print20*30B.;PrintChr(20)+“*”+Chr(30)C.;Printval(;“;20;”;)*val(;“;30;”;)D.;Print“20*30”3【單選題】(10分)正確答案：C關(guān)于MsgBox函數(shù)，以下說(shuō)法不正確的是（）。A.;“標(biāo)題”參數(shù)可選，顯示在對(duì)話框標(biāo)題欄中的字符串表達(dá)式B.;“按鈕”參數(shù)是數(shù)值表達(dá)式，是表示指定顯示按鈕的數(shù)目和類型、使用的圖標(biāo)樣式，默認(rèn)按鈕的標(biāo)識(shí)以及消息框樣式的數(shù)值的總和C.;MsgBox函數(shù)的返回值是一個(gè)字符串，這個(gè)字符串與所選擇的命令按鈕有關(guān)D.;“提示”參數(shù)用于在MsgBox函數(shù)產(chǎn)生的對(duì)話框內(nèi)顯示提示信息4【單選題】(10分)正確答案：A語(yǔ)句Ifx=1Theny=1,下列說(shuō)法正確的是()。A.;x=1為關(guān)系表達(dá)式,y=1為賦值語(yǔ)句B.;x=1和y=1均為賦值語(yǔ)句C.;x=1為賦值語(yǔ)句,y=1為關(guān)系表達(dá)式D.;x=1和y=1均為關(guān)系表達(dá)式5【單選題】(10分)正確答案：B下面程序段執(zhí)行結(jié)果為()。x=5:y=-6Ifnotx>0Thenx=y–3Elsey=x+3EndIfPrintx-y;y-xA.-65B.-33C.3-3D.5-96【單選題】(10分)正確答案：C編寫(xiě)如下事件過(guò)程:PrivateSubForm_Click()score=Int(Rnd*10)+80SelectCasescoreCaseIs<60a$="F"Case60To69a$="D"Case70To79a$="C"Case80To89a$="B"CaseElsea$="A"EndSelectPrinta$EndSub程序運(yùn)行后,單擊窗體,則窗體上顯示的內(nèi)容是()。A.AB.DC.BD.C7【單選題】(10分)正確答案：A循環(huán)結(jié)構(gòu)ForI%=-1to–17Step–2共執(zhí)行()次。A.9B.5C.8D.68【單選題】(10分)正確答案：A下列程序段的執(zhí)行結(jié)果為()。a=0:b=1Doa=a+bb=b+1LoopWhilea<10Printa;bA.105B.abC.01D.10309【單選題】(10分)正確答案：C有如下程序,運(yùn)行后輸出的結(jié)果是()。j=0:n=0DoWhilen<3j=(j+1)*(j+2)n=n+1LoopPrintj;nA.01B.33C.1823D.30410【單選題】(10分)正確答案：A;font-size:18px;下列的程序段執(zhí)行后,x的值為()。;font-size:18px;x=0;font-size:18px;Fori=1To10;font-size:18px;Forj=iTo10;font-size:18px;x=x+1;font-size:18px;Nextj;font-size:18px;NextiA.55B.105C.50D.5第四章單元測(cè)試1【單選題】(10分)正確答案：B以下關(guān)于靜態(tài)數(shù)組的描述正確的是（）。A.靜態(tài)數(shù)組的大小是固定的，所有數(shù)組元素的類型必須相同B.靜態(tài)數(shù)組的大小是固定的，可以有不同類型的數(shù)組元素C.靜態(tài)數(shù)組的大小是可變的，但所有數(shù)組元素的類型必須相同D.靜態(tài)數(shù)組的大小是可變的，可以有不同類型的數(shù)組元素2【單選題】(10分)正確答案：B執(zhí)行下面程序段后，輸出的結(jié)果為（）。Dimm(5)AsIntegers=0Fori=0To5m(i)=5NextiForj=0To5s=s+m(j)NextjPrintsA.20B.30C.35D.253【單選題】(10分)正確答案：A下面程序：PrivateSubForm_Click()Dima(100)AsIntegerFori=1To10j=i*ia(j)=jNextiPrinta(25)EndSub運(yùn)行后，單擊窗體，則輸出的結(jié)果是（）。A.25B.36C.49D.814【單選題】(10分)正確答案：B有如下語(yǔ)句：OptionBase1PrivateSubCommand1_Click()DimA(2,-1To1)AsInteger……EndSub?以上語(yǔ)句所定義的數(shù)組A為（）維數(shù)組，共有（）個(gè)元素，第一維下標(biāo)從（）到（），第二維下標(biāo)從（）到（）。A.6,2,1,2,-1,1B.2,6,1,2,-1,1C.1,2,6,2,-1,1D.2,1,6,-1,1,25【單選題】(10分)正確答案：D有如下程序：Constn=-5Constm=6Dima(nTom)AsIntegerFori=LBound(a,1)ToUBound(a,1)a(i)=iNextiPrinta(LBound(a,1));a(UBound(a,1))運(yùn)行后輸出的結(jié)果為（）。A.06B.;00C.;-50D.;-566【單選題】(10分)正確答案：C下面關(guān)于控件數(shù)組與一般控件的敘述中正確的是（）。A.控件數(shù)組的索引屬性值Index值為0，而一般控件的Index值為空B.控件數(shù)組的Index值為1，而一般控件的Index值為0C.控件數(shù)組一定有1個(gè)以上同類型的控件組成，而一般控件只有一個(gè)控件D.控件數(shù)組的建立通過(guò)Dim語(yǔ)句聲明，而一般控件不需要聲明7【單選題】(10分)正確答案：B如果要對(duì)已經(jīng)聲明的數(shù)組重新定義大小，并保留原有數(shù)據(jù)，可以使用語(yǔ)句（）。A.DimB.ReDimPreserveC.ReDimD.DimPreserve8【單選題】(10分)正確答案：D下列程序的輸出結(jié)果為（）。"MARGIN:0px0px0px14pxPrivateSubCommand1_Click()"TEXT-INDENT:37px;MARGIN:0px0px0px14pxDima"TEXT-INDENT:37px;MARGIN:0px0px0px14pxReDima(6)"TEXT-INDENT:37px;MARGIN:0px0px0px14pxForj=1To5"TEXT-INDENT:75px;MARGIN:0px0px0px14pxa(j)=j*j"TEXT-INDENT:37px;MARGIN:0px0px0px14pxNextj"TEXT-INDENT:37px;MARGIN:0px0px0px14pxPrinta(a(2)*a(3)-a(4)*2)+a(5)"margin:0px0px0px14px;EndSubA.36B.25C.16D.419【單選題】(10分)正確答案：A執(zhí)行下面程序段后，輸出的結(jié)果為（）。Dima(10,10)AsIntegerFori=2To4Forj=4To5a(i,j)=i*jNextjNextiPrinta(2,5)+a(3,4)+a(4,5)A.42B.52C.22D.3210【單選題】(10分)正確答案：C要分配存放如下方陣的數(shù)據(jù)，正確的且最節(jié)約存儲(chǔ)空間的數(shù)組聲明語(yǔ)句是（）。"MARGIN:0px0px0px28px1.12.23.3"MARGIN:0px0px0px28px4.45.56.6"MARGIN:0px0px0px28px7.78.89.9A.Dima(-3to1,-5to7)AsIntegerB.Dima(3,3)AsSingleC.Dima(-1To1,-5To-3)AsSingleD.Dima(9)AsSingle第五章單元測(cè)試1【單選題】(10分)正確答案：C假定有如下的Sub過(guò)程：Subfun(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimaAsSingleDimbAsSinglea=6b=4funa,bPrinta,bEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果為（）。A.11B.1.254C.1.52D.542【單選題】(10分)正確答案：D假定有以下函數(shù)過(guò)程：FunctionFun(sAsString)AsStringDims1AsStringFori=1ToLen(s)s1=UCase(Mid(s,i,1))+s1NextiFun=s1EndFunction在窗體上添加一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimStr1AsStringDimStr2AsStringStr1=InputBox("請(qǐng)輸入一個(gè)字符串")Str2=Fun(Str1)PrintStr2EndSub程序運(yùn)行后，單擊命令按鈕，如果在輸入對(duì)話框中輸入字符串“abcdefg”，則單擊“確定”按鈕后再窗體上輸出的結(jié)果為（）。A.gfedcbaB.ABCDEFGC.AbcdefgD.GFEDCBA3【單選題】(10分)正確答案：C有如下函數(shù)過(guò)程：Functionsecproc(xAsInteger,yAsInteger,zAsInteger)secproc=3*y+z+2*xEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4Printsecproc(c,b,a)EndSub該程序的運(yùn)行結(jié)果是（）。A.20B.17C.19D.184【單選題】(10分)正確答案：C有如下函數(shù)過(guò)程：FunctionCys(ByValxAsInteger,ByValyAsInteger)AsIntegerDimquotientsDoWhiley<>0quotients=x/yx=yy=quotientsLoopCys=xEndFunction以下是調(diào)用該函數(shù)的事件過(guò)程，該程序的運(yùn)行結(jié)果是（）。PrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegera=10b=2x=Cys(a,b)PrintxEndSubA.100B.0C.5D.255【單選題】(10分)正確答案：A以下是一個(gè)能返回?cái)?shù)組a中最大數(shù)的函數(shù)過(guò)程代碼：Functionmaxval(a()AsInteger)AsInteger;text-indent:37pxDimmax%;text-indent:37pxmax=1;text-indent:37pxFori=2To10;text-indent:75pxIfa(i)>a(max)Thenmax=i;text-indent:37pxNextimaxval=maxEndFunctionPrivateSubCommand1_Click()Dimx(1To10)AsIntegerFori=1To10x(i)=Int(Rnd()*100)Printx(i);NextiPrintPrintmaxval(x())EndSub程序運(yùn)行時(shí)，發(fā)現(xiàn)函數(shù)過(guò)程的返回值是錯(cuò)的需要修改，下面的修改方案中正確的是（）。A.語(yǔ)句“maxval=max”應(yīng)改為“maxval=a(max)”B.If語(yǔ)句“max=i”應(yīng)改為“max=a(i)”C.語(yǔ)句“max=1”應(yīng)改為“max=a(1)”D.語(yǔ)句“Fori=2To10”應(yīng)改為“Fori=1To10”6【單選題】(10分)正確答案：C在窗體上畫(huà)一個(gè)命令按鈕(名稱為Command1)，并編寫(xiě)如下代碼：FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a-bb=t+aFun1=t+bEndFunctionPrivateSubCommand1_Click()DimxAsIntegerx=10PrintFun1(Fun1(x,(Fun1(x,x-1))),x-1)EndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是()。A.11B.21C.0D.107【單選題】(10分)正確答案：A下面程序的運(yùn)行結(jié)果為（）。Dima%,b%,c%Subp1(x%,y%)DimcAsIntegerx=2*x:y=y+2:c=x+yEndSubSubp2(x%,ByValy%)DimcAsIntegerx=2*x:y=y+2:c=x+yEndSubPrivateSubCommand1_Click()a=2:b=4:c=6Callp1(a,b)Callp2(a,b)Printa;b;cEndSubA.866B.466C.4610D.8868【單選題】(10分)正確答案：A下面程序：Functiona(x)StaticbAsIntegerb=b+x^2PrintbEndFunctionPrivateSubCommand1_Click()Dimc%c=a(2)EndSub單擊兩次命令按鈕，第二次顯示的結(jié)果是（）。A.8B.4C.6D.29【單選題】(10分)正確答案：D下列敘述中正確的是（）。A.局部變量的作用域可以超出所定義的過(guò)程B.在調(diào)用過(guò)程時(shí)，所有局部變量被系統(tǒng)初始化為0或空字符串C.在窗體的Form_Load事件中定義的變量是全局變量D.在某個(gè)Sub過(guò)程中定義的局部變量可以與其他事件過(guò)程中定義的局部變量同名，但其作用域只限于該過(guò)程10【單選題】(10分)正確答案：D;若已編寫(xiě)了一個(gè);Sort子過(guò)程，在該工程中有多個(gè)窗體，為了方便地調(diào)用Sort子過(guò)程，應(yīng)將該過(guò)程放在（）中。A.工程B.窗體模塊C.類模塊D.標(biāo)準(zhǔn)模塊第六章單元測(cè)試1【單選題】(10分)正確答案：D若要求顯示一個(gè)指定窗體,所用的方法是()。A.OpenB.LoadC.HideD.Show2【單選題】(10分)正確答案：C確定一個(gè)窗體或控件大小的屬性是()。A.Top和LeftB.Top和RightC.Width和HeightD.Width和Top3【單選題】(10分)正確答案：A當(dāng)一個(gè)工程含有多個(gè)窗體時(shí),其中的啟動(dòng)窗體是()。A.在“;工程屬性”對(duì)話框中指定的窗體B.第一個(gè)添加的窗體C.最后一個(gè)添加的窗體D.啟動(dòng)VisualBasic時(shí)建立的窗體4【單選題】(10分)正確答案：B每建立一個(gè)窗體,工程管理器窗口中就會(huì)增加一個(gè)()。A.工程文件B.窗體文件C.類模塊文件D.程序模塊文件5【單選題】(10分)正確答案：A當(dāng)運(yùn)行程序時(shí),系統(tǒng)自動(dòng)執(zhí)行啟動(dòng)窗體的()事件過(guò)程。A.LoadB.GotFocusC.UnLoadD.Click6【單選題】(10分)正確答案：B若要改變窗體中顯示文本的顏色,應(yīng)該使用的屬性是()。A.FontB.ForeColorC.BackColorD.Caption7【單選題】(10分)正確答案：A在設(shè)計(jì)階段,當(dāng)雙擊窗體上的某個(gè)控件時(shí),所打開(kāi)的窗口是()。A.代碼窗口B.屬性窗口C.工具箱窗口D.工程資源管理器窗口8【單選題】(10分)正確答案：D如果要改變窗體的標(biāo)題,需要設(shè)置窗體對(duì)象的哪一屬性()。A.BorderStyleB.NameC.;BackColorD.Caption9【單選題】(10分)正確答案：DCls方法可清除窗體或圖片框中的信息是()。A.在設(shè)計(jì)時(shí)放置的控件B.其余選項(xiàng)都對(duì)C.Picture屬性設(shè)置的背景圖案D.程序設(shè)計(jì)時(shí)產(chǎn)生的圖形和文字10【單選題】(10分)正確答案：C窗體的Enable屬性的屬性值是()類型的數(shù)據(jù)。A.實(shí)型B.整型C.邏輯型D.字符型第七章單元測(cè)試1【單選題】(10分)正確答案：A一般不用來(lái)觸發(fā)事件的對(duì)象是()。A.標(biāo)簽B.文本框C.命令按鈕D.窗體2【單選題】(10分)正確答案：A如果將文本框的Locked屬性設(shè)置為T(mén)rue,則以下說(shuō)法()是正確的。A.運(yùn)行時(shí)用戶不可以在界面上修改文本框中的內(nèi)容B.在程序代碼中不可以修改文本框的內(nèi)容,如：不可以使用語(yǔ)句Text1.Text="aa"C.其余選項(xiàng)都錯(cuò)D.此時(shí)在屬性窗口不可以修改文本框的Text屬性值3【單選題】(10分)正確答案：C單擊命令按鈕Commandl必將調(diào)用的事件()。A.LostFocusB.DbclickC.ClickD.KeyPress4【單選題】(10分)正確答案：B能夠改變復(fù)選框中背景顏色的屬性是()。A.ValueB.BackColorC.FontD.FontColor5【單選題】(10分)正確答案：A以下不屬于同類的是()。A.ClickB.TopC.CaptionD.Name6【單選題】(10分)正確答案：D列表框中列表項(xiàng)的數(shù)目可通過(guò)()屬性的值獲得。A.IndexB.SelCountC.CountD.ListCount7【單選題】(10分)正確答案：C組合框控件是將()組合成一個(gè)控件。A.標(biāo)簽控件和文本框控件B.復(fù)選框控件和選項(xiàng)按鈕控件C.列表框控件和文本框控件D.標(biāo)簽控件和列表框控件8【單選題】(10分)正確答案：B要在圖片框P1中打印字符串"HowAreYou",應(yīng)使用語(yǔ)句()。A.Picture1.Print="HowAreYou"B.P1.Print"HowAreYou"C.P1.Picture=LoadPicture("HowAreYou")D.Print"HowAreYou"9【單選題】(10分)正確答案：B在窗體上畫(huà)一個(gè)名稱為T(mén)imer1的計(jì)時(shí)器控件,要求每隔0.1秒發(fā)生一次計(jì)時(shí)器事件,則以下正確的屬性設(shè)置語(yǔ)句是;()。A.Timer1.Interval=0.1B.Timer1.Interval=100C.Timer1.Enabled=0.1D.Timer1.Enabled=10010【單選題】(10分)正確答案：C以下控件中不屬于容器的是()。A.;PictureBoxB.FormC.ImageD.Frame第八章單元測(cè)試1【單選題】(10分)正確答案：C剛建立一個(gè)新的標(biāo)準(zhǔn)EXE工程后,不在工具箱中出現(xiàn)的控件是（）。A.;圖片框B.;單選按鈕C.;通用對(duì)話框D.;文本框2【單選題】(10分)正確答案：A將通用對(duì)話框類型,設(shè)置為字體對(duì)話框,可修改該控件的（）屬性。A.;actionB.;filenameC.;fontD.;filter3【單選題】(10分)正確答案：B下列屬性屬于顏色對(duì)話框的是（）。A.;FileNameB.;ColorC.;FontSizeD.;Min4【單選題】(10分)正確答案：A在窗體上建立通用對(duì)話框必須先將（）添加到工具箱中。A.;CommonDialog控件B.;Form控件C.;VBComboBox控件D.;Data控件5【單選題】(10分)正確答案：A將通用對(duì)話框CommandDialog1的類型設(shè)置成另存為對(duì)話框,可調(diào)用該控件的（）方法。A.;ShowSaveB.;ShowFontC.;ShowOpenD.;ShowColor6【單選題】(10分)正確答案：C下列事件過(guò)程可以將打開(kāi)對(duì)話框的標(biāo)題改為"刑事案件卷宗"的是（）。A.PrivateSubCommand1_Click();CommonDialogl.DialogTitle="刑事案件卷宗"CommonDialogl.ShowEndsubB.PrivateSubCommand1_Click();CommonDialogl.DialogTitle="刑事案件卷宗"CommonDialogl.ShowColorEndsubC.PrivateSubCommand1_Click();CommonDialogl.DialogTitle="刑事案件卷宗"CommonDialogl.ShowOpenEndsubD.PrivateSubCommand1_Click();CommonDialogl.Filter="刑事案件卷宗"CommonDialogl.ShowSaveEndsub7【單選題】(10分)正確答案：D窗體上有一公共對(duì)話框Commondialog1,和一個(gè)命令按鈕Command1,當(dāng)單擊按鈕時(shí)程序的功能是（）。PrivateSubCommand1_Click();Commondialog1.ShowColorEndSubA.打開(kāi)保存對(duì)話框B.打開(kāi)文件對(duì)話框C.打開(kāi)字體對(duì)話框D.打開(kāi)顏色對(duì)話框8【單選題】(10分)正確答案：B在窗體上建立一個(gè)通用對(duì)話框，名稱為CommonDialog1，用下面的語(yǔ)句可以建立一個(gè)對(duì)話框，CommonDialog1.Action=2與該語(yǔ)句等價(jià)的語(yǔ)句是（）：A.CommonDialog1.ShowOpenB.CommonDialog1.ShowSaveC.CommonDialog1.ShowColorD.CommonDialog1.ShowFont9【單選題】(10分)正確答案：D在窗體上畫(huà)一個(gè)通用對(duì)話框，其名稱為CommonDialog1，然后添加一個(gè)命令按鈕，并編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()CommonDialog1.Filter=“allfiles(*.*)|*.*|textfiles|*.txt|batfiles(*.bat)|*.bat”CommonDialog1.filterIndex=2CommonDialog1.ShowOpenMsgBoxCommonDialog1.FileNameEndSub程序運(yùn)行后，單擊命令按鈕，將顯示一個(gè)“打開(kāi)”對(duì)話框，此時(shí)在“文件類型”框中顯示的是（）：A.AllFiles(*.*)B.不確定C.BathFiles(*.bat)D.TextFiles(*.txt)10【單選題】(10分)正確答案：D以下敘述中錯(cuò)誤的是（）。A.在程序運(yùn)行時(shí)，通用對(duì)話框控件是不可見(jiàn)的B.調(diào)用通用對(duì)話框控件的ShowColor方法，可以打開(kāi)顏色對(duì)話框C.在同一個(gè)程序中，用不同的方法，如ShowOpen或ShowSave()等打開(kāi)的通用對(duì)話框具有不同的作用D.調(diào)用通用對(duì)話框控件的ShowOpen方法，可以直接打開(kāi)在該通用對(duì)話框中指定的文件第九章單元測(cè)試1【單選題】(10分)正確答案：A下列選項(xiàng)中不正確的是()。A.;菜單項(xiàng)的屬性可以在屬性窗口中設(shè)計(jì)B.;菜單編輯器中,標(biāo)題可不輸入,而名稱必須輸入C.;每個(gè)菜單項(xiàng)都是一個(gè)對(duì)象,所以也有屬性和事件D.;每個(gè)菜單項(xiàng)都只有一個(gè)Click事件2【單選題】(10分)正確答案：D在用菜單編輯器設(shè)計(jì)菜單時(shí),必須輸入的項(xiàng)是()。A.標(biāo)題B.快捷鍵C.索引D.名稱3【單選題】(10分)正確答案：C假定有一個(gè)菜單項(xiàng),名稱為MenuItem,為了運(yùn)行時(shí)使該菜單項(xiàng)失效(變灰),應(yīng)使用的語(yǔ)句為()。A.;MenuItem.Enabled=TrueB.;MenuItem.Visible=TrueC.;MenuItem.Enabled=FalseD.;MenuItem.Visible=False4【單選題】(10分)正確答案：D一個(gè)菜單項(xiàng)是不是一個(gè)分隔條,由()屬性決定。A.;Name(名稱)B.;EnabledC.;VisibleD.;Caption5【單選題】(10分)正確答案：C要使用菜單項(xiàng)MentOne在程序運(yùn)行時(shí)失效,使用的語(yǔ)句是()。A.;MentOne.Visble=FalseB.;MentOne.Visble=TrueC.;MentOne.Enabled=FalseD.;MentOne.Enabled=True6【單選題】(10分)正確答案：A菜單控件僅支持下面哪一事件（）。A.ClickB.MouseDownC.KeyPressD.Load7【單選題】(10分)正確答案：A用鍵盤(pán)的光標(biāo)鍵選中某一菜單項(xiàng),并按回車將觸發(fā)菜單的（）的事件。A.ClickB.KeyUpC.KeyPressD.KeyDown8【單選題】(10分)正確答案：C設(shè)菜單中有一個(gè)菜單項(xiàng)為"Open".若要為該菜單命令設(shè)置訪問(wèn)鍵,即按下ALT及字母O時(shí),能夠執(zhí)行Open命令,則在菜單編輯器中設(shè)置"Open"命令的方式是（）。A.把Caption屬性設(shè)置為O&penB.把Name屬性設(shè)置為O&penC.把Caption屬性設(shè)置為&OpenD.把Name屬性設(shè)置為&Open9【單選題】(10分)正確答案：A下列不能打開(kāi)菜單編輯器的操作是（）。A.按Shift+Alt+M鍵B.執(zhí)行“工具”菜單中的“菜單編輯器”命令C.單擊工具欄中的“菜單編輯器”按鈕D.按Ctrl+E健10【單選題】(10分)正確答案：A建立彈出式菜單使用的命令是（）。A.PopupMenuB.CreateMenuC.PopupItemD.BuildMenu第十章單元測(cè)試1【單選題】(10分)正確答案：B使用Circle(1000,1000),650語(yǔ)句在窗體上繪制一個(gè)圓，則圓的線條顏色由窗體的()屬性決定。A.;DrawWidthB.;ForeColorC.;BackColorD.;Caption2【單選題】(10分)正確答案：D執(zhí)行指令"Line(1200,1200)-Step(1000,500),,B"后,CurrentX=()。A.1700B.1000C.1200D.22003【單選題】(10分)正確答案：B運(yùn)行以下程序后,輸出的圖形是()。Forr=0To150"Circle(320,240),r"Fori=1Tol000"NextiNextrA.;一個(gè)半徑逐漸變小的空心圓B.;一個(gè)固定的實(shí)心圓C.;一個(gè)半徑逐漸變大的空心圓D.;一個(gè)固定的空心圓4【單選題】(10分)正確答案：A下面程序運(yùn)行的輸出是()。PrivateSubCommand1_Click()"Cls"Line(60,60)-(70,70),5,B"Line(50,50)-(80,80),1,B"Line(40,40)-(90,90),2,B"Line(30,30)-(100,100),3,BLine(20,20)-(110,110),4,BEndSubA.;同心的彩色正方形B.;相交的彩色正方形C.;同心的彩色圓D.;相交的彩色圓5【單選題】(10分)正確答案：B以下的屬性和方法中,可重定義坐標(biāo)系的是()。A.;DmwWidth屬性B.;Scale方法C.;ScaleMode屬性D.;Drawstyle屬性6【單選題】(10分)正確答案：BLine(100,100)-Step(400,400)將在窗體()畫(huà)一直線。A.(100,100)到(400,400)B.(100,100)到(500,500)C.(100,100)到(300,300)D.(200,200)到(400,400)7【單選題】(10分)正確答案：Bvb中的坐標(biāo)圓點(diǎn)位于（）。A.容器右上角B.容器左上角C.容器正中央D.容器右下角8【單選題】(10分)正確答案：C可用來(lái)改變坐標(biāo)度量單位的是（）。A.Scale方法B.DrawWidth屬性C.ScaleMode屬性D.Drawstyle屬性9【單選題】(10分)正確答案：D在VB的圖形方法中,要繪制矩形,需要使用（）。A.Circle方法B.Point方法C.Pset方法D.Line方法10【單選題】(10分)正確答案：D如果在圖片框上使用繪圖方法繪制一個(gè)實(shí)心圓,則圖片框的（）屬性決定了該圓填充的顏色。A.DrawStyleB.ForeColorC.BackColorD.FillColor第十一章單元測(cè)試1【單選題】(10分)正確答案：D當(dāng)用戶按鍵時(shí)，KeyPress、KeyDown、KeyUp事件的執(zhí)行順序?yàn)?)。A.;D．KeyDown事件、KeyUp事件與KeyPress事件B.;KeyPress事件、KeyDown事件、KeyUp事件C.KeyDown事件、KeyUp事件、KeyPress事件D.;KeyDown事件、KeyPress事件、KeyUp事件2【單選題】(10分)正確答案：C文本框Textl的KeyDown事件過(guò)程中參數(shù)KeyCode值表示()。A.;是否按下了Alt鍵或Ctrl鍵B.;按下的是哪個(gè)數(shù)字鍵C.;所按的鍵盤(pán)鍵的鍵碼D.;按下的是哪個(gè)鼠標(biāo)鍵3【單選題】(10分)正確答案：C編寫(xiě)如下兩個(gè)事件過(guò)程：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_KeyPress(KeyAsciiAsInteger)PrintChr(KeyAscii)EndSub一般情況下(即不按住Shift和鎖定大寫(xiě))運(yùn)行程序，如按“A”鍵則輸出()。A.;A;AB.;a;aC.;A;aD.;a;A4【單選題】(10分)正確答案：C在窗體上畫(huà)一個(gè)命令按鈕和一個(gè)文本框，并把窗體的KeyPreview設(shè)置為T(mén)rue（在激活對(duì)象上的控件鍵盤(pán)事件之前，優(yōu)先激活鍵盤(pán)事件,即Form優(yōu)先）然后編寫(xiě)如下代碼：DimSaveAllAsStringPrivateSubCommand1_Click()Text1.Text=Ucase(SaveAll)EndSubPrivateSubForm_KeyPress(KeyAsciiAsInteger)SaveAll=SaveAll+Chr(KeyAscii)EndSub程序運(yùn)行后，在鍵盤(pán)上輸入“abcdefg”,單擊命令按鈕，則文本框顯示為()。A.;abcdefgB.;出錯(cuò)C.;ABCDEFGD.;不顯示任何信息5【單選題】(10分)正確答案：A在上題中，如果把窗體的KeyPreview