Hema_Elhelow قام بنشر أبريل 23, 2022 قام بنشر أبريل 23, 2022 احتاج الى تعريب ملف قاعدة البيانات https://www.mediafire.com/file/jdao5gryu8snc10/tf10251225+(1).accdt/file هل من مساعدة
د.كاف يار قام بنشر أبريل 23, 2022 قام بنشر أبريل 23, 2022 تفضل اضف هذا الكود في جميع الصفحات في حدث عند الفتح Dim ctl As Control For Each ctl In Me.Controls If TypeName(ctl) = "Label" Then Form.Controls(ctl.Name).Caption = Replace(Translate(Form.Controls(ctl.Name).Caption, "auto", "ar"), ":", "") Form.Controls(ctl.Name).FontName = "Times New Roman" Form.Controls(ctl.Name).FontWeight = 900 End If If TypeName(ctl) = "CommandButton" Then Form.Controls(ctl.Name).Caption = Replace(Translate(Form.Controls(ctl.Name).Caption, "auto", "ar"), ":", "") Form.Controls(ctl.Name).FontName = "Times New Roman" Form.Controls(ctl.Name).FontWeight = 900 End If If TypeName(ctl) = "Page" Then Form.Controls(ctl.Name).Caption = Replace(Translate(Form.Controls(ctl.Name).Caption, "auto", "ar"), ":", "") End If Next ctl الترجمة بإستخدام Google Database12222.zip 4 2
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان