单项选择题

单击命令按钮时，下列程度段的执行结果是( )。
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 S 1(x As Integer, Y As Integer)
Dim CAs Integer
x=2 * x:y=y+2:c=x+y
End Sub
Sub S2(x As Integer, ByVal Y As Integer)
Dim eAs Integer
x=2 * x:Y=Y+2:e=x+y
End Sub