设有下列通用过程： 　　Public Function Fun(xStrAs String)As String 　　Dim tStrAs String，strLAs Integer 　　tStr="" 　　strL=Len(xStr) 　　i=strL／2 　　DO While i<=StrL 　　tStr=tStr＆Mid(xStr，i+1，1) 　　i=i+1 　　Loop 　　Fun=tStr＆tStrEnd Function 　　在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮。然后编写下列的事件过程： 　　Private SubCommandlClick() 　　 Dim S1As String 　　S1="ABCDEF" 　　 Text1．Text=LCase(Fun(S1)) 　　End Sub 　　程序运行后，单击命令按钮，文本框中显示的是()。