Skip to main content

AccessTr.neT


Forma Otomatik Resim ekleme

Forma Otomatik Resim ekleme

#1
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....
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Thumbs Up #2
bir örnek eklersen daha iyi olur, kullanım ve görünüm kolaylığı sağlar.
teşekkürler
[Resim: gif48.gif]
Son Düzenleme: 01/11/2008, 13:16, Düzenleyen: bayFARUK.
Cevapla
#3
Arakadaşlar kendileri bişeyler yapmaya çalışırlarsa daha kolay öğreniler diye düşünüyorum....
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
#4
teşekkürler
Cevapla
#5
teşekkürler kodlar için.
™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

Cevapla
#6
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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da