第4题: [填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（ ）
Do Until b＜0
a=InputBox("输入a的值")
a=Val(a)
b=InputBox("输入b的值")
b=Val(b)
a=a +b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是 【14】 。 参考答案:-3 答案解析:[解析] 本题程序运行后，共输入4组数据， a依次取值为5、3、1、-1，b依次取值为4、2、 0、-2。注意到循环条件是“b＜0”，所以当“a=1,b；旷时，还要再输入第4组数据，这时“a=-l，b
第13题: [单项选择]挡土墙的墙后填土为砂土，当几何条件相同的情况下，比较用朗肯土压力理论与库仑土压力理论计算的结果，下列几种判断中正确的是（）。 A. 用库仑土压力理论计算的主动土压力值大于用朗肯主动土压力理论计算值 B. 用库仑土压力理论计算的主动土压力值小于用朗肯主动土压力理论计算值 C. 用库仑土压力理论计算的主动土压力与用朗肯主动土压力理论计算的结果相等 D. 两者之间的大小不一定，视具体条件而异 参考答案:B
