问题
填空题
运行如下程序段： x=1 y=1 z=1 For j=1 To 3For k=1 To 3 If j=1 Then x=x+y+z ElseIf j=2 Thenx=2*x+2*y十2*z Else x=3*x+3*y+3*z End If Next k Next jx的值应是 【15】 。
答案
参考答案：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。