在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click( )
Dim a(10，10)
For m=2 To 4
For n=4 To 5
a(m，n)=m*n
Next n
Next m
MsgBox a(2，4)+a(3，5)+a(4，5)
End Sub
运行窗体后，单击命令按钮，MsgBox中应输出( )。
A．23
B．33
C．43
D．53
参考答案：C
解析： 本题中二维数组a，在二重循环中为数组部分进行了赋值。本题中最后使用到的二维数组的元素值为两个下标之积。所以本题结果为43。
Our English teacher was like a friend to us，and we all liked her．One day she came into the classroom and shouted．“Who did this?”She held up a piece of broken glass and asked，“Who __1__ the window?”She seldom became angry, __2__ this time she was． I broke the window．I had done __3__ by throwing a baseball．I didn’t want to admit(承认) It __4__ I didn’t have enough money to pay for a big window like that．“My father will be __5__,”I thought．At first I didn’t _6_ my hand，but later something strong in my heart suddenly made me stand up.“I did it，”I said __7_．How difficult it was for me to say that! My teacher __8__ a book from one of our book shelves and then began walking __9_ my desk. I was afraid that she was going to punish(惩罚)me． “I know you like collecting __10__ very much，”she said，looking down at my __11__ face. “Here is the hook about collecting stamps that you are looking for．Now，the book is__12__ and I shall not punish you．Remember，it’s because you _13_ the truth．” I couldn’t believe it ! My teacher wasn’t punishing me．I didn’t _14_ to pay for the broken window. And I got my favorite book! As time goes, the book is _15_，so is my wonderful teacher．But I will never forget the lesson the teacher gave me that day．
|
施工中发生如下事件：事件1：施工中，由于施工单位施工设备调度原因，C、F、J工作需使用同一台挖土机先后施工。事件2：在工程按计划进行4个月后（已完成A、B两项工作的施工），项目法人提出增加一项新的土方工程N，该项工作要求在F工作结束以后开始，并在G工作开始前完成，以保证G工作在E和N工作完成后开始施工。根据施工单位提出并经监理机构审核批复，该项N工作的土方工程量约为9000m3，施工时间需要3个月。事件3：经监理机构批准，新增加的土方工程N使用与C、F、J工作同一台挖土机施工。问题：（1）在不改变各工作历时的情况下，发生事件1后，施工单位如何调整计划，使设备闲置时间最少，且满足计划工期要求？（2）按事件2新增加一项新的土方工程N后，土方工程的总费用应为多少？（3）土方工程N完成后，施工单位提出如下索赔：①增加土方工程施工费用13.5万元；②由于增加土方工程N后，使租用的挖土机增加了闲置时间，要求补偿挖土机的闲置费用2.4万元；③延长工期3个月。施工单位上述索赔是否合理？说明理由。