Question

使用VB.net

如果textbox1.text =＆＃34;示例＆＃34;

如何让textbox2.text显示＆＃34; aeelmpx＆＃34;

因为这是按字母顺序排列的字母？

将它声明为一个字符串，然后操作字符串我确定，但我最好是一个热心的业余爱好者！

Answer 1

由于String实现了IEnumerable（Of Char），你可以使用这样的代码：

textBox2.Text = New String(textBox1.Text.OrderBy(Function(c) c).ToArray())

Answer 2

你可以试试这个，它经过了试验和测试。

 Private Shared Sub ConvertToChar(ByRef ctrl As System.Windows.Forms.Control)
    Dim charArray() As Char = String.Empty

    Try
        If TypeOf ctrl Is System.Windows.Forms.TextBox Then
            If Not String.IsNullOrEmpty(ctrl.Text) Then
                charArray = ctrl.Text.ToCharArray
                Array.Sort(charArray)
                ctrl.Text = charArray
            End If
        End If
    Catch ex As Exception

    End Try
End Sub

使用示例

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ConvertToChar(TextBox1)
 End Sub

如果您需要，还可以为其他控件添加该方法...

按字母顺序排序textbox.text

2 个答案: