[SOLUCIONADO] 1 Listview cargado desde 2 tablas

[jeaguiar25]

Buenas Tardes compañeros!!!
Hoy molesto porque quisiera saber si alguien tiene idea de como llenar un listview desde dos tablas distintas.
Estoy usando una aplicacion donde guardo a los usuarios por N° de HC (Historia Clinica) y en una tabla que levanto los datos de las internaciones que tuvo no guarde por nombre y documento (así la DataBase no se hace muy pesada) la guarde por N° de HC, pero al levantar el Historial desde el ListView me aparece N° de HC, Fecha desde, Fecha Hasta, etc. Entre medio de HC y Fecha desde quiero colocar el nombre del usuario que está en otra tabla.

A quien sepa como, gracias por comentar!!!!
Saludos y buenas tardes.........

[jeaguiar25]

Amigos lo resolvi yo solo, esta es la sentencia que use:



Private Sub Cargar_Listado_Click()
Me.ListView1.ListItems.Clear
Dim rsConsulta6 As ADODB.Recordset
Set rsConsulta6 = New ADODB.Recordset
Dim li As ListItem

rsConsulta6.Open "SELECT * FROM Historial INNER JOIN Activos ON Historial.HC_Historial = Activos.HC_Activos WHERE Desde BETWEEN #" & Format(Text1, "mm/dd/yyyy") & "# AND #" & Format(Text2, "mm/dd/yyyy") & "#", cnn, adOpenDynamic, adLockBatchOptimistic
While (rsConsulta6.EOF = False)
Set li = ListView1.ListItems.Add(, , rsConsulta6("Id_Historial"))
li.ListSubItems.Add , , rsConsulta6("HC_Historial")
li.ListSubItems.Add , , rsConsulta6("Documento_Historial")
li.ListSubItems.Add , , rsConsulta6("Apellido1")
li.ListSubItems.Add , , rsConsulta6("Nombre1")
li.ListSubItems.Add , , rsConsulta6("Desde")
li.ListSubItems.Add , , rsConsulta6("Hasta")
li.ListSubItems.Add , , rsConsulta6("Dias_Internado")
li.ListSubItems.Add , , rsConsulta6("Cama")
li.ListSubItems.Add , , rsConsulta6("Procedencia")
li.ListSubItems.Add , , rsConsulta6("MedicoIngreso")
li.ListSubItems.Add , , rsConsulta6("Diagnostico")
li.ListSubItems.Add , , rsConsulta6("Destino")
rsConsulta6.MoveNext
Wend
For i = 1 To ListView1.ListItems.Count
Total = ListView1.ListItems.Count
Next
TextTotal = Total
End Sub

Lo comparto porque para mi se me torno difícil completarlo, y si le sirve a alguien estaré muy feliz.
Saludos