国产探花免费观看_亚洲丰满少妇自慰呻吟_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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 全椒县| 洱源县| 涿州市| 土默特左旗| 广安市| 廉江市| 庄浪县| 建始县| 连江县| 霍山县| 枣庄市| 太白县| 葫芦岛市| 龙川县| 亚东县| 南投县| 鄄城县| 台中县| 房产| 天气| 津南区| 沙坪坝区| 江津市| 曲周县| 汝城县| 蓬莱市| 长垣县| 宜兰县| 阿鲁科尔沁旗| 连山| 桐乡市| 天台县| 行唐县| 同德县| 顺义区| 陇西县| 三河市| 德阳市| 津南区| 寿阳县| 中牟县|