推薦:細說.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
新聞熱點
疑難解答
圖片精選