Visual Basic - Fugas

tengo el siguiente codigo:
'esto lo declaro en un modulo.bas
Public RSTemporal As ADODB.Recordset

'esto un evento de un boton
Private Sub Command1_Click()

Set RSTemporal = New ADODB.Recordset
RSTemporal.Open "Select * from articulos",.................

Set VSFlexGrid1.DataSource = RSTemporal

'noten que aqui no cierro el recordset sino que lo asigno directamente

Set RSTemporal = New ADODB.Recordset
RSTemporal.Open "Select * from cuartel", ..................

Set VSFlexGrid2.DataSource = RSTemporal
End Sub

solo quiero saber si haciendo esto provoco fugas de memoria
como podria monitoriar las fugas de memoria o si existe algun programa para visualizar la memoria gracias expertos