在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click()
s="ABBACDDCBA"
For I=6 To 2 Step - 2
x=Mid (s,I,I)
y=Left (s,I)
z=Right (s,I)
z=x&y&z
Next I
MsgBox z
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是______。

A．AABAAB
B．ABBABA
C．BABBA
D．BBABBA

开采冲击地压煤层的专项措施由（）制定