在砌体结构中，当梁端下砌体的局部受压承载力不满足要求时，常采用( )。

A．减少梁上部荷载
B．在梁下设置混凝土垫块
C．增大梁的截面积
D．增大墙体厚度

设有如下程序： Private Sub Command1_Click() Dim Sum As Double， x As Double sum=0 n = 0 For i= 1 To 5x = n / in = n + 1sum=sum+x Next End Sub 该程序通过For循环计算一个表达式的值，这个表达式是

A．1+1/2+2/3+3/4+4/5

B．1+1/2+2/3+3/4

C．1/2+2/3+3/4+4/5

D．1+1/2+1/3+1/4+1/5