在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。

现有如下事件过程： Private Sub Text1_Change()

Text2.Text=Mid(Text1,1,1)

End Sub

运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（　　）。

A．DataA

B．DataB

C．aData

D．aBase

用以区分病证类别的基本纲领为（）。

A.内外

B.表里

C.寒热

D.阴阳

E.虚实