VBA 字符串处理函数集

转自：http://blog.csdn.net/jyh_jack/article/details/2315345

mid(字符串，从第几个开始，长度)  在[字符串]中[从第几个开始]取出[长度个字符串] 
例如 mid("小欣无敌",1,3) 则返回 "小欣无"

instr(从第几个开始,字符串1,字符串2) 从规定的位置开始查找，返回字符串2在字符串1中的位置 
例如 instr(1,"小欣无敌","小") 则返回 1,instr(2,"小欣无敌","小")，则返回 0 。 0 表示未找到

InStrRev(字符串1,字符串2,从第几个开始) 从规定的位置开始，从后住前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。 
例如 instrRev("小欣无敌","小",2) 则返回 2 ; instrRev("小欣无敌","欣",1) 则返回 0 ,因为它从"小欣无敌"的第1个字开始往前查找，所以找不到 。0 表示未找到

left(字符串,长度) 从[字符串]的左边开始返回[长度]个字符 
例如 Left("小欣无敌,3) 则返回 "小欣无"

right(字符串,长度) 从[字符串]的右边开始返回[长度]个字符 
例如 Right("小欣无敌",3) 则返回 "欣无敌"

ucase(字符串) 返回[字符串]的大写形式，只对英文字符有效 
例如 ucase("xiaoXINwuDi") 则返回 "XIAOXINWUDI"

lcase(字符串) 返回[字符串]的小写形式，只对英文字符有效 
例如 lcase("xiaoXINwuDi") 则返回 "xiaoxinwudi"

asc(字符) 返回[字符]的ascii编码，若有多个字符，则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程 
例如 asc("小") 则返回 -12127 ; asc("小欣无敌") 也返回 -12127

chr(ASCii编码) 返回[Ascii]编码所代表的字符，和Chr()函数是一个可逆的过程 
例如 chr(-12127) 则返回 "小" ；chr(asc("小")) 则返回"小"(这里是为了说明asc和chr的可逆性，例用此特性可以加密文本)

trim(字符串) 返回去掉了前、后之后的[字符串] 
例如 trim("   小欣   无敌   ") 则返回 "小欣   无敌" ，中间的空格不受任何影响

string(个数,字符) 返回[个数]个[字符] 
例如 string(3,"小") 则返回 "小小小" , 而 string(3,"小欣无敌") 也返回 "小"，只有首字符才有效

space(个数) 返回[个数]个空格 
例如 space(5) 则返回 "   "

strconv(字符串,转换的类型) 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角 
例如 strconv("xiao",vbwide) 则返回 "ＸＩＡＯ",而strconv("ＸＩＡＯ",vbnarrow) 则返回 "XIAO" 
’备注 vbwide = 4 ,vbnarrow = 8

len(字符串) 返回[字符串]的长度 
例如 len("小欣无敌") 则返回 4