Visual Basic - caracteres

Como puedo cambiar el orden de una serie de palabras, en forma descendente:ejemplo:en Visual basic
fernando---------devera devolverme------------ronnfeda.
Esto debe valer para un gran numero de palabrabras ingresadas a una caja de Texto.
fernan hola como------------------------rnnfea ohla oomc.
Gracias por su ayuda. La necesito para hoy.

Que pregunta...! tan extravagante...! Pero me intriga para que necesitas eso... De todas formas:
1.- Crea un Form1, con 1 Text1, 1 Text2, 1 Command1 y 1 CheckBox1.
2.- Coloca este código:
Public Function OrdenarCadena(Cadena As String, Ascendente As Boolean) As String
Dim i As Integer, j As Integer
Dim Caracter As String * 1
Dim Cad() As String * 1
For i = 1 To Len(Cadena)
ReDim Preserve Cad(i)
Cad(i) = Mid(Cadena, i, 1)
Next i
For i = 1 To Len(Cadena) - 1
For j = i + 1 To Len(Cadena)
If Ascendente Then
If Cad(i) > Cad(j) Then
Caracter = Cad(i)
Cad(i) = Cad(j)
Cad(j) = Caracter
End If
Else
If Cad(i) < Cad(j) Then
Caracter = Cad(i)
Cad(i) = Cad(j)
Cad(j) = Caracter
End If
End If
Next j
Next i
Text2 = Empty
For i = 1 To Len(Cadena)
OrdenarCadena = OrdenarCadena + Cad(i)
Next i
End Function

Private Sub Command1_Click()
Dim Texto As String
Text2 = Empty
For jon = 1 To Len(Text1)
Texto = Texto + Mid(Text1, jon, 1)
If Mid(Text1, jon, 1) = " " Then
Text2 = Text2 + " " + OrdenarCadena(Trim(Texto), Check1)
Texto = Empty
End If
Next jon
Text2 = Text2 + " " + OrdenarCadena(Trim(Texto), Check1)
Text2 = Trim(Text2)
End Sub

¿¿¿ Por cierto