Lotus中关于字符串处理的函数汇总

我们在使用LotusScript编写代理程序的时候,很多时候我们会遇到需要处理字符串的情况,本文就对平时遇到的相关函数做一个汇总。

 

Sub  Initialize
 
Dim  testStr  As   String
 testStr
= " 这是一个很普通的字符串 "
 
 
Msgbox   Right (testStr, 3
 
' 字符串 取右边三个
 
 
Msgbox   Left (testStr, 3
 
' 这是一  取左边三个
 
 
Msgbox  Rightbp(testStr,  5 )    
 
' 符串 从右边取5个字节的字串,一个汉字两个字节,故5只能取到两个字
 
 
Msgbox  Leftbp(testStr,  5
 
' 这是  从左边取5个字节的字串,一个汉字两个字节,故5只能取到两个字
 
 
Msgbox  Strright(testStr,  " 普通 "
 
' 的字符串 指定子串右边的子串
 
 
Msgbox  Strleft(testStr,  " 普通 "  )
 
' 这是一个很  指定子串左边的子串
 
 
Msgbox  Strrightback(testStr,  " 普通 "  ) 
 
' 的字符串 指定子串右边的子串
 
 
Msgbox  Strleftback(testStr,  " 普通 "   )
 
' 这是一个很 指定子串左边的子串
 
 
Msgbox  Strtoken(testStr,  " 普通 " 1 )  
 
' 这是一个很
 
 
Msgbox   Instr (testStr, " 普通 "   )   
 
' 6
 
 
Msgbox  Instrb(testStr, " 普通 "   )
 
' 11
 
 
Msgbox  Instrbp(testStr, " 普通 "  )
  
' 11
 
 
Msgbox   Mid (testStr,  5
 
' 很普通的字符串
 
 
Msgbox  Midbp(testStr,  5
 
' 一个很普通的字符串
 
End Sub
这个汇总会随时更新,也希望大家补充.

你可能感兴趣的:(Lotus)