以下程序段运行后消息框的输出结果为______。
s＝"Access"
Dim str As String
For i＝1 To Len(s)
str＝UCase(Mid(S,I,I))+str
Next i
MsgBox str

【参考答案】

(答案]SSECCA