在窗体上画3个名称为Command1的命令按钮作为控件数组，从左到右，控件数组下标分别为0、1、2，界面如

Private Sub Command1 Click(Index As Integer)

Dim s As String

Select Case Index

Case 0

s= "飞机"

Case 1

s="汽车"

Case 2

s= "火车"

End Select

MsgBox s， Index

End Sub

执行程序后，单击中间那个按钮，显示的对话框形式为

A．

B．

C．

D．