单击命令按钮时，下列程度段的执行结果为( )。
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a=2:b=4:c=6
Call S1(a, B)
Print "a="; a; "b="; b; "c="; c
Call S2(a, B)
Print "a ="; a; "b ="; b; "c="; c;
End Sub
Private Sub S1(x As Integer, y As Integer)
Dim c As Integer
x=2*x:y=y+2:c=x+y
End Sub
Sub S2(x As Integer, ByVal y As Integer)
Dim e As Integer
x=2*x:y=y+2:c=x+y
End Sub

A．a=4 b=6 e=6
a=4 b=6 e=6

B．a=8 b=6 c=6
a=8 b=6 c=6

C．a=4 b=6 e=6
a=8 b=6 e=6

D．a=8 b=6 c=6
a=4 b=6 c=6