在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 　　　Option Base 1　　　 Private　Sub　Command1＿Click(　　) 　　　　　 Dim a 　　　　　 a＝Array(1，2，3，4，5) 　　　　　 For i＝1 To　UBound(a) 　　　　　　 a(i)=a(i)+i-1 Next Printa(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是

A．4

B．5

C．6

D．7

汽轮机滑销系统部件有（）、（）、（）、（）、猫爪、推拉螺栓、斜销、导向滑槽八种。