Reportes en visual basic 6

[coldplay]

pues mira, realmente deberias poner tu codigo para revisarlo y poderte dar una solucion, yo utilizo dos conexiones:
'---------------------------------------------------------------------------------------------------------------------------------------------------------------
Public Sub MySql(SQL As String)
Dim er As String
On Error GoTo etiqueta1
conexion = "Provider = SQLNCLI;server=servidor;user id=usuario;password=pass;database=base1; initial catalog=base1;"
If cn.State = 1 Then
cn.Close
End If
cn.Open conexion
rs.Open SQL, cn, adOpenStatic
Exit Sub
etiqueta1:
If err.Number = -2147467259 Then
er = MsgBox("No se puede establecer comunicación con el servidor, intente mas tarde", vbCritical, "Error de Conexión")
End If
End Sub
'-----------------------------------------------------------------------------------------------------------------------------------------------------------------
Public Sub MySql1(SQL1 As String)
Dim er As String
On Error GoTo etiqueta1
conexion = "Provider = SQLNCLI;server=servidor;user id=usuario;password=pass;database=base1; initial catalog=base1;"
If cn1.State = 1 Then
cn1.Close
End If
cn1.Open conexion
rs1.Open SQL1, cn1, adOpenStatic
Exit Sub
etiqueta1:
If err.Number = -2147467259 Then
er = MsgBox("No se puede establecer comunicación con el servidor, intente mas tarde", vbCritical, "Error de Conexión")
End If
End Sub
'-----------------------------------------------------------------------------------------------------------------------------------------------------------------------

mysql("SELECT * FROM tabla1 where id='" & text1.text & "'")
descripcion=rs("desc")
mysql1("SELECT * FROM tabla2 where desc='" & descripcion & "'")
descripcion2=rs1("desc2")

'-----------------------------------------------------------------------------------------------------
te explico rapidamente ambas conexiones son independientes, por lo que cada instruccion sql asi lo sera, en caso de que tu no quieras perder el valor de la primera instruccion sql deberas usar la segunda conexion("mysql1") e ir almacenando, tus registros en variables distintas, para que, una ves obtenido el valor, tu puedas seguir haciendo sentencias sql o mostrar lo obtenido anteriormente, espero que esto solucione tus dudas