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

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

Split函數(shù)使你能夠?qū)㈤L字符串分離為單獨(dú)的字;但是如果在字與字之間不止一個空格，Split就會返回一個錯誤的結(jié)果。為了防止這種情況發(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，再將它設(shè)置成有多個字符的長字符串。然后，我利用Replace函數(shù)來把出現(xiàn)的多個空格替換成一個空格。這樣做是為了把字符串strText準(zhǔn)備就緒，讓你能夠使用Split函數(shù)并提供正確的結(jié)果。接著，我將strText輸入Split函數(shù)，并且得到了包括在字符串strText中的字?jǐn)?shù)。

注意：如果你跳過或注釋用來移除多余空格的循環(huán)，結(jié)果是7個字。使用移除所有多余空格的循環(huán)后，結(jié)果才是正確的，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ù)字的相關(guān)實(shí)現(xiàn)方法我們就為大家介紹到這里。