在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码：Private Sub Commandl_Click()S=¨ABBACDDCBA¨For I=6 To 2 Step-2x=Mid(S,I,I)Y=Left(S,I)Z=Right(S,I)Z=x＆Y＆XNext IMsgBox ZEnd Sub打开窗体运行后,如果单击命令按钮,则消息框的输出结果是【 】。

A．AABAAB

B．ABBABA

C．B_ABBA

D．BBABBA

男性，70岁，大便秘结半年，后逐渐大便变细，近4个月来反复脓血样便，3～4次/天，经治疗稍缓解。5天前开始末排便，伴呕吐，不能进食。查体：全腹胀，对称，肠鸣音不亢进，未扪及肿块，肛查未扪及肿块。结肠镜检：距肛门10cm可见环形狭窄，呈菜花样外观，肠镜不能通过。最可能的诊断是

A．直肠癌

B．溃疡性结肠炎

C．血吸虫病肉芽肿

D．直肠多发性息肉

E．直肠炎性瘢痕狭窄