AccessTr.neT

Tam Versiyon: Forma Otomatik Resim ekleme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
FORMA OTOMATİK RESİM EKLEME

1-formunuza bir resim kutusu ekleyeceksiniz birde tckimlik nolarının geldiği metinkutusu

Private Sub Form_Current()
Resim0.Picture = "C:\resimlerim\" & Me.TCKİMLİKNO & ".JPG"
End Sub

2-Private Sub Form_Current()
On Error GoTo HATA
If IsNull(Me.TCKIMLIKNO) Then
Me.FotoDosyasi.Caption = ""
Me.Foto.Picture = ""
Else
Me.FotoDosyasi.Caption = Me.Application.CurrentProject.Path & "\" & Me.TCKIMLIKNO & ".jpg"
Me.Foto.Picture = Me.Application.CurrentProject.Path & "\" & Me.TCKIMLIKNO & ".jpg"
End If
Exit Sub
HATA:
Me.Foto.Picture = ""
End Sub

Not;Alıntıdır....
bir örnek eklersen daha iyi olur, kullanım ve görünüm kolaylığı sağlar.
teşekkürler
Arakadaşlar kendileri bişeyler yapmaya çalışırlarsa daha kolay öğreniler diye düşünüyorum....
teşekkürler
teşekkürler kodlar için.
yaw hocam resim ekle butona tıklayıp resim seçince formda görünmesini nasıl yapacağız...

https://accesstr.net/konu-kullanici-kayi...amasi.html

burayı inceledim... Img-cray