某场地在5.0m处进行扁铲侧胀试验，地下水位为2.0m，水位以上土的重度为18kN/m³，水位以下土重度为19kN/m³，试验前率定时膨胀至0.05mm及1.10mm的气压实测值分别为△A=10kPa，△B=50kPa，试验时膜片膨胀至0.05mm、1.10mm及回到0.05mm的压力分别为A=35kPa、B=210kPa、（C=30kPa，调零前压力表初读数Zm=5kPa，据《岩土工程勘察规范》该试验点的侧胀水平应力指数为（）。

A.0.05 

B.0.07 

C.0.09 

D.1.10

在窗体上画—个命令按钮，其名称为Command1，然后编写如下程序：
Function M(x As Integer ,y As Integer)
M=IIf(x＞y,x,y)
End Function
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=100
b=200
Print M(a,B)
End Sub
程序运行后，单击命令按钮，输出结果为 【15】 。