20-08-18, 03:23 PM
(19-08-18, 09:43 PM)elgokr كتب :(19-08-18, 09:09 PM)Microformt كتب : اخي الكريم
السلام عليكم ورحمة وبركاته
احب ان اقدم لكم جزيل الشكر والتقدير على ما تقدمه من دعم فني
المشكله انني اريد ان تظهر قيمة الخيار عند البحث برقم الموظف فقط ؟؟
اركرار لكم الشكر والتقدير على ما تقدمه من دعم فني وجزك الله خيراً
وعليكم السلام ورحمة الله وبركاته
الشكر لله وهذا من اصلك الطيب اخى Microformt
اذا كل ما تريده هو عكس الفكرةوهو جلب قيمة متزوج ام لا الى Check
كل ما عليك فعله التالىتجاهل ردى السابق وتعال على السورس الرئيسيى الخاص بك
وكل ما عليك تاتى على السطر التالى
كود :
If Not IsNull(rs("Vb").Value) Then Check1.Visible = rs("Vb").Value
استبدله بالكود التالى
كود :
If (rs("Vb").Value = True) Then
Check1.Value = "1"
Else
Check1.Value = "0"
End If
وبكده سيقوم بتظليل Check1 اذا كان القيمة True فى الجدول
اتمنى ان الكود مبسط ويمكنك التعديل على السورس لديكاذا تحتاج الى اعادة ارفاق السورس مع البرنامج
يمكنك الرد وسارفقه لك بعد اتمام التعديل
تحياتى لكوتمنياتى لك التوفيق
اخي العزير
السلام عليكم ورحمة وبركاته
لكم مني جزيل الشكر والتقدير وكل عام وانتم با الف صحه وعافية
تحياتي
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
