某人编写了下列程序，用来求10个整数(整数从键盘输入)中的最大值：

Private Sub Command1_Click()

Dim a(10) As Integer, max As Integer

For k=1 To 10

a(k)=InputBox("输入一个整数")

Next k

max=0

For k=1 To 10

If a(k)＞max Then

max=a(k)

End If

Next k

Print max

End Sub

运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的。程序需要修改。

下列修改中可以得到正确运行结果的是（）。

A．把Ifa(k)＞max Then 改为 If a(k)＜max Then

B．把max=a(k)改为a(k)=max

C．把第2个循环语句For k=1 To 10改为For k=2 To 10

D．把max=O改为max=a(10)

急性左心衰竭的一般处理不包括（）

A.体位：静息时明显呼吸困难者应半卧位或端坐位，双腿下垂以减少回心血量，降低心脏前负荷

B.四肢交换加压

C.吸氧

D.及时行心脏电复律术

E.饮食：进易消化食物，避免一次大量进食，不要饱餐及出入量管理