填空题

运行下面程序，其输出结果(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 Integeri=1DoFor j=1 To i Step2k=k+jNexti=i+2Loop Until i＞8

填空题

计算型控件用【10】作为数据源。

相关试题

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