填空题

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

【参考答案】

ECA

<上一题目录下一题>

热门试题

填空题

运行下面程序，其运行结果k的值为【14】，其最里层循环体执行次数为【15】。 Dim i，j，k As Integer i=1 Do For j=1 To i Step2 k=k+j Next i=i+2Loop Until i＞8

填空题

【11】报表也称为窗体报表。

相关试题

【12】函数返回当前系统日期和时间。