This is a book
如何取得第一个S的位置4和第2个S的位置7?
InStr([start, ]string1, string2[, compare])
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。
start如果省略,将从第一个字符的位置开始搜索。
Dim SearchString, SearchChar, MyPos
SearchString ="This is a book" String to search in.
SearchChar = "s" Search for "P".
MyPos = Instr(1, SearchString, SearchChar, 1) return 4
MyPos = Instr(MyPos+1, SearchString, SearchChar, 1) return 7