下列程序的执行结果是( )。 Privaae Sub Form_Activate Dim score(3)As Integer,total As Integer Dim aa_score As Variant score(1)=50:score(2)=14:score(3)=36 total=0:i=0 For Each aa_score In score i=i+1 total=total+aa_score Print i,aa_score,total Next End Sub

A．1 0 0 2 50 50 3 14 64 4 36 100

B．1 50 50 2 14 64 3 36 100

C．0 50 50 1 14 64 2 36 100 3 36 100

D．0 0 0 1 50 50 2 14 64