Teşekkürler ercan hocam ellerinize sağlık.
Hocam
Private Sub Form_Current()
On Error GoTo Err_Foto

Resim.Picture = ""
Resim245.Picture = ""
Resim246.Picture = ""
Resim254.Picture = ""
Resim.Picture = CurrentProject.Path & "/Resimler/ogrenciler/" & Me.TC.Value & ".jpg"
Resim245.Picture = CurrentProject.Path & "/Resimler/ogrenciler/" & Me.TC.Value & "-1.jpg"
Resim246.Picture = CurrentProject.Path & "/Resimler/ogrenciler/" & Me.TC.Value & "-2.jpg"
Resim254.Picture = CurrentProject.Path & "/Resimler/ogrenciler/" & Me.TC.Value & "-3.jpg"
Err_Foto:

If Err.Number = 2220 Then
Resume Next
Else
End If
End Sub
kodu ile 4 adet resmi forma çağırıyorum.
öğreniğinizdeki resim ekleme kodu ile eğer şahsın resmi yoksa resim çok güzel ekleniyor.
Hocam sorum şu eğer şahsın bir resmi varsa ikinci, üçüncü veya dördüncü resmi yoksa, ilk resmi silmeden ikinci üçüncü veya dördüncü resmi ekleyebilirmiyiz.? Teşekkürler