Problemas con Listview Hola.
Saben, tengo un problema con el ordenamiento de la listview, me explico.
Tengo una listview con datos, a la cual le agregue la función para que ordenara al momento de pinchar una columna. Con eso funciona bien, pero ahora viene el detalle.
Cuando ordeno una columna y llamo otro formulario en el cual agrego otro registro, al momento de cerrar el formulario llamado, vuelvo a llenar la listview, pero al momento de cargarla nuevamente me da el siguiente error "Excepción no controlada del tipo : System.ArgumentOutOfRangeException en Microsoft.VisualBasic.Dll".
He buscado en la web y no he encontrado nada, supongo que el problema es porque al momento de cargar nuevamente la listview tiene otro ordenamiento distinto al que tenia al momento de llamar al segundo formulario, me he dado cuenta que se dispara la función en donde se encuentra el "Icomparer.Compare", he tratado de que no se dispare para que no de el error, pero no lo he conseguido.
Te envio el código que ocupo al momento de ordenar la listview. Si tienes alguna solución te lo agradecería bastante, ya que me he pasado el día completo tratando de encontrar el problema, cabe mencionar que soy nuevo en la programación de .net.
*******************************************
*Aquí está el código del evento ColumnClick
*******************************************
Private Sub LvwClientes_ColumnClick(ByVal sender As_ System.Object, ByVal e As_ System.Windows.Forms.ColumnClickEventArgs) Handles LvwClientes.ColumnClick
If LvwClientes.Sorting = SortOrder.Descending Then
LvwClientes.Sorting = SortOrder.Ascending
Else
LvwClientes.Sorting = SortOrder.Descending
End If
LvwClientes.ListViewItemSorter = New_ ListViewItemComparar(e.Column)
End Sub
************************************
*Aqui está la rutina de ordenamiento
************************************
Public Class ListViewItemComparar
Implements IComparer
Private col As Integer
Public Sub New()
col = 0
End Sub
Public Sub New(ByVal column As Integer)
col = column
End Sub
Private Function Compare(ByVal x As Object, ByVal y As Object) As Integer Implements IComparer.Compare
Return [String].Compare(CType(x,_ ListViewItem).SubItems(col).Text, CType(y,_ ListViewItem).SubItems(col).Text)
End Function
End Class
