根据最新修订的《统计法》，个体工商户若提供了不真实或者不完整的统计资料，由县级以上人民政府统计机构责令改正，给予警告，可以处()万元以下的罚款。

A.10

B.5

C.3

D.1

程序运行后，单击命令按钮Command1时的输出结果为( )。
Private Sub Command1_Click()
Dim A(10),B(5)
For i=1 TO 10
A(i)=i
Next i
For j=1 To 5
B(j)=j*20
Next j
A(5)=B(2)
Print "A(5)=";A(5)
End Sub

A．A(5)=5

B．A(5)=10

C．A(5)=20

D．A(5)=40