منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تحويل النص تلقائيا للعربية او الانجليزية - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تحويل النص تلقائيا للعربية او الانجليزية (/showthread.php?tid=23250)

تحويل النص تلقائيا للعربية او الانجليزية - nooralcown - 09-01-18

استعملت هذا الكود لتحويل اللغة داخل اي تكست بوكس الى العربية  
 InputLanguage.CurrentInputLanguage = InputLanguage.InstalledInputLanguages().Item(0)

المشكلة على جهاز الشغل تكتب عربي وعلى جهاز البيت تكتب انجليزي  

وين المشكلة بارك الله فيكم

RE: تحويل النص تلقائيا للعربية او الانجليزية - طالب برمجة - 09-01-18

[مثال] طريقة تغيير لغة الإدخال بشريط المهام

RE: تحويل النص تلقائيا للعربية او الانجليزية - nooralcown - 09-01-18

بارك الله فيك تمام

RE: تحويل النص تلقائيا للعربية او الانجليزية - Gyath - 04-03-18

السلام عليكم ورحمة الله
الكود صحيح 

 InputLanguage.CurrentInputLanguage = InputLanguage.InstalledInputLanguages().Item(0)
يوضع الكود في حدث مربع النص GetFocus
ولكن المشكلة لديك في اللغة الافتراضية لجهاز الكمبيوتر
حيث يستخدم الرقم (0) للغة الافتراضية والرقم (1) للغة الثانوية
غير الرقم 0 في الجهاز الثاني الى 1 سيعمل الكود انشاء الله

RE: تحويل النص تلقائيا للعربية او الانجليزية - حريف برمجة - 04-03-18

لتحويل لغة الكتابة إلى عربي ضع الكود التالي في حدث مربع النص GetFocus :


كود :
 Dim lang As InputLanguage
 For Each lang In InputLanguage.InstalledInputLanguages
  If lang.Culture.EnglishName.ToUpper Like "*arabic*".ToUpper Then
       InputLanguage.CurrentInputLanguage = lang
  End If
 Next

وللإنجليزي ضع الكود التالي في حدث مربع النص GetFocus :


كود :
 Dim lang As InputLanguage
 For Each lang In InputLanguage.InstalledInputLanguages
   If Not lang.Culture.EnglishName.ToUpper Like "*arabic*".ToUpper Then
      InputLanguage.CurrentInputLanguage = lang
   End If
 Next


RE: تحويل النص تلقائيا للعربية او الانجليزية - اسامه الهرماوي - 22-03-18

ع وضعك شكرا يا اخي

RE: تحويل النص تلقائيا للعربية او الانجليزية - esawy1 - 19-08-22

جزاك الله خيرا 

لم اجد GetFocus

ووجدت GotFocus  ووضعت الكود فيه ومشى الحال وتم بنجاح تغيير اللغة

انا اعمل على Visual Studio 2010