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

Split函數(shù)使你能夠將長字符串分離為單獨的字；但是如果在字與字之間不止一個空格，Split就會返回一個錯誤的結果。為了防止這種情況發(fā)生，你可以在使用Split之前用Replace函數(shù)來替換多個空格的出現(xiàn)。列表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

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

接著，我將strText輸入Split函數(shù)，并且得到了包括在字符串strText中的字數(shù)。注意：如果你跳過或注釋用來移除多余空格的循環(huán)，結果是7個字。使用移除所有多余空格的循環(huán)后，結果才是正確的，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發(fā)送郵件
在ASP中，就可以通過調用CDONTS組件發(fā)送簡單郵件，在ASP.NET中，自然也可以。不同的是，.Net Framework中，將這一組件封裝到了System.Web.Mail命名空間中。 一個典型的郵件發(fā)送程序如下： ＜%@ Import Namespace=System.Web.Mail %＞ ＜script runat=server