以下程序的运行结果是（    ）

Private Sub Form_Click( )

    a= 1: b= 1

    Print"A="; a; "B="; b

    Call mult(a, b)

    Print"A=";a; "B=";b

End Sub

Sub mult(x, y)

    x=2* x

    y=3*y

End Sub

A、A=1 B=1

A=1 B=1

B、A=1 B=1

A=1 B=3

C、A=1 B=1

A=2 B=3

D、A=1 B=1

A=2 B=1