السادة المشرفين والاعضاء عندي برنامج بسيط وهذا البرنامج اذا ضغط على علامه تشيك يكتب التاريخ تلقائياً ، اريد عند عمل تشيك في deficient date يمسح التشيك والتاريخ المكتوب في Receive ملحوظه( بحيث لايؤثر في عمل Receive عند الضعط بعد ذلك في تشيك يظهر التاريخ).
[ تمت الإجابة ]اريد اذا ضغط علامه تشيك الثانيه تزيل على تشيك والتاريخ من الاولى
اخي الفاضل السعيد
السلام عليكم ورحمة الله وبركاته
نستغني عن الماكرو ونستخدم الكود التالي لإجراء المطلوب
Private Sub SecondView_AfterUpdate() If Me.SecondView = True Then Me.receiving_date = Null Me.SecondView1 = False Else Me.receiving_date = Date Me.SecondView1 = True End If End Sub
وهذا ملفك بعد التعديل
الف الف شكر للأخت زهره علم من أعلام البرمجه .. واستاذتنا التي استفدنا منها الكثير والكثير من عطائها الدائم لنا.... واكرر شكري لمساعدتك لي