隨機選擇一個字母文本框是上或下套管

Question

我如何設定，讓在一個文本框的句子會被隨機（每字母）是上或下套管，例如：

「你好我是格雷格「將進入到」我想我是格雷戈「

這樣的事情，謝謝。

Answer 1

你可以試試這個：說明將作爲評論

Dim input As String = TextBox2.Text '<--- this should be input "Hello I am Greg" 
    TextBox2.Text = "" '<--- clear the textbox to store output 
    Dim rnd As New Random '<---- generating new random number 
    For Each c As Char In input '<--- iterate through each character 
     If rnd.Next() Mod 2 = 0 Then 
      TextBox2.Text &= UCase(c) '<--- if true then print particular letter in upperCase 
     Else 
      TextBox2.Text &= LCase(c) '<--- if true then print particular letter in LowerCase 
     End If 
    Next