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

施工现场的专职安全生产管理人员，同时可以兼作其他工作。