阅读程序：
Option Base 1
Private Sub Form_Click()
　　Dim art,Sum
　　Sum=0
　　art=Array(1,3,5,7,9,11,13,15,17,19)
　　For i=1 To 10
　　If arr(i)/3=arr(i)\3 Then
　　Sum=Sum+art(i)
　　End If
　　Next i
　　Pdnt Sum
End Sub
程序运行后，单击窗体，输出结果为( )。

A．13

B．14

C．27

D．15

超高层建筑住宅结构体形比较复杂，水平结构（），一般多采用电动整体或分片提升提升脚手架模板工程技术施工。

A、受力大

B、受力小

C、面积小

D、面积大