设有如下程序：
Dim a()As Integer
Private Sub Command1_Click()
n=-5:m=6
ReDim a(n To m)
For i=LBound(a，1)To UBound(a，1)
a(i)=i
Next i
Print a(LBound(a，1))；a(UBound(a，1))
End Sub
程序运行后，单击命令按钮，则输出结果是 ______。

A．0 0

B．-5 0

C．-5 6

D．0 6

心包叩击音是由于

A．心室舒张期负荷过重，心肌张力减低与顺应性减退，心室舒张时，血液充盈引起室壁振动所致
B．舒张早期血液自左房迅速流入左室时，弹性尚好的瓣叶迅速开放后又突然停止所致瓣叶振动引起
C．舒张早期心室急速充盈时，由于心包增厚，阻碍心室舒张以致心室在舒张过程中被迫骤然停止导致室壁振动而产生
D．扩大的肺动脉或主动脉在心室射血时动脉壁振动以及在主、肺动脉阻力增高时，半月瓣瓣叶用力开启或狭窄增厚的瓣叶在开启时突然受限产生振动所致
E．房室瓣，多数为二尖瓣，在收缩中、晚期脱入左房，引起"张帆"样声响，因瓣叶突然紧张或其腱索的突然拉紧所致