Si haces las búsqueda en el propio defaultview sigue ordenado. No sé exactamente que quieres hacer pero por ejemplo:
Cita: Private Sub BtLLenarDTS_Click (........)
'LLENO
Me.DataSet11.nombres.AddnombressRow("bbbbb")
Me.DataSet11.nombres.AddnombresRow("xxxxxx")
Me.DataSet11.nombres.AddnombressRow("aaaaa")
Me.DataSet11.nombres.AddnombressRow("fffff")
'ORDENO
Me.DataSet11.Tables(0).DefaultView.Sort = "campo ASC"
'RECUPERO EL 1ER VALOR Y ME DUEVELE: aaaaa
MsgBox(Me.DataSet11.Tables(0).DefaultView(0).Item( "campo"))
'RECUPERO EL 4º VALOR Y ME DUEVELE: xxxxxx
MsgBox(Me.DataSet11.Tables(0).DefaultView(4).Item( "campo"))
End sub
saludos