下面某校学生会贴出的告示有4处表述不当，请找出来并修改。（4分） 

招领启示

高二（3）班王晓明同学9月5日在食堂吃饭时捡到一个黑色皮夹，内有一张饭卡和105元人民币。请丢失钱夹的同学速来认领。 

学生会

2012年10月15日

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