国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > .NET > 正文

如何在VB.NET中利用Split和Replace函數計算字數_.Net教程

2024-07-10 12:50:55
字體:
來源:轉載
供稿:網友

推薦:細說.Net開發中的Visual Basic.Net
概要 VB正在不斷地發展中,它具備了以前VB編程人員作夢都想擁有的性能,想象一下你將隨心所欲的利用這些性能,是不是很令人激動?然而,這個計劃于2001年第四季度上市銷售的VB版本可能會給你帶來些小麻煩,因為要完全掌握它需要一個較長的學習周期,而且其中

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

列表A

Private Sub CountWords()Dim strText As String = "It's a wonderful world"Dim iCount As IntegerDo While (strText.IndexOf(Space(2)) >= 0)strText = strText.Replace(Space(2), Space(1))LoopiCount = Split(strText, Space(1)).LengthMsgBox(iCount.ToString())End Sub

在這個例子中,我創建了字符串strText,再將它設置成有多個字符的長字符串。然后,我利用Replace函數來把出現的多個空格替換成一個空格。這樣做是為了把字符串strText準備就緒,讓你能夠使用Split函數并提供正確的結果。

接著,我將strText輸入Split函數,并且得到了包括在字符串strText中的字數。注意:如果你跳過或注釋用來移除多余空格的循環,結果是7個字。使用移除所有多余空格的循環后,結果才是正確的,4個字。

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

分享:怎么在ASP.NET中使用SmtpMail發送郵件
在ASP中,就可以通過調用CDONTS組件發送簡單郵件,在ASP.NET中,自然也可以。不同的是,.Net Framework中,將這一組件封裝到了System.Web.Mail命名空間中。 一個典型的郵件發送程序如下: <%@ Import Namespace=System.Web.Mail %> <script runat=server

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 萝北县| 峡江县| 大兴区| 巴彦淖尔市| 崇信县| 潞城市| 花垣县| 孝义市| 翼城县| 中牟县| 教育| 高邮市| 呼图壁县| 乃东县| 寻甸| 青河县| 乌兰察布市| 龙门县| 恩施市| 华亭县| 烟台市| 梧州市| 松滋市| 密山市| 大荔县| 富民县| 珠海市| 洛浦县| 十堰市| 牙克石市| 普安县| 利辛县| 彰化县| 安远县| 浠水县| 正宁县| 桐梓县| 天门市| 镇宁| 嘉禾县| 宿迁市|