i got a problem where i want to show a picture that i've save in access and want to show the picture in vb,

If rs.EOF = True Or rs.BOF = True Then
    MsgBox "Your Name Is Not In Data"
        Else
        txtname = rs.Fields("NAME")
        txtreg = rs.Fields("MATRIX NO")
        txtic = rs.Fields("IC NO")
        txtcont = rs.Fields("CONTACT NO")
        txtroom = rs.Fields("ROOM NO")
        lbltme.Caption = Format(today, "dd-mm-yy hh:mm:ss")
        Picture1 = rs.Fields("PICTURE")

can anyone solve my problem ?