上海市规模最大水环境治理工程——苏州河综合整治取得显著成绩，对消除苏州河黑臭、改善城

某团级武警部队伙食费现金收入应归入（）.

A.商品销售收入

B.服务业收入

C.其他收入

D.城乡个体经营收入

无结石性胆囊炎发生的主要原因是（）

A.胆道蛔虫导致感染

B.致病菌随血道扩散

C.迷走神经功能亢进

D.胆汁淤滞

E.胆汁中胆固醇过多

诊断心力衰竭首选的检查是（）

A.胸壁X线片

B.超声心动图

C.左心室造影

D.运动负荷实验

E.心电图

客户申请改变供电电压等级的，选择使用（）流程。

A.改类；

B.改压；

C.新装；

D.减容。

下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值。请完善下列程序。
Function SumD(n As Integer)As Single
s=1
i=1
Do
i=i+1
S=S+1/i
Loop Until ______
SumD=s
End Function
Private Sub Form_Click( )
sum1=SumD(100)
Print "sum1=" : sum1
End Sub