Mid("abc", 2, 1) '->b
left("abc",1) '->a
right("abc",1) '->c
Len("dSdSd") '->5
Replace("dSdSd", "S", "") '->ddd
mid还可以直接替换字符串中的字符
s = "12345"
Mid(s, 2, 1) = "d"
Debug.Print s '1d345 --替换1个字符,第2个字符被替换为d
space(10)
UCase("a") '->A
LCase("A") '->a
*****************************************************
InStr(开始位置,查找的字符串, 搜索的子字符串)
例:InStr(1, w,"SQ")
在VBA中InStrRev是执行反向查找的函数.
用法为:InStrRev(搜索的字符串, 查找的字符或字符串,开始查找的位置(倒数的位置))
*****************************************************
统计一个字符串中的某个字符的出现次数
Sub ttt()
Msgbox Len("dSdSd") - Len(Replace("dSdSd", "S", ""))
End Sub
*****************************************************
字符串比较:Like运算符
结果 = 字符串 Like 模式
如果字符串与模式匹配,结果为True,否则为False。但是如果Like两端的字符串和模式有一个为Null,则结果为Null。
模式中的字符 与模式匹配的字符串中的字符
任何单一字符
* 零个或多个字符
# 任何一个数字(0-9)
[字符列表] 字符列表中的任何一个字符
[!字符列表] 不在字符列表中的任何一个字符
其它字符(串) 与自身匹配
联系客服