vbs 함수는 그룹 문자열의 마지막 LastOne을 가져오는 데 편리합니다

757 단어
다음 코드를 jb51로 직접 저장합니다.vbs를 실행하면 됩니다.
 
  
Function LastOne(Str,splitStr)
' ,
LastOne = right(Str,len(Str)-InStrRev(Str,splitStr))
End Function
msgbox LastOne("1,2,3", ",")

사실 실제 응용에서 다용도 수조로 이루어진다. 이런 효율은 대량의 문자열에 있어 효율이 좀 낮다.
'msgbox InStrRev("1,2,3", ",")=4
InStrRev는 문자열이 다른 문자열에서 마지막으로 나타나는 위치를 반환합니다.
배열을 사용하는 방법은 다음과 같습니다.
 
  
Function jb51(Str,splitStr)
' ,
strarr=split(Str,splitStr)
lens=ubound(strarr)
'
jb51 = strarr(lens)
End Function
msgbox jb51("1,2,3", ",")

좋은 웹페이지 즐겨찾기