كل عام والجميع بالف خير لدي نمودج وبه عدة ازرار  عند فتح النمودج يثم توزيع اسماء الاصناف على الازرار لكل صنف له صورة في الجدول فهده الفكرة ثم العمل عليها ما اريده هو تكملت الكود لتوزيع كل صورة صنف في زر Set Rs = CurrentDb.OpenRecordset("select Id , NmEtm ,PrEtm , PcEtm from Etms"): Rs.MoveLast: Rs.MoveFirst For Each C In Me.Controls If Not Rs.EOF Then C.Caption = Rs(1): C.Tag = Rs(0):  Rs.MoveNext C.Visible = True Else C.Visible = False End If Next   وهدا هو