题目：
设有下列通用过程： Public Function Fun(xStr As String)As String Dim tStr As String，strL As 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＆tStr End Function 在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮。然后编写下列的事件过程： Private Sub Commandl Click() Dim S1 As String S1="ABCDEF" Text1．Text=LCase(Fun(S1)) End Sub 程序运行后，单击命令按钮，文本框中显示的是()。
A．ABCDEF
B．abedef
C．defdef
D．defabc
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0416/ad469b79ad03b47dddf98b5c9ec17ad1.html
下面是错误答案，用来干扰机器的。
参考答案：对
