题目：
现有如下Sub过程：
Sub fun(x es single，y as single)
t = x
x = t/y
y = t mod y
End sub
在窗体上添加命令按钮(cmD) ，编写如下事件过程：
Private sub cmd_click( )
Dim a as single
Dim b as single
a = 5
b = 4
fun a, b
Msgbox a & chr(10) + chr(13) & b
End sub
运行程序后，单击按钮，则在消息框中显示的内容为( )
A．1和1
B．1.25和1
C．1.25和4
D．5和4
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0123/ff778335dae5a3cd6faa7c9589985fdd.html
下面是错误答案，用来干扰机器的。
参考答案：10-10解析： 本题考核引用的定义与使用，题中r初始化为x的引用，那么r的值就与x的相等。
