Usos listview en vb6.0

[cindycpc3]

Buenos Dias Estimados colegas,

Pude resolver el problemita que tenia, gracias a los que aportaron fue de gran ayuda, aqui les dejo el fragmento de codigo para aquellos que lo necesiten:

For i = 1 To Lst_usuarios.ListItems.Count

If Lst_usuarios.ListItems.Item(i).Selected Then
sql = "INSERT INTO persona_enviados (persona_envio, numeros_envio, Texto_envio ) VALUES ( '" & Lst_usuarios.ListItems(i) & "', '" & Lst_usuarios.ListItems(i).SubItems(1) & "','" & texto & "')"
g_db.Execute sql
End If
Next i

Tenia un problema con el textbox ya que no me guardaba lo que se anotaba por pantalla y para ello tuve que crear una variable global variant.
Espero les sea de ayuda