问题
填空题
运行如下程序段: x=1 y=1 z=1 For j=1 To 3 For k=1 To 3 If j=1 Then x=x+y+z Else If 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的值应是______。
答案
参考答案: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。