Grafik isimli formunuza Kurum adında kutu ekledim

Private Sub VerAnimasyon(ctl As Image)

  ctl.Move ctl.Left, ctl.Top, (ctl.Width * 1.25), (ctl.Height * 1.25)

  lblAciklama.Move ctl.Left + (ctl.Width / 2) - 100, ctl.Top + ctl.Height + 10

  lblAciklama.Caption = Nz(ctl.Tag, "imleri silmeyin!")

  lblAciklama.Visible = True

  Me.Kurum = lblAciklama.Caption

  Me.Liste45.Requery

End Sub

Olarak ayarlandı işinize yarar umarım

---

Ozan hocam cevaplamış, internet yavaş olunca farkedememişim, özür.