填空题 运行如下程序段：
x=1
y=1
Z=1
For j=1 To 3
For k=1 TO 3
If j=1 Then
x=x+y+2
ElseIf j=2 Then
x=2*x+2*y+2*z
Else
x=3*x+3*y+3*Z
End If
Next k
Next j
x的值应是 【15】 。

  • 1、
【正确答案】 1、2346    
【答案解析】[知识点] 模块/VBA程序设计基础
[评析] 当j＝1时，内层循环执行x＝x+y+z=x+2三次，所以x=7；
当j=2时，内层循环执行x=2*x+2*y+2*z=2*x+4三次，所以x=84；
当j=3时，内层循环执行x=3*x+3*y+3*z=3*x+6三次，所以x=2346。
则最后的结果是：x＝2346。