[VB6] Recuperare dati da modulo

[wallrider]

no so se funziona : la query la dichiari come function

Public function query(sql As String)as recordset
    Call Connessione
    Set query = cn.Execute(sql)
    Call Chiusura 
End Sub