操作回顧
代碼的前三行簡單地定義了變量第一行中splitChars是一個字符串變量包含用於劃分語句的字符第二行中的words是一個字符串數組第三行中的wordIndex是一個Integer變量用於計算數組
Dim splitChars As String =
Dim words() As String
Dim wordIndex As Integer
接下來使用Split方法將輸入到文本框中的語句劃分成一個數組雖然Split看上去是Text屬性的一種方法但必須記住Text屬性返回String因此Split是String類的方法傳遞到字符串中的參數並不是splitChars變量本身而是己經轉換成字符數組的splitChars(使用ToCharArray方法)這是因為Split方法的所需類型為字符數組該方法在劃分字符串中允許很大的靈活性
words = TextBoxTextSplit(splitCharsToCharArray())
在這個階段words數組現在對語句中的每個單詞都包含一個單獨的記錄項用於添加到列表框中在將這些單詞添加到列表中之前要清除現有的Items集合該操作防止在多次單擊按鈕之後列表會變得更長然後循環遍歷該單詞數組但是是反向循環將每個單詞添加到列表中
ListBoxItemsClear()
For wordIndex = wordsLength To Step
ListBoxItemsAdd(words(wordIndex))
Next
不要過分擔心循環語句的確切語法──在本章稍後部分將會介紹
一旦單詞進入到列表中它們還可以被再次移動到另一個字符串中這裡使用了一個初始值StringEmpty這看上去或許有點不同尋常但對於初始化字符串來說這確實是一件很平常的事情
Dim paragraph As String = StringEmpty
StringEmpty是一個特殊值它表示該字符串為空與字符串被賦值為不同雖然字符串的長度為不包含任何字符但它有一個值長度字符串與空字符串之所以存在區別是因為它允許您檢測該字符串是否已經被設置或者已經修改了它的初始值聲明初始值的一個原因是如果不聲明初始值那麼在VWD中將會出現警告但是後面的一行代碼表明該paragraph變量在被設置之前己經使用在該示例中這並不重要但是在VWD中簡化警告則意味著更容易發現有關的警告和錯誤
現在循環遍歷列表框的Items集合Items集合中包含ListItem對象每個ListItem的Value都只是簡單地連同空格一起插入到段落字符串中
For Each word As ListItem In ListBoxItems
paragraph &= wordValue &
Next
最後該段落顯示在第二個文本框中
TextBoxText = paragraph
這種顛倒語句中單詞的方法看上去可能相當冗長但是該練習旨在表明在使用數組和集合時可以使用許多不同的方法
ASPNET 入門教程完整版
[] [] [] [] []
From:http://tw.wingwit.com/Article/program/net/201311/15112.html