Vb.Net: Split String in eine Array
Wie teilt man einen Text mit Worten in einzelne Worte?
Aufgabe:
Ich möchte einen Text der aus zusammengestellten Wörtern besteht in ein Array aus einzelnen Wörtern umwandeln. Dabei sind die Wörter durch ein Semikolon im Text-String getrennt.
Lösung:
Mit Array=Split(String, Trennzeichen) kann man den String direkt umwandeln und dabei auch gleich ein Wort-Array bilden.
Beispiel Split:
Dim arrKeywords As String() = Split(sKeywords, ";")
|
Schema der Funktion Split()
Im Einzelschritt beim Split() in Array
In der Werteübersicht sieht man einfacher, wie der Text in einzelne Worte aufgeteilt wurde.
Im dargestellten Code wird der String sKeywords in ein Array: arrKeywords aufgeteilt.
sKeywords
|
"Word translate;Word;Translator;Translate"
|
arrKeywords
|
{Length=4}
|
(0)
|
"Word translate"
|
(1)
|
"Word"
|
(2)
|
"Translator"
|
(3)
|
"Translate"
|
Vb.Net Code
Komplettes Code Beispiel in vb.Net
In diesem Beispiel wird ein Text in einzelne Wort aufgeteilt, und anschliessend werden die Einzelnen Worte in einem For Each-Loop bearbeitet.
'------< Keywords >------
If Not sKeywords Like "" Then
Dim sURL_Keyword As String = ""
Dim sURL_Default As String = "~/Search"
Dim ctlKeywords As RadSiteMap = Master.FindControl("ctlKeywords")
If Not IsNothing(ctlKeywords) Then
'----< Split Keyword-String >----
Dim arrKeywords As String() = Split(sKeywords, ";")
'---< @Loop: Keyword Array >---
For Each sKeyword In arrKeywords
'--< Keyword >--
sKeyword.Trim()
If Not sKeyword Like "" Then
'-< add keyword to nodes >-
sURL_Keyword = sURL_Default & "/" & clsPath.encode_Segment_of_Path(sKeyword)
Dim objNode As New RadSiteMapNode(sKeyword, sURL_Keyword)
'< add >
ctlKeywords.Nodes.Add(objNode)
'</ add >
'-</ add keyword to nodes >-
End If
'--</ Keyword >--
Next
'---</ @Loop: Keyword Array >---
'----</ Split Keyword-String >----
End If
End If
'------</ Keywords >------
|
Im vb.Net Code im Einzelschritt in Visual Studio, Debugger.
Betrifft: Array, Split, Aufteilen, vb.Net Visual Basic