if liste0<>Metin0 then
msgbox("Bu veri diğer kutuda mevcut.Başka seçiniz")
liste0.setfocus
exit sub
else
metin2=liste0
end if
gibi benzer bir kodla bu işi yapabilirsiniz. Kolay gelsin
Eğer açılan kutunuz bir tabloya bağlı olarak veri alıyorsa, açılan kutudan seçilip metin kutusuna yazdırılan veriyi çıkarmak için tablodan silmek gerekir diye biliyorum. Sanırım aynı veriyi diğer metin kutusuna yazmamak için böyle bir şey istiyorsunuz. Eğer böyleyse kontrol ettirerek mükerrer yazımı engelleyebilirsiniz.
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.