单选题假定有如下的Sub过程：
Sub sfml(x As Single，y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Commandd1_Click()
Dim a as single，b as single
a=5:h=4
sflln a,b
MsgBox a ＆ chr10．+chr13．＆ b
End Sub
打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为

A、 1和1
B、 1.25和1
C、 1.25和4
D、 5和4

【正确答案】 B

【答案解析】[解析] 本题考查的是VBA编程基础、参数传递、表达式。此题中的stun()函数，进行除法运算和求模运算，为命令按钮(名为Command1)编写事件，定义两变量a=5，b=4；调用此函数传递a、b的值给x、y进行运算，t=x=5，y=4；x=t/y=5/4=1.25(除法运算)；y=t Mod y=5 mod 4=1(求模运算)。