خالد الشاعر قام بنشر أبريل 28, 2012 مشاركة قام بنشر أبريل 28, 2012 السادة الخبراء عندى فورم به تكست TextBox3 اكتب بالغة الانجليزية به ثم انتقل الى TextBox4 اريد عند الانتقال فى هذا التكست يكتب لغة عربية دون استخدام alt+shift استخدمت هذا الامر فى الفورم لم يعمل معى ReadingOrder = xlRTL برجاء المساعدة رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر أبريل 28, 2012 مشاركة قام بنشر أبريل 28, 2012 جرب هذا الكود أخي الكريم Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long Private Sub TextBox1_Enter() LoadKeyboardLayout "00000409", 1 End Sub Private Sub TextBox2_Enter() LoadKeyboardLayout "00000401", 1 End Sub رابط هذا التعليق شارك More sharing options...
خالد الشاعر قام بنشر أبريل 28, 2012 الكاتب مشاركة قام بنشر أبريل 28, 2012 استاذ محمد صالح الف شكر على سرعة هذا الحل الجميل تسلم ايدك جزاك الله كل خير و ياريت شرح مبسط لهذا الكود رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان