اذهب الي المحتوي
أوفيسنا

تحديد لغة الكتابة


Akram Galal

الردود الموصى بها

السلام عليكم ورحمة الله وبركاتة
اريد عمل فورمة بها عدد 2 تكست بوكس
يتم الكتابة داخل تكست بوكس1 باللغة الإنجليزية فقط لا غير
ويتم الكتابة داخل تكست بوكس2 باللغة العربية فقط لا غير
وجزاكم الله خيراً
رابط هذا التعليق
شارك

استاذ اكرم

 

قم باضافة هذه الاوامر باسم التكست بوكس المراد

 

Private Sub TextBox2_Enter()
LoadKeyboardLayout "00000409", 1
End Sub
Private Sub TextBox24_Enter()
LoadKeyboardLayout "00000401", 1
End Sub
 
ارجو ان يكون هذا المطلوب
رابط هذا التعليق
شارك

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

 

اخي الغالي عبدالباري بعد اذنك استخدمت الملف الذي ارفقت و اضفت اضافة بسيطة لتجنب ادخال حروف انجليزية في مربع النص العربي و العكس.

 

اذا ارد احدكم اضافة لغات اخر كاللغة الفرنسية مثلا فيمكنكم مراجعة الرابط التالي:

 

قائمة اللغات

 

هنا تجد ارقام ال Unicode لكل حرف

 

تغيير لغة الكتابة للوحة المفاتيح.zip

  • Like 1
رابط هذا التعليق
شارك

جزاكم الله خيرا يا أعزائي

الكود رائع جدا

ولكن بالنسبة لأخي ابو تراب

خلية العربية لا تقبل كتابة المسافة والأرقام

أرجوا الحل

وشكرا

تم تعديل بواسطه Akram Galal
رابط هذا التعليق
شارك

جزاكم الله خيرا يا أعزائي

الكود رائع جدا

ولكن بالنسبة لأخي ابو تراب

خلية العربية لا تقبل كتابة المسافة والأرقام

أرجوا الحل

وشكرا

 

حياك الله اخي اكرم و شكرا على الملاحظة القيمة

 

جرب الكود بعد التعديل

تغيير لغة الكتابة للوحة المفاتيح.zip

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information