阅读下列程序：
Private Sub Command1_Click()
Dim i As Integer，k As Integer
　　k=2
　　For i=1 To 3
　　　　Print Fun(k)；
　　Next
End Sub
Function Fun(j As Integer)
Static b
　　a=0
　　a=a+1
　　b=b+1
　　Fun=a*b+j
End Function
程序运行后，单击命令按钮输出结果是

A．234

B．345

C．567

D．356

关于心脏各种震颤的描述，不正确的是（）。

A．主动脉瓣狭窄——胸骨右缘第2肋间舒张期震颤

B．二尖瓣狭窄——心尖部舒张期震颤

C．动脉导管未闭——胸骨左缘第2肋间及其附近连续性震颤

D．室间隔缺损——胸骨左缘第3～4肋间收缩期震颤

E．肺动脉瓣狭窄——胸骨左缘第2肋间收缩期震颤