如何取得一个字符串从右边起第一个"/"的位置?

Question

for i = len(str) to 1 step -1 
  if mid(str,i,1)="/" then
     debug.print i 
  end if
next for算法很简单，如果要追求效率，可以考虑其他算法随手写的，没有经过调试

Answer 1

h_x_k说的对，如果你把他的这段程序放在一个函数里更好了
public function GetLeftStr(str as String) as integer
  for i = len(str) to 1 step -1 
    if mid(str,i,1)="/" then
      GetLeftStr=i
      exit function
    end if
  next for
end function