Anonymous user
Tokenize a string: Difference between revisions
→{{header|VBA}}
Line 2,342:
// create string by joining array of strings with .
string joined = string.joinv(".", words);</lang>
=={{header|VBA}}==
<lang vb>Sub Main()
Dim temp() As String
temp = Tokenize("Hello,How,Are,You,Today", ",")
Display temp, Space(5)
End Sub
Private Function Tokenize(strS As String, sep As String) As String()
Tokenize = Split(strS, sep)
End Function
Private Sub Display(arr() As String, sep As String)
Debug.Print Join(arr, sep)
End Sub</lang>
{{Out}}
<pre>Hello How Are You Today</pre>
=={{header|VBScript}}==
| |||