单项选择题

执行以下程序,在窗体上输出( )。
Private Sub Command1_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