在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1 Click() Dim Arr1(12)As Integer， Arr2(3)As Integer Dim Sum As Integer Sum = 2 For i=1 To 12 Arrl(i)= i Next i For i=1 To 3 Arr2(i)= Arrl(i*i) Next i For i = 1 To 3 Sum = Sum + Arr2(i) Next i Print Su
题目
在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1 Click() Dim Arr1(12)As Integer， Arr2(3)As Integer Dim Sum As Integer Sum = 2 For i=1 To 12 Arrl(i)= i Next i For i=1 To 3 Arr2(i)= Arrl(i*i) Next i For i = 1 To 3 Sum = Sum + Arr2(i) Next i Print Sum End Sub 程序运行后，单击命令按钮，在窗体上的输出结果为
A．16
B．24
C．32
D．36
相似考题
参考答案和解析
解析：本题中定义了两个一维数组，分别为Arr1和Arr2，由于使用了OptionBase1语句，因此其大小分别为10和3，接着执行3个For循环。在第1个循环中，对Arr1数组赋初值，每个元素的值与其下标相同，即Arrl(1)=1，Arrl(2)=2……。在第2个循环中，为Arr2数组的3个元素赋值，这3个值分别为Arrl数组第1、3、9个元素的值，即Art2(1)=1、Arr2(2)=4、Arr2(3)=9。在第3个循环中，计算数组Arr2中各元素的和，并将它赋给变量Sum。各元素的和为1+4+9=14，但由于变量Sum的初值为2，因此最后的输出结果为16。
更多“在窗体上画一个命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1Click() DimArr1(12)As ”相关问题
-
第1题：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1 Click()
a= Val(InputBox(“请输入一个整数”))
b=Val(InputBox(“请输入一个整数”))
Print a+b
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为 ______。
正确答案：46
46 解析：考查InputBox函数的使用。InputBox函数返回的数据类型默认位字符串类型。Val(x)函数表示把变量x转换为数值。本题要求通过InputBox函数分别输入两个数据，并同时被转换为数值，再相加得到结果，其中a值为12，b值为34，结果为a+b=46。 -
第2题：
在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为__________。
正确答案：
20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。 -
第3题：
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( )
A．123345
B．468
C．123
D．345
正确答案：B
解析：InputBox函数返回的是字符串类型值，故x应为字符串类型。执行语句Print x+345时，x的类型自动转换为整型。相当于执行了123、345两数的和，故窗体上的输出内容为468。 -
第4题：
在窗体中添加一个名称为Coml的命令按钮，然后编写如下程序：
正确答案：
3【解析】本题考查VBA程序的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用，此时形参的变化不会返回到实参；若用ByRef声明，说明此参数为传址调用，此时形参的变化将会返回到实参；没有说明传递类型，则默认为传址传递。此题中形参P被说明为ByVal传值形式的整型量，当运行Cornl-click过程时调用s函数，实参i传送其值给形参P，P发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递，所以实参i的值不发生变化，if语句中的判断条件为假，所以会直接执行MsgBox i语句后输出3。 -
第5题：
在窗体上画一个名称为Cl的命令按钮，然后编写如下事件过程：
程序运行后单、旨命令按钮，如果输入4，则在窗体上显示的内容是（ ）。A. 5
B. 6
C. 9
D. 10
正确答案：D
本题考查VBA程序设计中的循环知识。在本题的程序中．每次循环a都会加1，所以关键问题就是循环共执行多少次。我们已知外循环共执行4次，每次外循环中内循环都执行1次，则内循环共执行的次数为1+2+3+4=10次。
-
第6题：
在窗体上画一个命令按钮，其名称为Command]，然后编写如下事件过程：
程序运行后，单击命令按钮，消息框输出的是（ ）A. 48
B. 72
C. 96
D. 128
正确答案：B
奉题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。浅们只需要注意这两个数组元素在循环中被赋了什么值，当i=3 j=3时，al(3，3)=3+3=6，a2(3。3)= al(3，3)+3+3=12．所以最后二者之积为72。
-
第7题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：本题考查字符串函数。 String返回n个字符。如果为字符串，则返回n个字符串的首字符。据此，本题的正确答案为A，即返回3个“Visual Basic”的首字母“V”。 -
第8题：
在窗体上画一个命令按钮。然后编写如下事件过程：
程序运行后，连续单击三次命令按钮，输出的结果是
A．7 36
B．15 72
C．1 5 108
D．72 256
正确答案：C
因为X重新赋值，所以每次循环结果一样。计算一次即可，结果为l5。对于y，内层循环一次，其值为3。共循环12次，所以其值为36。当多次单击命令按钮时，x是普通变量，每次单击只是重新计算一次，执行结果一样，仍然为15。但Y是静态变量，程序没有结束运行之前，仍然保持上一次的值。每单击一次按钮，它将累计本次执行结果。执行三次，结果为36+36+36=108。选择C。 -
第9题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A)机床
B)车床
C)钻床
D)轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。 -
第10题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
正确答案：
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。 -
第11题：
在窗体上画一个命令按钮，然后编写如下事件过程：
程序运行后，依次输入3，2，1，0，-1，-2，则输出结果是__________。
正确答案：
-3【解析】本题考查VBA中循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题是一个先判断条件的While循环，每次循环中有两次输入，共循环3次；由于在每次循环中均会重新对a、b、C进行赋值，所以只需要考虑最后一次循环就可以，在最后一次循环中c等于最后两次输入的值之和也就是-3 -
第12题：
单选题在窗体上画一个命令按钮，然后编写如下事件过程：程序运行后，单击命令按钮，输出结果是（ ）。AABCDE
B1 2 3 4 5
Cabcde
D出错信息
正确答案： A解析：
Asc函数为取ASCII码，Chr函数为从ASCII码计算字符，所以输出A与其后的5位连续字母。 -
第13题：
在窗体上画一个名称为Cl的命令按钮，然后编写如下事件过程：
程序运行后单击命令按钮，如果输入4，则在窗体上显示的内容是（ ）。
A)5
B)6
C)9
D)10
正确答案：D
本题考查VBA程序设计中的循环知识。在本题的程序中，每次循环a都会加1，所以关键问题就是循环共执行多少次。我们已知外循环共执行4次，每次外循环中内循环都执行i次，则内循环共执行的次数为1234=10次。 -
第14题：
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
程序运行后，单击命令按钮，其输出结果为__________。
正确答案：
9【解析】本题考查VBA中程序设计的知识。对于这个问题，首先注意到循环的次数为6次；然后注意到循环内的两个If语句为顺序关系而不是嵌套关系，第一个If语句只有第一次循环时才会满足；第一次循环时首先执行第一个If语句把x赋值为1，然后执行第二个If语句；以后各次循环均照此分析，前4次循环x自加l，后两次循环X自加2，最后输出结果为9。 -
第15题：
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
程序运行后，单击命令按钮，消息框输出的是系统当前日期和当前时间。
正确答案：
72【解析】本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值，当i=3，j=3时，al(3，3)=3 3=6，a2(3，3)=al(3，3) 3 3=12，所以最后二者之积为72。 -
第16题：
在窗体上画一个命令按钮，然后编写如下事件过程：
运行后的输出结果是______。
A．5
B．1
C．2
D．6
正确答案：B
解析：“IIf(条件，表达式1，表达式2)”根据“条件”返回“表达式”或“表达式2”的值。 -
第17题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A. 机床
B. 车床
C. 钻床
D. 轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的a(2)就是数组的第三个元素即“钻床”。
-
第18题：
在窗体上画一个名为Commandl的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是（ ）。A. 4
B. 5
C. 6
D. 8
正确答案：A
A) 【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k，因此M(6)数据为6，M(8)为4。
-
第19题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。
正确答案：A
A) 【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。
-
第20题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第21题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是
A． 123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。 -
第22题：
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为：
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。
-
第23题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
正确答案：
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。 -
第24题：
单选题设有如下通用过程：在窗体上画一个名为Command1的命令按钮，然后编写如下的事件过程：程序运行后单击命令按钮，输出结果是（ ）。AABCDEF
Babcdef
CAFBECD
DDEFABC
正确答案： C解析：
在循环中，利用Mid函数使得变量tStr的值不断变化，然后通过命令按钮的单击事件调用循环所在的函数，UCase函数将Fun函数返回的结果字符串中的小写字母转换成大写字母。