Display Problems with datareport

Hi guys.
I have set the data source of a data report but it is being displayed whithout i tell it to show(rptdeposit.show).

VB Code:

Set pbRst = RstSel("SELECT RESERVATION.MemberShipId, RESERVATION.SerialNo, CATALOGUE.Title, MEDIA.MediaType, RESERVATION.Deposit FROM CATALOGUE INNER JOIN _
(RESERVATION INNER JOIN MEDIA ON RESERVATION.SerialNo=MEDIA.SerialNo) ON CATALOGUE.CatId=MEDIA.CatId WHERE reservation.serialno in ( " & ssql & ")")
        If Not pbRst.EOF And Not pbRst.BOF Then
            Set rptdeposit.DataSource = pbRst
            rptdeposit.Sections("Section5").Controls.Item("lblrstotal").Caption = total
            
                       
        End If

How can i solve this guys?
btw i'am on vb6 using an access database

thanks for your cooperation