单选题
设有如下通用过程：
设有如下通用过程：
Public Function Fun（xStr As Stri ng）As Stri ng
Di mt Str As Stri ng ，strLAs Integer
tStF＝＂＂
strL＝Len（xStr）
i ＝1 Do While i ＜＝strL／2
tStr ＝Tstr ＆Mid（xStr ，i ，1）＆Mid（xStr ，strL－i＋1，1）
i ＝i ＋l
Loop
Fun ＝tStr
End Function
在窗体上画一个名称为Co mmand1的命令按钮。然后编写如下的事件过程：
Private Sub Co mmandI＿Click（）
Di mS1As Stri ng
S1＝＂abedef＂
Pri m UCase（Fun（S1））
End Sub
程序运行后，单击命令按钮，输出结果是（ ）。
发布于 2022-05-11 09:59:46
登录后免费查看答案
关注者
0
被浏览
8
