单项选择题

以下程序运行后的输出结果是 ______。
Sub add(x,y)
x=x+y
Print "x=";x;",y=";y
End Sub
Private Sub Command1_Click()
x=1
y=1
Call add((x),(y))
Print"x="; x;",y=";y
End Sub

A.x=1,y=1
x=2,y=2
B.x=2,y=1
x=1,y=1
C.x=1,y=1
x=1,y=1
D.x=2,y=1
x=2,y=1