VisualBasic题库有答案

窗体顶端第1题 Visual Basic版本有3个版本，按功能从强到弱的顺序是（）A、工程版、专业版、学习版B、专业版、工程版、学习版C、企业版、专业版、学习版D、专业版、企业版、学习版第2题 以下叙述中，错误的是()A、一个Visual Basic 应用程序可以含有多个标准模块文件B、一个visual Basic 工程可以含有多个窗体文件C、标准模块文件可以属于某个指定的窗体文件D、标准模块文件的扩展名是.bas第3题 以下叙述中错误的是()A、一个工程可以包括多种类型的文件B、Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C、程序运行后，在内存中只能驻留一个窗体D、对于事件驱动型应用程序，每次运行时的执行顺序可以不一样第4题 Visual Basic的窗体设计器主要是用来()A、建立用户界面B、添加图形、图像、数据等控件C、编写程序源代码D、设计窗体的布局第5题 Visual Basic是一种结构化高级程序设计语言，它采用的是()驱动方式A、键盘B、鼠标C、事件D、函数第6题 Visual Basic程序设计语言属于()A、面向过程的语言B、机器语言C、面向对象的语言D、汇编语言第7题 Visual Basic一共有设计、运行和中断三种模式，要使用调试工具应该()A、进入设计模式B、进入运行模式C、进入中断模式D、不用进入任何模式第8题 假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是()A、只保存窗体模块文件B、分别保存窗体模块、标准模块和工程文件C、只保存窗体模块和标准模块文件D、只保存工程文件第9题 在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体窗口、属性窗口外，必不可少的窗口是()A、窗体布局窗口B、立即窗口C、代码窗口D、监视窗口第10题 保存新建的工程时，默认的路径是()A、My DocumentsB、VB98C、D、Windows第11题 将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件转到其他机器上不能运行的主要原因是()A、运行的机器上无VB系统所需的动态连接库B、缺少.frm窗体文件C、该可执行文件有病毒D、以上原因都不对第12题 在VB环境中，工程文件的扩展名是()A、.frmB、.basC、.vbpD、.frx第13题 将一个VB程序保存在磁盘上，至少会产生的文件是()A、.doc、.txtB、.com、.exeC、.vbp、.frmD、.bat、.sys第14题 下面关于对象的描述中，错误的是()A、对象就是自定义结构变量B、对象代表正在创建的系统中的一个实体C、对象是一个状态和操作（或方法）的封装体D、对象之间的信息传递是通过消息进行的第15题 下面4项中不属于面向对象系统三要素的是()A、变量B、事件C、属性D、方法第16题 下面各种高级语言中，不是面向对象程序设计语言的是()A、Visual BasicB、C+C、PascalD、Java第17题 VB6.0集成开发环境可以()A、编辑、调试、运行程序，但不能生成可执行程序B、编辑、生成可执行程序、运行程序，但不能调试程序C、编辑、调试、生成可执行程序，但不能运行程序D、编辑、调试、运行程序，也能生成可执行程序第18题 英文“Visual”的含义是()A、可视化B、集成C、结构化D、调试第19题 不能打开属性窗口的操作是()A、单击工具栏中的“属性窗口”按钮B、选取“视图”菜单中的“属性窗口“子菜单项C、在对象上单击右键，从弹出的快捷菜单中选择“属性窗口”选取项D、选取“工程”菜单中的“属性窗口”子菜单项第20题 VB60集成开发环境的工作模式有()A、一种B、两种C、三种D、四种第21题 以下关于VB特点的叙述中，错误的是()A、VB是采用事件驱动编程机制的语言B、VB程序既可以编译运行，也可以解释运行C、构成VB程序的多个过程没有固定的执行顺序D、VB程序不是结构化程序，不具备结构化程序的三种基本结构第22题 以下叙述中错误的是()A、VB是事件驱动型可视化编程工具B、VB应用程序不具有明显的开始和结束语句C、VB工具箱中的所有控件都具有宽度(width)和高度(height)属性D、VB中控件的某些属性只能再设计时设置第23题 在Visual Basic中，要强制用户对所用的变量进行显式声明，这可以在()设置A、“属性”对话框B、“程序代码”窗口C、“选项”对话框D、对象浏览器第24题 通过以下()窗口可以在设计时直观的调整窗体在屏幕上的位置。A、代码窗口B、窗体布局窗口C、窗体设计窗口D、属性窗口第25题 VB的工程资源管理器可管理多种类型的文件，下面叙述不正确的是()A、窗体文件的扩展名为.frm，每个窗体对应一个窗体文件B、标准模块是一个纯代码性质的文件，它不属于任何一个窗体C、用户通过类模块来定义自已的类，每个类都用一个文件来保存，其扩展名为.basD、资源文件是一种纯文本文件，可以用简单的文字编辑器来编辑第26题 与传统的程序设计语言相比，Visual Basic最突出的特点是()A、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术第27题 Visual Basic6.0集成环境的主窗口中不包括()A、标题栏B、菜单栏C、状态栏D、工具栏第28题 当运行程序时，系统自动执行启动窗体的()事件A、LoadB、ClickC、UnloadD、GotFocus第29题 以下关于name属性叙述正确的是()A、窗体的Name属性指定窗体的名称，用来表示一个窗体B、窗体的Name属性的值是显示在窗体标题栏中的文本C、可以在运行期间改变对象的Name属性的值D、对象的Name属性值可以为空第30题 关于对象的属性不正确的叙述是()A、对象的属性一般有属性名和属性值B、可通过属性窗口设置属性的值C、可通过程序代码设置属性值D、对象所有属性值均可以在设计时设置第31题 确定一个控件在窗体上的位置的属性是()A、Width或HeightB、Width和HeightC、Top或LeftD、Top和Left第32题 下列叙述中正确的是()A、只有窗体才是Visual Basic中的对象B、只有控件才是Visual Basic中的对象C、窗体和控件都是Visual Basic中的对象D、窗体和控件都不是Visual Basic中的对象第33题 为了同时改变一个活动控件的高度和宽度，正确的操作是()A、拖拉控件4个角上的某个小方块B、只能拖拉位于控件右下角的小方块C、只能拖拉位于控件左下角的小方块D、不能同时改变控件的高度和宽度第34题 下列符号中不能作为VB中变量名的是()A、ABCDB、E0065700C、123TWDFFD、zxy第35题 下列符号常量的声明中，()是不合法的A、Const a As Single = 1.1B、Const a As Integer = 111211C、Const a As Double = sin (l)D、Const a = OK第36题 下列()是字符型常量A、I am a studentB、江苏南京C、# 02 / 25 / 2013 #D、123第37题 下列()是日期型常量A、I am a studentB、江苏南京C、# 02 / 25 / 2013 #D、123第38题 下列()是双精度型变量A、AAA %B、BBB $C、CCC !D、DDD #第39题 可以同时删除字符串前导和尾部空白的函数是()A、LtrimB、RtrimC、TrimD、Mid第40题 设有如下变量声明：Dim X As Integer，如果Sgn(X）的值为一1，则X的值是()A、整数B、大于O的整数C、等于O的整数D、小于0的整数第41题 从键盘上输人两个字符串，分别保存在变量strl , str2中。确定第二个字符串在第一个字符串中起始位置的函数是()A、LeftB、MidC、StringD、Instr第42题 设有语句x=inputbox(输入数值,0,示例)，程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（）A、在inputboxc对话框标题栏中显示的是“示例”B、变量X的值是数值10C、变量X的值是字符串10D、0是默认值第43题 设x=7.9,则执行x=iif(x A、3.45B、3C、2.3D、2第44题 在下列程序中： private sub command1_click() b=1:a=2 print a=iif(ab,a,b) end subA、0B、1C、trueD、false第45题 用情况选择语句select case x,选择|x|5的情况的语句是case()A、not(-5 to 5)B、5 to -5C、is5D、abs(x)5第46题 单击窗体后程序的输出结果是（） private sub form_click() a=1:b=2:c=3 if a3 or b3 then a=b-a:b=c-a:c=b+a end if print a+b+c end subA、16B、3C、6D、8第47题 在窗体上添加一个名称为TEXT1的文本框，然后编写以下代码： private sub form_activate() a=int(rnd)+7 if a6 then x=1 elseif a7 then x=2 elseif a8 then x=3 elseif a9 then x=4 end if text1.text=x end subA、1B、2C、3D、4第48题 下列ForNext循环的循环体的执行次数为（ ）。 For I=1 to 11 I=I+1 Next IA、5B、11C、6D、有语法错误第49题 下列程序的输出结果是（ ）。 P0 For I=1 to 4 p=p*I Next I Print pA、24B、4C、0D、10第50题 下列程序段的输出为（ ）。 S=0 For I=1 to 10 I=I+1:s=s+I Next I Print sA、55B、66C、30D、60第51题 以下程序段的输出结果是（ ）。 While n4 x=x*y：y=y+1 loop Print xA、1B、4C、8D、20第53题 以下程序段的输出结果是（ ）。 N=4：k=1：I=0 For I=1 to n k=k*I Next I Print IA、2B、3C、4D、5第54题 以下程序段的输出结果是（ ）。 N=4：k=1：I=0 For I=1 to n k=k*I Next I Print kA、21B、22C、23D、24第55题 以下程序段的输出结果是（ ）。 Num=0 While num=2 num=num+1 Print num; WendA、1 2 3B、1 1 1C、3 2 1D、2 1 3第56题 假定有以下程序段 For I=1 to 3 For j=5 to 1 step 1 Print I*j Next j,I 则语句Print I*j的执行次数是（ ）。A、15B、16C、17D、18第57题 假定有以下循环结构 ，则正确的描述是（ ）。 Do While 条件 循环体 LoopA、如果“条件”是一个为1的常数，则一次循环体也不执行B、如果“条件”是一个为1的常数，则无限次执行循环体C、如果“条件”是一个不为1的常数，则至少执行一次循环体D、不论“条件”是否为“真”，至少要执行一次循环体第58题 下面程序运行时内层循环的循环总次数是（ ）。 For m=1 to 3 For n=0 TO m-1 Next n Next mA、6B、5C、3D、4第59题 以下程序段的输出结果是（ ）。 N=1:s=0 do s=s+n : n=n+1 loop while n=100 s=s+n : n=n+1 loop Print sA、4949B、5050C、4950D、5049第61题 以下程序段的输出结果是（ ）。 For x=5 to 2.5 step 7 Next x Print xA、2.2B、2.5C、2.9D、-2第62题 以下程序段的输出结果是（ ）。 A=0 For j=1 TO 15 a=a+(j MOD 3) Next j Print aA、0B、15C、90D、120第63题 以下程序段的输出结果是（ ）。 Sum=0 For j=1 to 10 if j=10 then sum=sum+j end if Next j Print sumA、10B、55C、100D、0第64题 以下程序段的输出结果是（ ）。 X=0:n=0 Do While x50 x=(x+2)*(x+3) n=n+1 Loop Print nA、1B、2C、3D、4第65题 Do循环语句是根据条件决定循环的语句的，下列说法正确的是（ ）。A、While是当条件为真时执行循环，而Until是在条件变为真的之前重复B、Until是当条件为真时执行循环，而While是在条件变为真的之前重复C、While和Until都是当条件为真时执行循环D、While和Until都是在条件变为真的之前重复循环第66题 执行下面的程序段后，I 的值为 （ ）。 X=5 For I=1 To 10 Step 2 x=x+( I 3) Next IA、9B、10C、11D、12第67题 执行下面的程序段后，a的值为 （ ）。 For I=1 To 3 For j=1 To I For k=j To 3 a=a+1 Next k, j, IA、3B、9C、14D、21第68题 要将菜单项的某字母设置为热键，在菜单设计中，应在菜单项的标题的该字母前加（ ）字符。A、/B、C、&D、第69题 打开通用对话框的“打开”对话框的方法是（ ）A、ShowOpenB、ShowSaveAsC、ShowColorD、ShowFont第70题 下列数组声明语句中正确的是（ )。A、Dim a2;3 As IntegerB、Dim a2,3 As IntegerC、Dim a(2;3) As IntegerD、Dim a(2,3) As Integer第71题 在窗体上添加一个名称为Command1的命令按钮数组，以下说法正确的是（ ）。A、命令按钮的索引值（Index）相同B、在代码中访问任意一个命令按钮只需使用名称Command1C、命令按钮分享相同的事件过程D、命令按钮的Caption属性值一定为Command1第72题 下列程序运行时单击Command1，输出的结果是（ ）。 Private Sub Command1_Click() Dim a(10) For k = 1 To 10 a(k) = 11 - k Next Print a(3 + a(6) End SubA、5B、4C、3D、2第73题 在使用动态数组时，如果改变数组的大小而又不丢失数组中的数据，应使用具有关键字（ ）的ReDim语句。A、PrivateB、PreserveC、PublicD、Static第74题 控件数组中的名字是由下列哪个属性决定的（ ）？A、TextB、IndexC、名称D、TabIndex第75题 下列程序运行时单击Command1，输出的结果是（ ）。 Private Sub Command1_Click() Dim a(5, 5) For i = 1 To 3 For j = 1 To 4 a(i, j) = j - i Next Next For m = 1 To 2 For n = 1 To 2 Print a(n, m); Next Next End SubA、0 1 -1 0B、0 -1 1 0C、0 -1 -1 0D、0 1 1 0第76题 下列程序段的功能是将以2为首的前100个素数存入数组中。请在 _ 处选择正确答案，将程序补充完整（ ）。 Dim a(100) As Integer Private Sub Form_Load() a(1) = 2 :x = 3: i = 2 Do While i a(j) Then _ Next j If k i Then temp = a(k): a(k) = a(i): a(i) = temp End If Next i End SubA、i+1;k=jB、i;k=jC、k;a(k)=a(j)D、i1;k=j1第79题 VB允许多维数组的最大维数是（ ）。A、50B、60C、80D、90第80题 用下面的语句所定义的数组元素的个数是（ ）。 Dim Var(4 To 6, 3 To 3)A、24B、36C、21D、18第81题 下面关于VB语言中数组下标的几种说法，错误的是（ ）。A、数组下标的下界默认为1B、数组下标的下界可以为负数C、数组下标的下界必须小于上界D、数组下标的上界可以为负数第82题 下列程序段的执行结果为（ ）。 Private Sub Command1_Click() Dim A(10), B(5) For I=1 to 10 A(I)=I Next I For J=1 to 5 B(J)=J*20 Next J A(5)=B(2) Print A(5) = ; A(5) End SubA、A(5) = 5B、A(5) = 10C、A(5) =20D、A(5) =40第83题 运行下列程序会出现出错信息，产生错误的原因是（ ）。 x=5 Dim a(x) For i=1 To 6 a(i)=i+1 Next iA、数组元素a（i）的下标越界B、变量x没有定义C、循环变量的范围越界D、Dim语句中不能用变量x来定义数组的下标第84题 下列程序段的执行结果是（ ）。 Dim a(5 to 6) For i=Lbound(a,1) To Ubound(a,1) a(i)=i Next i Print a(Lbound(a,1);a(Ubound(a,1)A、0 0B、5 0C、5 6D、0 6第85题 如下数组声明语句中正确的是（ ）。A、Dim A(4 5) As IntegerB、Dim A(n,n) As IntegerC、Dim A(4,5) As IntegerD、Dim A4,5 As Integer第86题 语句Option Base 1:Dim a(3,4)定义的数组所包含的数组元素的个数是Wrong（ ）。A、7B、12C、15D、20第87题 用下面语句定义的数组元素个数是（ ）。 Dim A(-3 To 5) As IntegerA、6B、7C、8D、9第88题 语句Dim arr(-3 To 5,2 To 6) As Integer定义的数组元素有（ ）。A、45B、44C、11D、54第89题 在窗体上面画一个命令按钮，然后编写如下事件过程：（ ） Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4 To 1 Step -1 s=s+a(i)*j j=j*10 Next i Print s End SubA、4321B、12C、34D、1234第90题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10,10) As Integer Dim i,j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i+j Next j Next i Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是_。A、12B、13C、14D、15第91题 设有如下程序： Option Base 1 Private Sub Form_Click() Dim a Dim i As Integer a=Array(1,2,3,4,5,6,7,8,9) For i=0 To 3 Print a(5-i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的值是_。A、5 4 3 2B、6 5 4 3C、4 3 2 1D、7 6 5 4第92题 执行以下Command1的Click事件过程在窗体上显示_。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(a,b,c,d,e,f,g) Print a(1);a(3);a(5) End SubA、abcB、bdfC、aceD、出错第93题 设有如下程序： Dim a(3,3) As Integer For m=1 To 3 For n=1 To 3 a(m,n)=(m-1)*3+n Next n Next m For m=2 To 3 For n=1 To 2 Print a(n,m); Next n Next m 运行后输出的结果是 _。A、2 5 3 6B、2 3 5 6C、4 7 5 8D、4 5 7 8第94题 当发生Command1_Click事件，以下程序的输出结果是_。 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To 4 Print a(i)-a(i-1); Next i End SubA、1 1 1 1 1B、1 1 1 1C、1 1 1D、2 2 2第95题 下面关于控件数组与一般控件的叙述中正确的是_。A、控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件。B、控件数组的索引属性值Index值为0，而一般控件的Index值为空。C、控件数组的Index值为1，而一般控件的Index值为0。D、控件数组的建立通过Dim语句声明，而一般控件不需要声明。第96题 Function子程序模块用的结束语句是（）。A、Exit SubB、Exit FunctionC、EndD、End Function第97题 在窗体模块的通用声明中声明变量时，不能使用_关键字。A、DimB、PublicC、PrivateD、Static第98题 以下叙述中错误的是_。A、不能在标准模块中定义Static型变量。B、语句Dim a, b As Integer声明了两个整形变量C、窗体级变量必须先声明后使用D、在事件过程或通用过程内定义的变量是局部变量第99题 设有语句“Open c:test.dat For Output As #1”，则下列叙述中错误的是 。A、该语句打开C盘根目录下一个已存在的文件test.daB、该语句在C盘根目录下建立一个名为test.dat的文件C、该语句建立的文件的文件号为1D、执行语句后，就可通过Print #语句向文件test.dat中写入信息第100题 Cls命令可清除窗体或图形框中 _的内容。A、Picture属性设置的背景图案B、设计时放置的图片C、程序运行时产生的图形和文字D、以上全部AC窗体顶端第1题 Visual Basic 6.0分为3种版本，这3种版本是学习版、_和企业版。答1:第2题 应用程序最终面向用户的窗口是_，它对应于应用程序的运行结果。答1:第3题 如果打开了不需要的菜单或对话框，可以用_键关闭。答1:第4题 当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择_菜单的_选项，使“工具箱”窗口显示。答1:答2:第5题 VB是一种面向_的程序设计语言，采用了_编程机制。答1:答2:第6题 窗体是一种对象，由_定义其外观，由_定义其行为，由事件定义其与用户的交互。答1:答2:第7题 在VB中设置或修改一个对象的属性的方法有两种，它们分别是_和代码窗口编程。答1:第8题 在VB6.0集成开发环境中，可以编辑程序代码，但不能修改用户界面的工作模式是_。答1:第9题 VB应用程序中窗体文件的扩展名是_，工程文件的扩展名是_。答1:答2:第10题 Visual Basic中的控件分为3类，它们是标准控件、_和可插入对象。答1:第11题 Visual BASIC应用程序通常由3类模块组成，即窗体模块、_和类模块。答1:第12题 Visual Basic6.0中包括窗体文件、标准模块文件、类模块文件、工程组文件、资源文件和_六类文件。答1:第13题 窗体设计器窗口简称_，是应用程序最终面向用户的窗口。答1:第14题 对象的特征称为属性，对象能够执行的操作称为_，对象能够识别的操作称为_。答1:答2:第15题 窗体上有一个命令按钮，事件代码如下： Private Sub Command1_Click() A = 1 B = 2 A = Val(A) + Val(B) B = Val(12) If A B Then Print A - B Else Print B - A End Sub 程序运行后，单击命令按钮，输出_。答1:第16题 以下语句的输出结果是_。 a% = 3.1425926 Print a%答1:第17题 a$ = LCase(Hello)，a$的值是_，b$ = UCase(Hello)，b$的值是_。答1:答2:第18题 表达式12 + 34的值是_，表达式12 + 34的值是_。答1:答2:第19题 整形变量M中存放了一个两位数，要将两位数交换位置，例如24变成42，实现的表达式为_。答1:第20题 代数式|y| + ln3x的Visual Basic表达式为_。答1:第21题 VB的常量分为_ 和符号常量、系统常量。答1:第22题 在立即窗口中输入如下内容： A$=”I love Visual Basic” x=instr(a$,”Visual”) Print x 则在立即窗口显示的是_答1:第23题 在VB中用_函数来产生一个01之间的单精度随机数。由于一个随机数序列可能反复出现，VB提供了_语句来消除这种情况。答1:答2:第24题 写出一个能产生取值范围为30,45的随机整数的表达式_答1:第25题 算术表达式 14.33.1 和 14.3 mod 3.1 的值分别是_ 和_答1:答2:第26题 VB的变量名的最大字符为_个答1:第27题 VB表达式Int（-4.8）*632+Fix（-4.8）的值是_答1:第28题 设有如下程序段： a$=BeijingShanghai b$=Mid(a$,InStr(a$,g)+1) 执行上面的程序段后，变量b$的值为_。答1:第29题 下面程序运行后，输出的结果为_。 Private Sub Command1_Click( ) A$=”Beijing” B$=”dalian” C$=”shanghai” C$=Instr(Left（A$,2)+Right(B$,2),C$) Print C$ End Sub答1:第30题 若要使文本框控件运行时不可见，应将_属性设置为_。答1:答2:第31题 可以实现x和y变量内容进行交换的算法是_。答1:第32题 若要使标签控件显示时不覆盖其背景内容则要对_属性进行设置。答1:第33题 在Visual Basic中Print、Cls属于_。答1:第34题 为了使文本框同时具有水平和垂直滚动条应先把MultiLine属性设置为True然后再把ScrollBars属性设置为_ 。答1:第35题 当焦点进入文本框Text1时，要自动选定文本框开始的5个字符，则需要通过代码 Text1.SelStart = _ 和 Text1.SelLength = 5来实现。答1:第36题 在程序代码Label1.Caption = Visual Basic中，表示对象的是 _，表示属性的是 _。答1:答2:第37题 如果打印宽度 Width 是 80，并指定 Tab(90)则下一个打印将从列_ 开始答1:第38题 要判断在文本框中是否按了【Enter】键，应在文本框的_事件中进行判断。答1:第39题 要锁定文本框Text的内容，应将_属性设置为True。答1:第40题 要使文本框中的内容都被显示为“*”，则应将文本框的_属性修改为“*”。答1:第41题 要使指定的文本框成为焦点，则应采用文本框控件的_方法。答1:第42题 下面事件过程的功能是：输入3个整数x、y、z，按从大到小的顺序输出这3个数，在横线上填上适当内容。 Private sub command1_click() dim x!,y!,z! x=inputbox(x=) y=inputbox(y=) z=inputbox(z=) if_then t=x:x=y:y=t if_then t=x:x=z:z=t if yb and ab 的值为_。答1:第48题 为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将控件的_属性设置为_。答1:答2:第49题 设置一个单选按钮所代表选项的选中状态，应当在属性窗口中改变_属性。答1:第50题 用VB表达式来表示“x是小于105的非负数”为 _。答1:第51题 逻辑表达式not a b and 93,结果是_。答1:第52题 反复执行的程序段称为（ ）；进入循环体的条件称为（ ）；中止循环体执 行的条件称为（ ）。答1:答2:答3:第53题 当x的输入值为50，19，0，21和-1时，下列事件过程的执行结果是什么？（20分） Private Sub Command1_Click() Dim x%, s% s = 0 x = InputBox(x=) While x = 0 s = s + x x = InputBox(x=) Wend Print s=; s End Sub答1:第54题 设t=123n，下列事件过程的功能是求t不大于1000时最大的n值，在横线上填 上适当内容。 Private Sub Command1_Click() Dim t%, n% t = 1: n = 1 Do While (1) n = n + 1 (2) Loop Print n=; n - 1 End Sub答1:答2:第55题 下面事件过程的功能是：输出100以内个位数为8且能被整除的所有数，在横线上填上适当内容。 Private Sub Command1_Click() Dim i%, a% For i = 0 To (1) a = i * 10 + 8 If (2) Then GoTo l (3) l: Next i End Sub答1:答2:答3:第56题 下面事件过程的功能是求（*）（*）（*n）的值，在横线上填上适当内容。 Private Sub Command1_Click() Dim n%, i%, j&, s& n = InputBox(n=) j = 1: s = 0 For i = 1 To n j = (1) (2) Next i Print s=; s End Sub答1:答2:第57题 下面事件过程的功能是打印图案 * * * * * 在横线上填上适当内容。 Private Sub Command1_Click() Dim i%, j% For i = 1 To 5 Print Spc( (1) ); For j = 1 To (2) Print *; Next j (3) Next i End Sub答1:答2:答3:第58题 下面事件过程的功能是求100以内的素数，在横线上填上适当内容。 Private Sub Command1_Click() Dim i%, j%, m% m = 0 For i = 2 To 100 j = 2 Do While (1) If i Mod j = 0 Then (2) j = j + 1 Loop If (3) Then Print i,: m = m + 1 If m Mod 5 = 0 Then Print Next i End Sub答1:答2:答3:第59题 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() n = 5 f = 1 s = 1 For i = 1 To n t = (1) : s = s + t: f=(2) Next Print s End Sub 该事件过程的功能是计算1/1-1/2+1/3-1/4+1/5的值。请填空。答1:答2:第60题 下列循环结构控制的循环次数是：( )。 i=1 do i=i+1 loop until i=10答1:第61题 菜单分为_菜单和_菜单，菜单总与_相关连，设计菜单需要在_中设计。答1:答2:答3:答4:第62题 阅读下列程序段： Private Sub Form Click() Dim amr(10)As Integer For i=6 To 10 arr(i)=InputSox(请顺序输入1，2，3，4，5) Next i Print arr(6)+arr(arr(7)/arr(8) End Sub 程序运行后，单击窗体，在输入对话框中顺序输入1、2、3、4、5，输出结果为_。答1:第63题 下列过程的运行结果是_ 。 Private Sub Form_Click() Dim X(4) As Integer For I = 1 To 4 X(I) = I * I Next Print X(I) End Sub答1:第64题 在窗体添加一个命令按钮，然后编写如下事件过程，该过程的功能是用冒泡法将10个数排成升序，请在 处将程序补充完整。 Private Sub Command1_Click() Dim a(10) For i=1 To 10 a(i)=val(InputBox(请输入数组元素值,数据输入,0) Next i For i=_ For j=_ If a(j)a(j+1) Then b=a(j) : a(j)=a(j+1): a(j+1)=b End If Next j Next i For K=1 to 10 Print a(k); Next k End Sub答1:第65题 设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从15，第二维下标从-26，则相应的数组声明为 _。答1:第66题 Visual Basic的数组下标默认为_，可通过_ 语句使数组下标从1开始。答1:第67题 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Form_Click() Dim a(0 To 10) Dim p(1 To 3) K=0 For I=1 To 4 a(i)=I For j=1 To 3 P(j)=a(j*j) Next j For j=1 To 3 K=K+p(j)*2 Next j Print k Next i End Sub 程序运行后，单击命令按钮，输出结果是_。答1:第68题 下列程序的输出结果为_。 Private Sub Command1_Click() Dim a(1 To 20) Dim i For i=1 To 20 a(i)=i Next i For Each i In a() a(i)=20 Next i Print a(2) End Sub答1:第69题 下面事件过程的功能是：用随机函数产生10个10到100之间的随机整数存放到一维数组a中，并求a中的最小值及最小值在数组a中的位置，在横线上填上适当内容。 Private Sub Command1_Click() Dim a(10) As Integer, i%, max%, index% Randomize For i = 1 To 10 a(i) = Int(91 * Rnd + 10) Print a(i); Next i Print max = a(1): index = 1 For i = 2 To 10 If _ Then max = a(i): _ Next i Print 数组a中的最小值为：; max Print 最小值所在位置为：; index End Sub答1:第70题 数组元素个数可以改变的数组称为_；数组元素可以存放不同类型数据的数组称为_.答1:第71题 若要定义一个包含10个字符串元素，且下界为1的一维数组s，则数组说明语句为_。答1:第72题 若要定义一个元素为整型数据的二维数组a，且第一维的下标从0到5，第二维下标从-3到6，则数组说明语句为_。答1:第73题 控件数组是由一组类型和名字相同的控件组成，共享_。答1:第74题 控件数组中的每一个控件都有惟一的下标，下标值由_属性指定。答1:第75题 窗体上已有命令按钮Command1和标签Labe1，下列程序运行后，单击Command1按钮，标签Label1中显示的内容是_。 Option base 0 Private Sub Command1_Click() Dim a(5）As Integer, n As Integer For i = 1 To 5 a(i）= i n = n + a(i) Next i Label1 = n End Sub答1:第76题 程序中自动测试数组的下界用_函数来实现，上界用_函数来实现。答1:第77题 当数组首次被声明时，对所有数值型数组默认初值是_；字符串数组默认初值是_。答1:第78题 当用ReDim语句要改变动态数组的大小时，数组元素的值会_；用_关键字可保留数组元素原来的值。答1:窗体底端窗体底端窗体顶端窗体底端of the enemys attack. Troops, and troops were scattered, Qian Kangmin, Commander, Deputy Commander Ding Bingcheng and others heroic martyrdom. Turk foreign resistance members for the evacuation. Since then, Wujiang County Government District long Zhang Pinquan was killed by the Japanese. CPC jindapeng, Xiao Xin was trying to recommend thinking