DataEnvironment ile ilgili bir soru..

Şimdik DataEnvironment ile databaseden bilgiler çekiyorum..

Addam textboxa ismini giriyor yanda labelda soyadı çıkıyor falan filan..
Ama adam adını girince resmini getiremiyorum..

DataEnvironment1.rsKisiler.Open
DataEnvironment1.rsKisiler.Filter = "Ad = '" & txtAd.Text & "'"
If DataEnvironment1.rsKisiler.EOF Then
lblAd.Caption = ""
MsgBox "Kisi Bulunamadı"
Else
lblAd.Caption = DataEnvironment1.rsKisiler.Fields("Ad")
lblSoyad.Caption = DataEnvironment1.rsKisiler.Fields("Soyad")
lblAdres.Caption = DataEnvironment1.rsKisiler.Fields("Adres")
lblTelefon.Caption = DataEnvironment1.rsKisiler.Fields("Telefon")
kisiler = lblAd.Caption
End If
DataEnvironment1.rsKisiler.Close

bunda sorun yok .Caption ile geliyor bir güzel..
Ama resim için nasıl getiricam ?
boş labela geliyordu istediğim bilgiler mesela resim getirmek için label olmucakmı vede lblAd.Caption daki .Caption değişcekmi ?

database'im access (mdb) Resim fieldi Ole Object..