下面程序的运行结果是( )。
Private Sub Commandl_Click()
a=1.5
b=1.5
Callfun(a,b)
Printa,b
End Sub
Private Subfun(x,y)
x=y*y
y=y+x
End Sub

A．2．25 1.5

B．1.5 2.25

C．2.25 3.75

D．0.75 1.5