تحديد الحقل عند الضغط على الزر

[بلال اليامين]

السلام عليكم 

لدي حقل بالون الأخضر  و  أيقونة بالون الاحمر 

اريد تحديد نعم اولا  عند الضغط على الايقونة

ولدي ايقونة زرقاء اريد عند الاختيار من مربع تحرير وسرد يتم تحديد جميع التلاميذ ب لا

تحديد البرنامج1.accdb

[Foksh]

وعليكم السلام ورحمة الله وبركاته ,,,

أخي بلال أسعد الله مساءكم وصباحكم في بلدنا العزيز الجزائر ..

استخدامك لكلمة ايقونة يسبب الإرباك لك في توصيل المعلومة الصحيحة .. ففي مثالك الإيقونة الحمراء هي في الواقع اسمها زر أو Button . لذا استخدم مسميات العناصر الصحيحة كي تساعد في توصيل المعلومة الصحيحة ..

منذ ساعه, بلال اليامين said:

اريد تحديد نعم اولا  عند الضغط على الايقونة

 

بالنسبة لطلبك الأول فيما يتعلق بالزر الأحمر "إعادة" ، وإن كان ما فهمته صحيح .. استخدم هذا الحدث له

    If Me.نص52 = "لا" Then
        Me.نص52 = "نعم"
    Else
        Me.نص52 = "لا"
    End If

 

منذ ساعه, بلال اليامين said:

ولدي ايقونة زرقاء اريد عند الاختيار من مربع تحرير وسرد يتم تحديد جميع التلاميذ ب لا

 

أما الطلب الثاني ، فقط قم بإضافة هذا الاستعلام
 

DoCmd.RunSQL "UPDATE [tblImportExcel] SET [معيد] = 'نعم' WHERE [السنة] = '" & [Forms]![ملفات التلاميذ]![السنة] & "';"

بحيث تصبح الجملة الشرطية للرسالة عند اختيار = نعم :

If MsgBox(Msg, vbQuestion + vbMsgBoxRight + vbYesNo, "تأكيـــــد الإجــــــراء") = vbYes Then
    DoCmd.RunSQL "UPDATE [tblImportExcel] SET [معيد] = 'نعم' WHERE [السنة] = '" & [Forms]![ملفات التلاميذ]![السنة] & "';"
    DoCmd.RunSQL "UPDATE [tblImportExcel] Set [السنة]='" & NewYaer & "' where [السنة]=[forms]![ملفات التلاميذ]![السنة];"
    DoCmd.Requery
End If

 

ملفك بعد التعديل 

تحديد البرنامج1.zip