在窗体上画一个命令按钮，然后编写如下事件过程。
Private Sub Command1_Click()
Dim a()
a=Array(1，3，5，7)
s=0
For i=1 To 3
s=s*10+a(i)
Next i
MsgBox s
End Sub
程序运行后，输出结果为( )。

A) 135
B) 357
C) 531
D) 753

简述自然条件和自然资源对产业布局的影响。