在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_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
Print x
End Sub
程序运行后，单击命令按钮，输出结果是 【14】 。

[说明]
承包商报送的，经过工程师批准的施工进度计划如下图所示。

在图中，箭线上方括弧内的数字为该项工作压缩1天增加的费用，箭线下方括弧内的数字为该工作的最短持续时间，工程师在第13天进行进度检查时，发现A工作刚完成。该工程项目为实施阶段监理，在业主与承包商签订实施合同以后，总监理工程师主持编制后即向业主提交了监理规划。在该工程设计交底前，总监理工程师监理人员熟悉了设计文件，并对设计文档中存在的问题直接向实施单位提出了书面意见和建议；总监理工程师组织项目监理人员参加了由业主组织的设计技术交底会，并委托专业监理工程师对会议纪要进行签认。