假定有以下函数过程: Function Fun(S As String)As stringDim s1 As StringFor i=1 To Len(S) s1=LCase(Mid(S,i,1)+s1Next iFun=s1 End Function 在窗体上画—个命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Dim Str1 As String,Str2 As StringStr1=InputBox("请输入—个字符串")Str2=Fun(Str1)Print Str2 End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按钮后在窗体上的输出结果为______。
A.ABCDEFG
B.abcdefg
C.GFEDCBA
D.gfedeba
参考答案:D
解析:[知识点] 字符串函数[评析] 本题是把输入的字符串反向小写显示。程序运行过程为: S="abcdefg",LEN(S)=7, i=1,s1=LCASE(Mid(S,1,1))=LCASE("a")+s1="a"; i=2,s1=LCASE(Mid(S,2,1))=LCASE("b")+s1="ba"; i=3,s1=LCASE(Mid(S,3,1))=LCASE("c")+s1="cba"; i=4,s1=LCASE(Mid(S,4,1))=LCASE("d")+s1="dcba"; i=5,s1=LCASE(Mid(S,5,1))=LCASE("e")+s1="edcba"; i=6,s1=LCASE(Mid(S,6,1))=LCASE("f")+s1="fedcba"; i=7,s1=LCASE(Mid(S,7,1))=LCASE("g")+s1="gfedcba"。