问题 填空题

运行如下程序段: x=1 y=1 z=1 For j=1To 3 For k=1 To 3 If j=1 Then x=x +y+z Elself j=2 Then x=2*x+2*y+2*z Else x=3*x+3*y+3*z End If Next kNext 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。

单项选择题
单项选择题