运行下面程序,其输出结果(str2的值)为【 】。 Dim str l,str2 As String Dim I As Integer str l= “abcdef” For l To Len (strl) Step2 str2=UCase (Mid (

admin2010-01-05  37

问题 运行下面程序,其输出结果(str2的值)为【  】。
Dim str l,str2 As String
Dim I As Integer
str l= “abcdef”
For l To Len (strl) Step2
str2=UCase (Mid (strl,I ,1))十str2
Next
MsgBoxstr2

选项

答案ECA

解析 本程序代码的功能是,从源字符中的第一个字符开始,把所有第奇数个的字符转换为大写并按倒序排列得到新的字符串。
最开始str2字符串为空。当第—次执行循环时,先取出“a”在转换为大写“A”,在和str2相连接,得到“A”,最后在赋给str2。所以,第一次循环后,str2的值为“A”
当第二次执行循环时,取出“c”,在转换为大写“C”,在和str2相连接,得到“CA”,最后在赋给str2。所以,第二次循环后,str2的值为“CA”
当第三次执行循环时,取出“e”,在转换为大写“E”,在和str2相连接,得到“ECA",最后在赋给str2。所以,第二次循环后,str2的值为“ECA”至此,循环结束,str2最终结果为“ECA"。
转载请注明原文地址:https://kaotiyun.com/show/3Xwp777K
0

随机试题
最新回复(0)