To have full control over which column you want it sorted by use:

Private Sub ListView1_ColumnClick (ByVal ColumnHeader as ColumnHeader)
ListView1.SortKey=ColumnHeader.Index-1
End Sub