Eliminar datos listview
Tengo un form con un listview al cual utilizo el siguiente código para eliminar los items, pero no me funciona:
Listview. Items. Clear ()
Le he puesto un mensaje después de esta sentencia para revisar el form y me borra todos los datos, pero cuando abro de nuevo el form me aparecen los datos antiguos.
Básicamente el form donde esta el listview, es una especia de filtro donde el usuario puede enviar los datos a excel o hacer otras cosas, por eso es importante esta parte, ya que si el usuario cierra el form y luego lo vuelve a abrir me estaría mostrando todas las consultas.
No se si, si fui claro con todo esto.
No se si esto sea parte del problema pero la manera como lleno el listo form cuando el form upload es:
Dim subElemento As New ListViewItem
For Each objRow In m_dtContactsReport.Rows
If objRow("Monthtour").ToString() = strMonth And objRow("Company").ToString() = intCompanyIndex And objRow("Tour").ToString() = intTourIndex Then
subElemento = ltvInvoice.Items.Add(objRow("Dateinvoice").ToString())
subElemento.SubItems.Add(objRow("Voucher").ToString())
subElemento.SubItems.Add(objRow("Passanger").ToString())
subElemento.SubItems.Add(objRow("Amount").ToString())
subElemento.SubItems.Add(objRow("Commission").ToString())
End If
Next objRow
y cuando se cierra el form tengo el siguiente codigo
If ltvInvoice.Items.Count > 0 Then
ltvInvoice.Items.Clear()
MessageBox.Show("items borrados")
End if
Listview. Items. Clear ()
Le he puesto un mensaje después de esta sentencia para revisar el form y me borra todos los datos, pero cuando abro de nuevo el form me aparecen los datos antiguos.
Básicamente el form donde esta el listview, es una especia de filtro donde el usuario puede enviar los datos a excel o hacer otras cosas, por eso es importante esta parte, ya que si el usuario cierra el form y luego lo vuelve a abrir me estaría mostrando todas las consultas.
No se si, si fui claro con todo esto.
No se si esto sea parte del problema pero la manera como lleno el listo form cuando el form upload es:
Dim subElemento As New ListViewItem
For Each objRow In m_dtContactsReport.Rows
If objRow("Monthtour").ToString() = strMonth And objRow("Company").ToString() = intCompanyIndex And objRow("Tour").ToString() = intTourIndex Then
subElemento = ltvInvoice.Items.Add(objRow("Dateinvoice").ToString())
subElemento.SubItems.Add(objRow("Voucher").ToString())
subElemento.SubItems.Add(objRow("Passanger").ToString())
subElemento.SubItems.Add(objRow("Amount").ToString())
subElemento.SubItems.Add(objRow("Commission").ToString())
End If
Next objRow
y cuando se cierra el form tengo el siguiente codigo
If ltvInvoice.Items.Count > 0 Then
ltvInvoice.Items.Clear()
MessageBox.Show("items borrados")
End if
1 Respuesta
Respuesta de Roberto Alvarado
-1