执行以下程序，在窗体上输出()。
Private SubCommand1_Click()
Dim a(20)
For j=1 To 20 Step 2
a(j)=j
Next j
Print a(1)+a(2)+a(3)
End Sub
A．4
B．5
C．6
D．7