患儿男，7岁。6小时前由货车上跌下，伤后即有呼吸困难，并逐渐加重。入院查体：脉搏130次/分，血压10.7/6.7kPa，呼吸22次/分，颜面发绀，吸气性呼吸困难，颈上胸部有皮下气肿，气管向左移位，右侧呼吸音消失。其诊断首先考虑（）

A.多根多处肋骨骨折

B.血胸

C.血心包

D.开放性气胸

E.张力性气胸

有下面的程序段，其功能是按图1所示的规律输出数据( )。

Dim a(3,5)As Integer
For i 1 To 3
For j=1 To 5
a(i,j)=i+j:Print a(i,j);
Next
Print
Next
若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是( )。