VB.NET編程語言一經(jīng)出現(xiàn)，就憑借其強大的功能受到廣大開發(fā)人員的青睞。它的應用方式多樣化，應用領域廣泛，比如在這里為大家介紹的VB.NET計算數(shù)字這一方法，就可以通過兩個函數(shù)的應用方便的實現(xiàn)這一功能。#t#

對于Visual Basic開發(fā)者來說，處理字符串和執(zhí)行各種各樣的字符串操作是十分重要的。當你需要確定一個長字符串中的字數(shù)時，你可以使用VB.NET中的一個簡單函數(shù)Split來獲得所需要的結果。

Split函數(shù)使你能夠將長字符串分離為單獨的字;但是如果在字與字之間不止一個空格，Split就會返回一個錯誤的結果。為了防止這種情況發(fā)生，你可以在使用Split之前用Replace函數(shù)來替換多個空格的出現(xiàn)。列表A給出了一個例子。

VB.NET計算數(shù)字列表A

Private Sub CountWords()  
Dim strText As String = 
"It's a wonderful world" 
Dim iCount As Integer  
Do While (strText.IndexOf
(Space(2)) >= 0)  
strTextstrText = strText.
Replace(Space(2), Space(1))  
Loop  
iCount = Split(strText, 
Space(1)).Length  
MsgBox(iCount.ToString())  
End Sub 

在這個VB.NET計算數(shù)字例子中，我創(chuàng)建了字符串strText，再將它設置成有多個字符的長字符串。然后，我利用Replace函數(shù)來把出現(xiàn)的多個空格替換成一個空格。這樣做是為了把字符串strText準備就緒，讓你能夠使用Split函數(shù)并提供正確的結果。接著，我將strText輸入Split函數(shù)，并且得到了包括在字符串strText中的字數(shù)。

注意：如果你跳過或注釋用來移除多余空格的循環(huán)，結果是7個字。使用移除所有多余空格的循環(huán)后，結果才是正確的，4個字。

Private Sub CountWords()  
Dim strText As String = 
"It's a wonderful world" 
Dim iCount As Integer  
Do While (strText.IndexOf
(Space(2)) >= 0) strTextstrText
 = strText.Replace(Space(2), 
Space(1)) Loop  
iCount = Split(strText, 
Space(1)).Length MsgBox
(iCount.ToString())  
End Sub 

VB.NET計算數(shù)字的相關實現(xiàn)方法我們就為大家介紹到這里。