2023年VisualBasic题库有答案

“第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