VBScriptで特殊文字を含む文字列を分割します。

Question

複数の特殊文字を含む文字列があります。特殊文字で分割する必要があります。

例：

s = "apple+onion*abc/ki&jk" 

出力：、これはわずかに正規表現を変更している

Dim s : s = "apple+onion*abc/ki&jk" 
Dim r : Set r = New RegExp 
r.Global = True 
r.Pattern = "\+|\*|&|®|@|/" 
NewString = r.Replace(s,"_") 
wscript.echo NewString 
Tab = Split(NewString,"_") 
For i=LBound(Tab) to Ubound(Tab) 
    Msg = Msg & Tab(i) & vbCrlf 
Next 
wscript.echo Msg 

Answer 1

行うための別の方法を：

apple 
onion 
abc 
ki 
jk 

Answer 2

あなたは、この方法のようにそれを作ることができます

あなたが一緒に保存しておきたい言葉が彼らにスペースを持っている場合

Answer 3

もこの文字列を分割する方法の1 ..

Dim s:s="apple+onion*abc/ki&jk" 

ReDim words(-1) 


    For Each line In Split(s,"+") 
    For Each linetwo In Split(line,"*") 
    For Each linethree In Split(linetwo,"/") 

    For Each linefour In Split(linethree,"&") 

     ReDim Preserve words(UBound(words)+1) 
     words(UBound(words))=linefour 

    Next 

    Next 
    Next 
    Next 


for i=0 to 4 step 1 
    Msgbox(words(i)) 
Next