查找字符 - VB脚本的计数和位置

Question

如何在VB脚本中找到字符串中字符的计数及其索引值 例如＆＃34;狮子是丛林之王＆＃34;在这个例子中，如果n count是3，位置3,10和18。

Answer 1

使用RegExp - 如：

Option Explicit

Dim s : s     = "Lion is king of jungle"
Dim c : c     = "n"
Dim r : Set r = New RegExp
r.Global  = True
r.Pattern = c
Dim ms : Set ms = r.Execute(s)
WScript.Echo "found", ms.Count, "tokens of", c
Dim m
For Each m In ms
    WScript.Echo m.FirstIndex + 1
Next

输出：

cscript 29181557.vbs
found 3 tokens of n
4
11
19

+ 1调整为VBScript的一个基于字符串索引。