VB.NET Split使用方法宝典-51CTO.COM

在学习中我们要善于总结，总结对我们有很大的帮助，可以加快我们学习的步伐。在这里我给大家总结一下关于VB.NET Split使用方法，希望朋友们在工作学习中总结出更多的方法。

VB.NET Split使用方法一. 简单的split分割字符串

首先我们拿了一个带多个空格的字符串来做分割. 我们分配一个New Char() array 保存为String() array 来储存我们例子中的那些分割后的单词.最后，我们用loop循环来遍历和显示这些分割后的字母集合.

=== Program that uses Split on String (VB.NET) ===  
Module Module1  
Sub Main()  
' We want to split this input string  
Dim s As String = "Our website address is www.51cto.cn" 
' Split string based on spaces  
Dim words As String() = s.Split(New Char() {" "c})  
' Use For Each loop over words and display them  
Dim word As String  
For Each word In words  
Console.WriteLine(word)  
Next  
End Sub  
End Module 
=== Output of the program ===  
Our   
website   
address   
is

VB.NET Split使用方法二. 分割一个完整文件路径

Here we see how you can Split a file system path into separate parts using Visual Basic .NET. We use a New Char() array with one string, "\""c, and then loop through and display the results. 
=== Program that splits file path (VB.NET) ===  
Module Module1  
Sub Main()  
' The file system path we need to split  
Dim s As String = "C:\Users\Sam\Documents\Perls\51cto" 
' Split the string on the backslash character  
Dim parts As String() = s.Split(New Char() {"\"c})  
' Loop through result strings with For Each  
Dim part As String  
For Each part In parts  
Console.WriteLine(part)  
Next  
End Sub  
End Module 
=== Output of the program ===  
C:  
Users  
Sam  
Documents  
Perls

VB.NET Split使用方法三. 根据单词分割语句这里用了正则表达式

Often you need to extract the words from a String or sentence in VB.NET. The code here needs to handle punctuation 
and non-word characters differently than the String Split method. Here we use Regex.Split to parse the words. 
=== Program that splits words (VB.NET) ===  
Imports System.Text.RegularExpressions  
Module Module1  
Sub Main()  
' Declare iteration variable  
Dim s As String  
' Loop through words in string  
Dim arr As String() = SplitWords(".Net Fans's QQ group No is 40797788, man!")  
' Display each word. Note that punctuation is handled correctly.  
For Each s In arr  
Console.WriteLine(s)  
Next  
Console.ReadLine()  
End Sub  
''' <summary> 
''' Split the words in string on non-word characters.  
''' This means commas and periods are handled correctly.  
''' summary> 
Private Function SplitWords(ByVal s As String) As String()  
'  
' Call Regex.Split function from the imported namespace.  
' Return the result array.  
'Return Regex.Split(s, "\W+")  
End Function  
End Module 
=== Output of the program ===  
第一行是空白  
Net ---- 这个是第2行了  
Fans  
s   
QQ   
group   
No   
is   
40797788  
man  
Description of the example code. In the Main() subroutine you can see 
that two variables are declared. The second variable is a String() array that receives the results from the Private Function next.   
Description of the Regex. The Function shown in the example calls 
the Regex.Split method, which can be accessed with dot notation, with no instance necessary. 
The second parameter to the method is a regular expression pattern.   
Description of the Regex pattern. The pattern "\W+" is used, and this means "1 or more non-word characters".
 This pattern will match punctuation and spaces. Therefore, all those characters will be used as delimiters.

VB.NET Split使用方法四. 分割一个文本文件中的每行

Here we see one way to Split each line in a file using File.ReadAllLines and Split.
 We have a comma-separated-values CSV file, and want to print out each value and its row number. 
Here is the input file "example.txt". [See below]   
The Split code example follows. It first reads in the file with ReadAllLines. 
This function puts each line in the file into an array element. The example next Splits on ","c. 
The final comment shows the output of the program. 
=== Input file used ===  
frontal,parietal,occipital,temporal  
pulmonary artery,aorta,left ventricle 
=== Example program that splits lines (VB.NET) ===  
Imports System.IO  
Module Module1  
Sub Main()  
Dim i As Integer = 0 
'vb.net  
' Loop through each line in array returned by ReadAllLines  
Dim line As String  
For Each line In File.ReadAllLines("example.txt")  
' Split line on comma  
Dim parts As String() = line.Split(New Char() {","c})  
' Loop over each string received  
Dim part As String  
For Each part In parts  
' Display to Console  
Console.WriteLine("{0}:{1}", i, part)  
Next  
i += 1  
Next  
End Sub  
End Module 
=== Output of the program ===  
0:frontal  
0:parietal  
0:occipital  
0:temporal  
1:pulmonary artery  
1:aorta  
1:left ventricle

【编辑推荐】