错了一点
cr=0 '用来查找 "."
for i=len(str) to 1 step -1
if mid(str,i,1))="." OR mid(str,i,1)="/" then
cr=cr+1
if cr=2 then
exit for
end if
end if
next
现在i就是倒数第二个"."的位置了
right(str,i,len(str)-i)就是结果
cr=0 '用来查找 "."
for i=len(str) to 1 step -1
if(mid(str,i,1))="." then
cr=cr+1
if cr=2 then
exit for
end if
end if
next
现在i就是倒数第二个"."的位置了
right(str,i,len(str)-i)就是结果