VB.NET計(jì)算數(shù)字相關(guān)函數(shù)使用方法
VB.NET編程語(yǔ)言一經(jīng)出現(xiàn),就憑借其強(qiáng)大的功能受到廣大開(kāi)發(fā)人員的青睞。它的應(yīng)用方式多樣化,應(yīng)用領(lǐng)域廣泛,比如在這里為大家介紹的VB.NET計(jì)算數(shù)字這一方法,就可以通過(guò)兩個(gè)函數(shù)的應(yīng)用方便的實(shí)現(xiàn)這一功能。#t#
對(duì)于Visual Basic開(kāi)發(fā)者來(lái)說(shuō),處理字符串和執(zhí)行各種各樣的字符串操作是十分重要的。當(dāng)你需要確定一個(gè)長(zhǎng)字符串中的字?jǐn)?shù)時(shí),你可以使用VB.NET中的一個(gè)簡(jiǎn)單函數(shù)Split來(lái)獲得所需要的結(jié)果。
Split函數(shù)使你能夠?qū)㈤L(zhǎng)字符串分離為單獨(dú)的字;但是如果在字與字之間不止一個(gè)空格,Split就會(huì)返回一個(gè)錯(cuò)誤的結(jié)果。為了防止這種情況發(fā)生,你可以在使用Split之前用Replace函數(shù)來(lái)替換多個(gè)空格的出現(xiàn)。列表A給出了一個(gè)例子。
VB.NET計(jì)算數(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
在這個(gè)VB.NET計(jì)算數(shù)字例子中,我創(chuàng)建了字符串strText,再將它設(shè)置成有多個(gè)字符的長(zhǎng)字符串。然后,我利用Replace函數(shù)來(lái)把出現(xiàn)的多個(gè)空格替換成一個(gè)空格。這樣做是為了把字符串strText準(zhǔn)備就緒,讓你能夠使用Split函數(shù)并提供正確的結(jié)果。接著,我將strText輸入Split函數(shù),并且得到了包括在字符串strText中的字?jǐn)?shù)。
注意:如果你跳過(guò)或注釋用來(lái)移除多余空格的循環(huán),結(jié)果是7個(gè)字。使用移除所有多余空格的循環(huán)后,結(jié)果才是正確的,4個(gè)字。
- 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計(jì)算數(shù)字的相關(guān)實(shí)現(xiàn)方法我們就為大家介紹到這里。