问题详情

运行下列程序：
Private Sub Command1_Click()
Dim A(10) As Integer
For i = 1 To 5
A(i) = i
A(i + 5) = i
Next i
For i = 1 To 10
s = s + A(i)
Next i
Debug.Print s
End Sub
单击按钮后，则在立即窗口内显示的结果是()。
A.5
B.10
C.30
D.出错信息