Prova così:

codice:
     sub clenti_editcommand  (s as object ,e as DataGridCommandEventArgs )
     clienti.edititemindex = e.Item.itemindex
     ordina("nome")
     end sub