“第1題VisualBasic版本有3個版本，按功能從強到弱的順序是()rA、工程版、專業版、學習版rB、專業版、工程版、學習版6C、公司版、專業版、學習版rD、專業版、公司版、學習版17第2題以下敘述中，錯誤的是()rA、一個VisualBasic應用程序可以具有多個標準模塊文獻「B、一個visualBasic工程可以具有多個窗體文獻③C、標準模塊文獻可以屬于某個指定的窗體文獻「D、標準模塊文獻的擴展名是.bas底第3題以下敘述中錯誤的是()rA、一個工程可以涉及多種類型的文獻「B、VisualBasic應用程序既能以編譯方式執行，也能以解釋方式執行6C、程序運營后，在內存中只能駐留一個窗體「D、對于事件驅動型應用程序，每次運營時的執行順序可以不同樣底第1題VisualBasic的窗體設計器重要是用來()°A、建立用戶界面「B、添加圖形、圖像、數據等控件C、編寫程序源代碼D、Consta="OK"“第36題下列0是字符型常量④A、*1amastudent*rB、‘江蘇南京’rC、#02/25/2023#rI)、123“第37題下列()是日期型常量[A、*1amastudent*rB、‘江蘇南京’GC、#02/25/2023#rD、123“第38題下列()是雙精度型變量rA、AAA%rB>BBB$rC、CCC!°D、DDD#B第39題可以同時刪除字符串前導和尾部空白的函數是()「-A、Ltrim「B、RtrimC、TrimD、Mid“第40題設有如下變量聲明：DimXAsInteger,假如Sgn(X)的值為一1,則X的值是()rA、整數rB、大于0的整數「C、等于0的整數6D、小于0的整數“第41題從鍵盤上輸人兩個字符串，分別保存在變量strl,str2中。擬定第二個字符串在第一個字符串中起始位置的函數是0rAxLeftrB、Mid「C、String°Instr廠第42題設有語句乂4叩11仕。*("輸入數值"JO","示例")，程序運營后，假如從鍵盤上輸入數值】0并按回下鍵，則下列敘述中對的的是()「A、在inpulboxc對話框標題欄中顯示的是“示例”rB、變量X的值是數值10°C、變量X的值是字符串"10"rD、0是默認值R第43題設x=7.9,則執行x=iif(x<>「A、3.45B、3C、2.3"D、2“第44題在下列程序中：privatesubcommand1_c1ick()b=l:a=2printa=iif(a>b,a,b)endsub「A、0rB、1°C、true「D、false廠第45題用情況選擇語句selectcasex,選擇Ix|>5的情況的語句是case()「A、not(-5to5)「R、5to-56C、is<-5,is>5「D、abs(x)>5=第46題單擊窗體后程序的輸出結果是()privatesubform_click()a=l:b=2:c=3ifa<>3orb<>3thena=b-a:b=c-a:c=b+aendifprinta+b+cendsubrA、16「B、3°C、617第47題在窗體上添加?個名稱為TEXT1的文本框，然后編寫以下代碼：privatesubformactivate()a=int(rnd)+7ifa>6thenx=lelseifa>7thenx=2elseifa>8thenx=3elseifa>9thenx=4endiftextl.text=xendsub6A、1「R、2「C、3「D、417第48題下列For—Next循環的循環體的執行次數為()。For1=1to]11=1+1NextI「A、5rB.116C、6rD、有語法錯誤廠第49題下列程序的輸出結果是()。P=0For1=1to4p=p*INextIPrintprA、24「B、46C、0rD、10廠第50題下列程序段的輸出為()。S=0For1=1lo101=1+1:s=s+INextIPrintsA、551B、666C、30rD、60“第51題以下程序段的輸出結果是（）。Whilen<=100n=n+l:s=s+nwendPrintsrA、4949rB、5050rC、49506D、5151底第52題以下程序段的輸出結果是（）。X=l:y=4dountily>4x=x*y：y=y+lloopPrintxrA、16B、4「C、8rD、2017第53題以下程序段的輸出結果是（）。N=4：k=l：1=0For1=1tonk=k*INextIPrintI「A、2rB、3“第54題以下程序段的輸出結果是（）。N=4：k=l：1=0For1=1tonk=k*INextIPrintkrA、21rB、22rC、23GD、2417第55題以下程序段的輸出結果是（）。Num=0Whilenum<=2num=num+lPrintnum;WendTOC\o"1-5"\h\z6A、123rB.111rC、321rD、213廠第56題假定有以下程序段For1=1to3Forj=5to1step-IPrintI*jNextj,1則語句Printl*j的執行次數是（）。°A、15rB、16rC、17rD、18=第57題假定有以下循環結構，則對的的描述是（）。DoWhile條件循環體LoopA、假如“條件”是一個為1的常數，則一次循環體也不執行“B、假如“條件”是一個為1的常數，則無限次執行循環體rC、假如“條件”是一個不為1的常數，則至少執行一次循環體rD、不管“條件”是否為“真”，至少要執行一次循環體17第58題下面程序運營時內層循環的循環總次數是（）。Form=lto3Forn=0TOm-1NextnNextm*A、6「B、5「C、3rD、4底第59題以卜程序段的輸出結果是（）。N=1:s=0dos=s+n:n=n+lloopwhilen<=100PrintsrA、49496B、5050rC、4950rD>504917第60題以下程序段的輸出結果是（）。N=l:s=0dountiln>=100s=s+n:n=n+lloopPrintsrA、4949rB、5050D、5049“第“第61題以下程序段的輸出結果是（“第61“第61題以下程序段的輸出結果是（Forx=5to2.5step-7Next)<.A=0Forj=lTO15a=a+(jMOD)oSum=0Forj=lto10ifj=10thenxPrintx1A、2.2)<.A=0Forj=lTO15a=a+(jMOD)oSum=0Forj=lto10ifj=10thenrB、2.5rC、2.96D、-2“第62題以下程序段的輸出結果是(3)NextjPrintarA、0*B、15rC、90rD、120底第63題以下程序段的輸出結果是(sum=sum+jendifNextjPrintsum*A、10B、55rC.100rD、0防第64題以下程序段的輸出結果是（）。X=0:n=0DoWhilex<50x=(x+2)*(x+3)n=n+lLoopPrintnA、1"B、2「C、3「D、417第65題Do循環語句是根據條件決定循環的語句的，下列說法對的的是（）。6A、While是當條件為真時執行循環，而Until是在條件變為真的之前反復rB、Until是當條件為真時執行循環，而While是在條件變為真的之前反復「C、Nhile和Until都是當條件為真時執行循環「I）、While和Until都是在條件變為真的之前反復循環17第66題執行下面的程序段后，I的值為（）。X=5For1=1To10Step2x=x+（I\3）NextI「A、9rB.10rC、116D、12廠第67題執行下面的程序段后，a的值為（）0For1=1To3Forj=lToIFork=jTo3a=a+lNextk,j,I「A、3rIk9“第68題要將菜單項的某字母設立為熱鍵，在菜單設計中，應在菜單項的標題的該字母前加（）字符。A、/B、@C、&1D、\17第69題打開通用對話框的“打開”對話框的方法是（）。A、ShowOpen「B、ShowSaveAsC、ShowColorD、ShowFont廠第70題下列數組聲明語句中對的的是（）。A、Dima[2;3]AsIntegerB、Dima[2,3]AsIntegerC、Dima(2:3)AsIntegerD、Dima(2,3)A、Dima[2;3]AsIntegerB、Dima[2,3]AsIntegerC、Dima(2:3)AsIntegerD、Dima(2,3)AsIntegerA、命令按鈕的索引值（Index）相同B、在代碼中訪問任意一個命令按鈕只需使用名稱CommandlD、設計窗體的布局“第5題VisualBasic是一種結構化高級程序設計語言，它采用的是0驅動方式rA、鍵盤「B、鼠標GC、事件rD、函數“第6題VisualBasic程序設計語言屬于()rA、而向過程的語言rB、機器語言6C、面向對象的語言rD、匯編語言17第7題VisualBasic一共有設計、運營和中斷三種模式，要使用調試工具應當()rA、進入設計模式rB、進入運營模式6C、進入中斷模式rD、不用進入任何模式“第8題假定一個VisualBasic應用程序山一個窗體模塊和一個標準模塊構成。為了保存該應用程序，以下對的的操作是()A、只保存窗體模塊文獻C、命令按鈕分享相同的事件過程'D、命令按鈕的Caption屬性值一定為Commandl17第72題下列程序運營時單擊Ccmmandl,輸出的結果是()。PrivateSubCommand1Click()Dima(10)Fork=1To10a(k)=11-kNextPrinta(3+a(6))EndSub「A、5rB、4C、3「D、2=第73題在使用動態數組時,假如改變數組的大小而又不丟失數組中的數據,應使用品有關鍵字（）的ReDim語句。A、Private*B、PreserverC、Public「D、Static底第74題控件數組中的名字是由下列哪個屬性決定的（）？「Text°BxIndexrC、名稱D、TabIndex17第75題下列程序運營時單擊Commands輸出的結果是()。PrivateSubCommand!Click()Dima(5,5)Fori=1To3Forj=1To4a(i,j)=j-iNextNextForm=1To2Forn=1To2Printa(n,m);NextNextEndSubrK.01-106B、0TI0rC.0-1-10rD>0110“第76題下列程序段的功能是將以2為苜的前100個素數存入數組中。請在_處選擇對的答案，將程序補充完整()。Dima(100)AsIntegerPrivateSubForm_Load()a(l)=2:x=3:i=2DoWhi1ei<=100flag=0Fork=2ToTnt(Sqr(x))IfxModk=0Thenflag=1NextIfflag=0ThenEndIfx=x+1LoopEndSub6A、A.a(i)=x:i=i+1rB、a(i)=k:i=i+1「C、a(i)=xrD、a⑴=k廠第77題下列程序運營的結果為()。OptionBase1DimS()AsIntegerPrivateSubForm_Click()ReDimS(l):S(1)=5RcDimPreserveS(4)S(2)=3:PrintS(l);RcDimS(6):PrintS(2)EndSub「A、53C、03"D、5017第78題下列事件過程的功能是：對已知存放在數組A中的N個數，用選擇排序法按遞增順序排序后放向數組A中，請填空將程序補充完整。PrivateSubCommand1Click()DimiAsInteger,jAsInteger,kAsIntegerFori=1Ton-1k=iForj=TonIfa(k)>a(j)ThenNextjIfk<>iThentemp=a(k):a(k)=a(i):a(i)=tempEndIfNextiEnclSub6A、i+l;k=jrB、i;k=j「C、k;a(k)=a(j)rD、i-l;k=j-l廠第79題VB允許多維數組的最大維數是()。rA、50rB、606C、80rD、90廠第80題用卜面的語句所定義的數組元素的個數是().DimVar(4To6,-3To3)rA、24rB、36“第81題下面關于VB語言中數組下標的幾種說法，錯誤的是()。6A、數組下標的下界默認為1「B、數組下標的下界可認為負數rC、數組下標的下界必須小于上界,1)、數組下標的上界可認為負數廠第82題下列程序段的執行結果為()。PrivateSubCommandl_Click()DimA(10),B(5)For1=1to10A(1)=1NextIForJ=1to5B(J)=J*20NextJA(5)=B(2)Print"A(5)=";A(5)EndSubrA、A(5)=5rB、A(5)=10rC、A(5)=206D、A(5)=40廠第83題運營下列程序會出現犯錯信息，產生錯誤的因素是()。x=5Dima(x)Fori=lTo6a(i)=i+lNextirA、數組元素a(i)的下標越界rB、變量x沒有定義rC、循環變量的范圍越界6D、Dim語句中不能用變量x來定義數組的下標17第84題下列程序段的執行結果是()<,Dima(-5to6)Fori=Lbound(a,1)ToUbound(a,1)a(i)=iNextiPrinta(Lbound(a,D);a(Ubound(a,D)A、00B、-50C、-56D、06“第85題如下數組聲明語句中對的的是（）。A、DimA(45)AsIntegerB、DimA(n,n)AsIntegerC、DimA(4,5)AsIntegerD、DimA[4,5]AsInteger批注批注Wrong批注Wrong底第86題語句OptionBasel:Dima（3,4）批注Wrong「A、7B、121C、156D、2017第87題用下面語句定義的數組元素個數是（）。DimA（-3To5）AsInteger「A、6B、7C、8第88題語句Dimarr(-3To5,2To6)AsInteger定義的數組元素有()。1A、45rB、44rC、11rD、5417第89題在窗體上面畫一個命令按鈕，然后編寫如下事件過程：()OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=lFori=4To1Step-Is=s+a(i)*jj=j*10NextiPrintsEndSubrA、4321rB、12rC、346D、1234廠第90題在窗體上畫一個名稱為Textl的文本框和一個名稱為Command1的命令按鈕，然后編寫如卜事件過程：PrivateSubCommandl_Click()Dimarray1(10,10)AsIntegerDimi,jAsIntegerFori=lTo3Forj=2To4arrayl(i,j)=i+jNextjNextiTcxtl.Tcxt=arrayl(2,3)+arrayl(3,4)EndSub程序運營后，單擊命令按鈕，在文本框中顯示的值是。6A、12rB、13「C、14口第91題設有如下程序：OptionBase1PrivateSubFormClick()DimaDimiAsIntegei'a=Array(1,2,3,4,5,6,7,8,9)Fori=0To3Printa(5-i);NextiEndSub程序運營后，單擊命令按鈕，在窗體上顯示的值是。*A、5432rB、6543rC、4321rD、7654“第92題執行以下Command1的Click事件過程在窗體上顯示。OptionBase1PrivateSubCommand1_C1ick()Dimaa=Array("a","b","c","d","e","f","g")Printa(l);a(3);a(5)EndSubA^abcB、bdfC、aceD、犯錯后第93題設有如下程序：Dima(3,3)AsInlegerForm=lTo3Forn=lTo3a(m,n)=(m-l)*3+nNextnNextmForm=2To3Forn=lTo2Printa(n,m);NextnNextm運營后輸出的結果是。6A.2536rB、2356rC>4758第94題當發生CommandlClick事件，以下程序的輸出結果是PrivateSubCommandlClick()Dimaa=Array(l,2,3,4,5)Fori=lTo4Printa(i)-a(i-l);NextiEndSubrA、11111B>1111「C、111rD、222“第95題下面關于控件數組與一般控件的敘述中對的的是。6A、控件數組一定有1個以上同類型的控件組成，而一般控件只有一個控件。「B、控件數組的索引屬性值Index值為0,而一般控件的Index值為空。rC、控件數組的Index值為1,而一?般控件的Index值為0。rD、控件數組的建立通過Dim語句聲明，而一般控件不需要聲明。廠第96題Function子程序模塊用的結束語句是()。「A、ExitSubExitFunctionrC、End"D、EndEunction17第97題在窗體模塊的通用聲明中聲明變量時，不能使用關鍵字。rA、DimrB、PublicC、PrivateD、Static17第98題以下敘述中錯誤的是orA、不能在標準模塊中定義Static型變量。°B、語句Dima,bAsInteger聲明了兩個整形變量rC、窗體級變量必須先聲明后使用r1）、在事件過程或通用過程內定義的變量是局部變量口第99題設有語句"Open"c:\test.dat"ForOutputAs#1”,則卜列敘述中錯誤的是O6A、該語句打開C盤根目錄下一個已存在的文獻test.daCB、該語句在C盤根目錄下建立一個名為test.dat的文獻「C、該語句建立的文獻的文獻號為1CD、執行語句后，就可通過Print#語句向文獻test.dat中寫入信息廠第100題Cis命令可清除窗體或圖形框中的內容。rA、Picture屬性設立的背景圖案rR、設計時放置的圖片°C、程序運營時產生的圖形和文字rD、以上所有A?C提交審核I17第1題VisualBasic6.0分為3種版本，這3種版本是學習版、.和公司版。答］：尸一“第2題應用程序最終面向用戶的窗口是，它相應于應用程序的運營結果。長IJ窗體設計器<T：“第3題假如打開了不需要的菜單或對話框，可以用鍵關閉。答］:叵廠第4題當進入VB集成環境后，發現沒有顯示“工具箱”窗口，應選擇—菜單的選項，使“工具箱”窗口顯示。答］:下一答2P麗一17第5題VB是一種面向的程序設計語言，采用了編程機制。答］:和一答2」事件驅動廠第6題窗體是一種對象，由定義其外觀，由定義其行為，由事件定義其與用戶的交互。答］一答2：r^一17第7題在VB中設立或修改?個對象的屬性的方法有兩種，它們分別是和代碼窗口編程。答1：|由性位口設Et<"B答1：rC、只保存窗體模塊和標準模塊文獻「D、只保存工程文獻17第9題在VB集成環境創建VB應用程序時，除了工具箱窗口、窗體窗口、屬性窗口外，必不可少的窗口是()「A、窗體布局窗口rB、立即窗口°C、代碼窗I」rD、監視窗口“第io題保存新建的工程時，默認的途徑是0A、MyDocuments°B、VB98rC、\「D、Windows底第II題將調試通過的工程經“文獻”菜單的“生成.exe文獻”編譯成.exe后，將該可執行文獻轉到其他機器上不能運營的重要因素是()6A、運營的機器上無VB系統所需的動態連接庫rB、缺少.frm窗體文獻rC、該可執行文獻有病毒CD、以上因素都不對廠第12題在VB環境中，工程文獻的擴展名是()第8題在VB6.0集成開發環境中，可以編輯程序代碼，但不能修改用戶界面的工作模式是。依J中斷模式〈|>b合1”.第9題VB應用程序中窗體文獻的擴展名是，工程文獻的擴展名是答1:答2:尸口第10題VisualBasic中的控件分為3類，它們是標準控件、和可插入對象。瓜JActiveX控件合1廠第11題VisualBASIC應用程序通常由3類模塊組成，即窗體模塊、.和類模塊。答/標準模塊底第12題VisualBasic6.0中涉及窗體文獻、標準模塊文獻、類模塊文獻、工程組文獻、資源文獻和六類文獻。答1J工程文件17第13題窗體設計器窗口筒稱,是應用程序最終面向用戶的窗口。答i：r^—底第14題對象的特性稱為屬性，對象可以執行的操作稱為，對象可以辨認的操作稱為o答卜方―—答2:17第15題窗體上有一個命令按鈕，事件代碼如下：PrivateSubCommandl_Click()A=*1*B="2"A=Vai(A)+Vai(B)B=Vai(*12*)IfA<>BThenPrintA-BElsePrintB-AEndSub程序運營后，單擊命令按鈕，輸出0答1:「“第16題以下語句的輸出結果是。a%=3.1425926Printa%答1：「廠第17題a$=LCase("He】l。")，a$的值是，b$=UCase("Hello"),b$的值是o答1：E-答2：尸5*第18題表達式"12"+"34"的值是,表達式12+34的值是答1:尸答2p17第19題整形變量M中存放了一個兩位數，要將兩位數互換位置，例如24變成42,實現的表達式為。比I((M?od10)4答1：1廠第20題代數式|y+ln3x的VisualBasic表達式為。f|Abs(y)?Lof答I:1“第21題VB的常量分為和符號常量、系統常量。IJ口接常微B第22題在立即窗口中輸入如下內容:A$="IloveVisualBasic"x=instr(a$,MVisualw)Printx則在立即窗口顯示的是r-8-答i：l“第23題在VB中用函數來產生一個01之間的單精度隨機數。由于一個隨機數序列也許反復出現，VB提供了語句來消除這種情況。答答2」randomize口第24題寫出?個能產生取值范圍為［30,45］的隨機整數的表達式I!nt(rnd*16+^答1:1廠第25題算術表達式14.3\3.1和14.3mod3.1的值分別是和答】：「答2：P廠第26題VB的變量名的最大字符為個..I255答1:1匠第27題VB表達式Int(-4.8)*6\3"2+Fix(-4.8)的值是答1：尸后第28題設有如下程序段：a$="BeijingShanghai”b$=Mid(a$,TnStr(a$,V)+l)執行上面的程序段后，變量b$的值為°”]JShanghai底第29題下面程序運營后，輸出的結果為.PrivateSubCommand1Click()A$="Beijing"B$="dalian"C$="shanghai”C$=Instr(Left(A$,2)+Right(B$,2),C$)PrintC$EndSub答i：n“第30題若要使文本框控件運營時不可見，應將屬性設立為°m.Ivisible-答1Jf_I""False-答2:1廠第31題可以實現x和y變量內容進行互換的算法是。答］Je:產y:底第32題若要使標簽控件顯示時不覆蓋其背景內容則要對屬性進行設立。答］|BackStyle-“第33題在VisualBasic中Print、Cis屬于。答］p至—廠第34題為了使文本框同時具有水平和垂直滾動條應先把MultiLine屬性設立為True然后再把ScrollBars屬性設立為。答1：P廠第35題當焦點進入文本框Tcxll時，要自動選定文本框開始的5個字符，則需要通過代碼Textl.SelStart=和Textl.SelLength=5來實現。答1：1底第36題在程序代碼Labell.Caption="VisualBasic”中，表達對象的是表達屬性的是O答1：|Label1答2：lCaP"°n-廠第37題假如打印寬度Width是80,并指定Tab(90)則卜.一個打印將從列開始答“第38題要判斷在文本框中是否按了【Enter】鍵，應在文本框的一事件中進行判斷。答］|keypress“第39題要鎖定文本框Text的內容，應將屬性設立為True。答］:尸5—“第40題要使文本框中的內容都被顯示為“*”，則應將文本框的屬性修改為。分］Ipassrordchai廠第41題要使指定的文本框成為焦點，則應采用文本框控件的方法。但.setfocus答1:1廠第42題下面事件過程的功能是：輸入3個整數x、y、z,按從大到小的順序輸出這3個數,在橫線上填上適當內容。Privatesubcommandlclick()dimx!,y!,z!x=inputbox(*x=*)y=inputbox("y=")z=inputbox("z=")ifthent=x:x=y:y=tifthent=x:x=z:z=tify<zthent=y:y=z:z=tprintx,y,zendsub答1:國答2:尸廠第43題下面事件過程的功能是：輸入一個字符，若它是大寫字母，則把它變成小寫字母，若它是小寫字母，則把它變成大寫字母：若它是其他字符，則它的值不變,在橫線上填上適當內容。Privatesubcommandl-click()dimchasstring*lch=inputbox("請輸入一個字符")ifthench=lcase(ch)elseifthench=ucase(ch)endifprintchendsub

快］Jch>="A"and答2：|ch>="Jand歹笫44題單行結構條件語句必須在行內書寫完。答1J9單底第45題判別變星X是否大于0,若大于0,則累加到變量si中，否則，累加到s2中，使用的單行結構條件語句為答1:答1:ifx>0then“第46題Privatesubcommand1_c1ick（）dimyear%,month%,days%year=inputbox（”請輸入年份“）month=inputbox（”請輸入月份"）selectcasecase1,3,5,7,8,10,12days=31days=30case2ifthendays=29elsedays=28endifendselectprintyear;年”;month;“月有”;days;“天"endsub▲month答*2Icose九6,9>1g3J-mod4=（廠第47題設a=l,b=2,c=3,表達式aaorc>bandaOb的值為。4.true答l：1廠第48題為了使計時器控件Timerl每隔0.5秒觸發一次Timer事件，應將控件的屬性設立為o17第49題設立一個單選按鈕所代表選項的選中狀態，應當在屬性窗口中改變屬性。

答1:value“第50題用VB表達式來表達“x是小于105答1:value答1：|x〉=。andx.廠第51題邏輯表達式not"a">"b"and9<3or9>3,結果是。答1:尸一底第52題反復執行的程序段稱為（）；進入循環體的條件稱為（）；中止循環體執行的條件稱為（）。答］:尸L|結束M|結束M環條「|結束M|結束M環條「向第53題當x的輸入值為50,19,0,21和-1時，下列事件過程的執行結果是什么？(20分)PrivateSubCommand1_Click()Dimx%,s%s=0x=InputBox("x=")Whilex>=0s=s+xx=InputBox(*x=*)WendPrint"s=";sEndSub0?I8=90-答id廠第54題設t=lX2X3X…Xn,下列事件過程的功能是求t不大于1000時最大的n值，在橫線上填上適當內容。PrivateSubConnnandl_Click()Dimt%,n%t=1:n=1DoWhile(1)n=n+1(2)LoopPrint"n=";n-1EndSub答］:答］:17第55題下面事件過程的功能是：輸出100以內個位數為8且能被3整除的所有數，在橫線上填上適當內容。PrivateSubCommandl_Click()Dimi%,a%Fori=0To(1)a=i?10+8If(2)ThenGoTo1(3)1:NextiEndSub答2JaMod3＜〉0答3:三廠第56題下面事件過程的功能是求S=1+(1*2)+(1*2*3)+…+(1*2*…和)的值，在橫線上填上適當內容。PrivateSubCommand1_C1ick()Dimn%,i%,j&,s&n=InputBox(*n=*)j=1:s=0Fori=1Tonj=(1)(2)NextiPrint"s=";sEndSub答1：“第57題下面事件過程的功能是打印圖案*************************在橫線上填上適當內容。PrivateSubCommandedick()Dimi%,j%Fori=1To5PrintSpc((1));Forj=1To(2)PrintNextj(3)NextiEndSub廠第58題下面事件過程的功能是求2?100以內的素數，在橫線上填上適當內容。PrivateSubCommand1_C1ick()Dimi%,j%,m%m=0Fori=2To100j=2DoWhile(1)IfiModj=0Then(2)j=j+1LoopIf(3)ThenPrinti,:m=m+1IfmMod5=0ThenPrintNextiEndSub底第59題在窗體上畫一個名稱為Commandl的命令按鈕，然后編寫如下事件過程：PrivateSubCommandl_Click0n=5f=ls=lFori=1Tont=(1):s=s+t:f=(2)NextPrintsEndSub該事件過程的功能是計算1/1-1/2+1/3-1/4+1/5的值。請填空。答1嚴17第60題下列循環結構控制的循環次數是：()°i=ldoi=i+lloopuntili=10田<I10答I:1廠第61題菜單分為菜單和菜單，菜單總與相關連，設計菜單需要在中設計。"第62題閱讀下列程序段：PrivateSubFormClick0Dimamr(10)AsIntegerFori=6To10arr(i)=InputSox("請順序輸入1,2,3,4,5*)NextiPrintarr(6)+arr(arr(7))/arr(8)EndSub程序運營后，單擊窗體，在輸入對話框中順序輸入1、2、3、4、5,輸出結果為。17第63題下列過程的運營結果是。PrivateSubFonn_Click()DimX(4)AsIntegerForI=1To4X(I)=1*1NextPrintX(I)EndSub次|編譯錯誤.1“第64題在窗體添加一個命令按鈕，然后編寫如下事件過程，該過程的功能是用冒泡法將10個數排成升序，請在處將程序補充完整。PrivateSubCommand1_C1ick()Dima(10)Fori=lTo10a(i)=val(InputBox("請輸入數組元素值"，"數據輸入",0)NextiFori=Forj=Ifa(j)>a(j+l)Thenb=a(j):a(j)=a(j+l):a(j+l)=bEndIfNextjNextiForK=1to10Printa(k);NextkEndSub0,I1To9:：答1:1底第65題設某個程序中要用到一個二維數組，規定數組名為A,類型為字符串類型，第一維下標從1?5,第二維下標從-2?6,則相應的數組聲明為答1：|DNAdT。廠第66題VisualBasic的數組下標默認為,可通過A、.frmB、.basC>.vbp「D、.frx17第13題將一個VB程序保存在磁盤上，至少會產生的文獻是0.doc、.、.cxe6C、.vbp、.frmD、.bat、.sys17第14題下面關于對象的描述中，錯誤的是06A、對象就是自定義結構變量「B、對象代表正在創建的系統中的一個實體rC、對象是一個狀態和操作（或方法）的封裝體「I）、對象之間的信息傳遞是通過消息進行的廠第15題下面4項中不屬于面向對象系統三要素的是06A、變量rB、事件「C、屬性rD、方法廠第16題下面各種高級語言中，不是面向對象程序設計語言的是（）17第68題下列程序的輸出結果為。PrivateSubCommandl_Click()Dima(lTo20)DimiFori=lTo20a(i)=iNextiForEachiIna()a(i)=20NextiPrinta(2)EndSub4<I20答I：1“第69題下面事件過程的功能是：用隨機函數產生10個10到100之間的隨機整數存放到一維數組a中，并求a中的最小值及最小值在數組a中的位置，在橫線上填上適當內容。PrivateSubCommandl_Click()Dima(10)AsInteger,i%?max%,index%RandomizeFori=1To10a(i)=Int(91?Rnd+10)Printa(i);NextiPrintmax=a(l):index=1Fori=2To10IfThenmax=a(i):NextiPrint”數組a中的最小值為：*;maxPrint"最小值所在位置為：“；indexEndSub答1；|a(i)<max17第70題數組元素個數可以改變的數組稱為；數組元素可以存放不同類型數據的數組稱為.田.I可謂效組：可答1:1底第71題若要定義一個包含10個字符串元素，且下界為1的一維數組s,則數組說明語句為O答［JDi0(lT。底第72題若要定義一個元素為整型數據的二維數組a,且第一維的下標從0到5,第二維下標從-3到6,則數組說明語句為oa1V-I~DimTu答1:1廠第73題控件數組是由一組類型和名字相同的控件組成，共享.I網一?個小件4合17第74題控件數組中的每一個控件都有惟一的下標，下標值由屬性指定。答1：尸一“第75題窗體上已有命令按鈕Commandl和標簽Label,下列程序運營后，單擊Commandl按鈕，標簽Label1中顯示的內容是。Optionbase0PrivateSubCommand1_Click()Dima(5)AsInteger,nAsIntegerFori=1To5a(i)=in=n+a(i)NextiLabel1=nEndSub答1:^一17第76題程序中自動測試數組的下界用函數來實現，上界用函數來實現。-.l.bound：UI答I:1廠第77題當數組初次被聲明時，對所有數值型數組默認初值是;字符串數組默認初值是o答1:乒彳底第78題當用ReDim語句要改變動態數組的大小時，數組元素的值會;用關鍵字可保存數組元素本來的值。答〔J丟失；Prcw提交審核A、VisualBasic1B、C++6CxPascal「D、Java17第17題VB6.0集成開發環境可以0rA、編輯、調試、運營程序，但不能生成可執行程序「B、編輯、生成可執行程序、運營程序，但不能調試程序rC、編輯、調試、生成可執行程序，但不能運營程序6D、編輯、調試、運營程序，也能生成可執行程序底第18題英文“Visual”的含義是06A、可視化rB、集成rC、結構化rD、調試17第19題不能打開屬性窗口的操作是0rA、單擊工具欄中的“屬性窗口”按鈕rB