更改所選值上情況下，在RichTextBox中在VB 2008

Question

我需要選擇的值更改爲大寫在我使用的代碼RichTextBox的

Dim tou As String 
     Dim tot As String 

     tou = RichTextBox1.SelectedText 

     tot = tou 

     RichTextBox1.Text.Replace(tou, "") 
     tot = tot.ToUpper 
     RichTextBox1.AppendText(tot) 

任何一個可以告訴我哪裏錯了，並告訴我該怎麼辦呢

Answer 1

如果你想獲得選定的文本，然後將其轉換爲大寫：

Dim toUpper As String = RichTextBox1.SelectedText.ToUpper 

如果你想設置選定的文本爲大寫：

RichTextBox1.SelectedText = RichTextBox1.SelectedText.ToUpper