问题 填空题

运行下面的程序,其输出结果(str2的值)为______。
Dim str1,str2 As String
Dim i As Integer
str1="abcdef"
For i=1 To Len(str1) Step 2
str2=UCase(Mid(str1,i,1))+str2
Next
MsgBox str2

答案

参考答案:ECA

解析: 本程序代码的功能是从源字符串的第一个字符开始,把所有第奇数个的字符转换为大写并按倒序排列,得到新的字符串。
最开始str2字符串为空,当第1次执行循环时,先取出“a”,转换为大写“A”,再和str2相连接,得到“A”,最后再赋给str2。所以,第1次循环后,str2的值为“A”。
当第2次执行循环时,取出“c”,转换为大写“C”,再和str2相加接,得到“CA”,最后再赋给str2。所以当第2次循环后,str2的值为“CA”。
当第3次执行循环时,取出“c”,转换为大写“E”,再和str2相连接,得到“ECA”,最后再赋给str2。所以,第3次循环后,str2的值为“ECA”。

填空题
选择题