主题：[求助]数组中的字符串如何进行排序

我写了一段代码,挤掉了字符串中的空格,但不知道如何对分割的子字符串重新排序:

Dim Multi As String="  travelmate 627 ,travelmate 621 ,travelmate 621lv ,travelmate 621xc    ,travelmate 621xv ,travelmate 623    ,travelmate 623lc ,travelmate 623lci "
Dim Values() As String
Values = Multi.split(",")
For Index As Integer = 0 To Values.Length - 1
    values(Index)=values(Index).trim()
    Next
Dim Str1 As String
Str1= String.Join(",",Values)
Output.Show(Str1)

 

请狐爸和其他朋友指点一下.

Array.Sort(Values)

 

我设计了一个窗口,使用这段代码,运行后无动静:

Dim multi As String = e.Form.Controls("TextBox1").Text     '把窗口中要优化的值传递给multi
Dim Values() As String        
Values = Multi.split(",")
For Index As Integer = 0 To Values.Length - 1
    values(Index)=values(Index).trim()
    Next
Array.Sort(Values)
multi= String.Join(",",Values)     '用优化后的值覆盖掉优化前的值

 

请狐爸指点一下.谢谢!

此主题相关图片如下：5.jpg

Dim multi As String = e.Form.Controls("TextBox1").Text     '把窗口中要优化的值传递给multi
Dim Values() As String        
Values = Multi.split(",")
For Index As Integer = 0 To Values.Length - 1
    values(Index)=values(Index).trim()
    Next
Array.Sort(Values)
multi= String.Join(",",Values)     '用优化后的值覆盖掉优化前的值

e.Form.Controls("TextBox1").Value = multi

 

 

感谢狐爸!这样修改起来就方便多了.

另，发现一个小小的问题,优化后,点存盘,有时字符又变回到优化前的状态,反复点"优化"和"存盘"多次,才能修改完成.不晓得是什么原因.

最后再加一句：
 
e.Form.Controls("TextBox1").WriteValue