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

Vbscript 查找字符的计数和位置-VB脚本,vbscript,Vbscript,如何在VB脚本中查找字符串中字符的计数及其索引值。 例如,本例中的“狮子是丛林之王”,如果n计数为3,位置为3、10和18。使用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.E

如何在VB脚本中查找字符串中字符的计数及其索引值。
例如,本例中的“狮子是丛林之王”,如果n计数为3,位置为3、10和18。

使用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基于一的字符串索引进行调整。

使用
for ii=1到Len(sMyString)
使用
mid(sMyString,ii,1)
函数进行计数…@Arsh:欢迎使用StackOverflow。你真的需要向我们展示你遇到麻烦的代码-这个网站是为了解决编码和开发问题,而不仅仅是给你代码。