在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a a=Array(2，4，6，8) j=1 For i=4 To 1 Step-2 s＝s+a(i)*j j=j*10 Next i Print 3 End Sub 运行上面的程序，单击命令按钮，其输出结果是 ( )
- A2
- B4
- C8
- D48
问题
在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写如下代
参考解析：
解析：由于语句Option Base 1的存在，则数组下标的下界是1。Array函数是用来给数组元素赋初值的，它要求数组必须是一个变体变量名。题中语句 Dim a a=Array(2，4，6，8) 是将2赋给a(1)，将4赋给a(2)，将6赋给。a(3)，将8赋给a(4)。 分析For循环语句，可知循环一共执行了两次。 i＝4时，执行语句s＝s+a(i)*j相当于s =0+a(4)*1(s未被初始化，则默认为0)得s的值为8。接着执行语句j＝j*10相当于j=1 *10，得j的值为10。 i＝2时，执行语句s＝s+a(i)*j相当于s＝8+a(2)*10(此次循环中的s和j均为上次循环所得结果值)得s的值为48。然后再执行语句j=j*l0。 最后执行的语句Prints，故最后的输出结果为s的值48。
分类：其他
相关推荐
-
1、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Pub
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub ...
-
2、在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则
在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)A3B6C9D12
-
3、在窗体（Name属性为Formal）上画两个文本框（其Name属性分别为T
在窗体（Name属性为Formal）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：程序运行后，在第一个文本框（T...
-
4、在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码。 P
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码。 Private Sub Commandl Click（ ） A=75IfA<60 Then x=lIfA<70 Then x=2IfA<80 Then x=3IfA<9...
-
5、在窗体上添加一个命令按钮(名为Commandl) ，然后编写如下事件过程：
在窗体上添加一个命令按钮(名为Commandl) ，然后编写如下事件过程： Private Sub Commandl_click() For i＝1 To 4 x＝4 For j＝1 To 3 x＝3 For k＝1 To 2 x＝x+6 Next k Next j Next i MsgBox x End SubA7B15C157D528
-
6、在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮
在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮Com-mand1 的 Click事件代码； Private Sub Command1_Click() Dim S As String*20 S=TextText End...