填空题

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

【参考答案】

SSECCA