+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم امثلة ومشاريع VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=188)
+--- الموضوع : [VB.NET] طريقة معرفة لغة الإدخال الحالية How to find the current input language (/showthread.php?tid=22020)
طريقة معرفة لغة الإدخال الحالية How to find the current input language - سعود الشامان - 07-10-17
كود :
Public Class Form1
Dim myCurrentLanguage As InputLanguage = InputLanguage.CurrentInputLanguage
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = myCurrentLanguage.Culture.DisplayName 'لعرض النتيجة بالعربي
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Text = myCurrentLanguage.Culture.EnglishName ' لعرض النتيجة بالإنجليزي
End Sub
End ClassRE: طريقة معرفة لغة الإدخال الحالية How to find the current input language - سعود الشامان - 07-10-17
(07-10-17, 02:14 PM)Amir_alzubidy كتب : جزاك الله خير اخوي سعود
و بارك الله فيك
شكرا جزيلا
وبآرك الله بكك ورعاك وسدد خطاك
RE: طريقة معرفة لغة الإدخال الحالية How to find the current input language - عبدالله الصافي - 30-12-18
الكود يعطي نتيجة دائمه أن لغة الكتابة الحالية هي الانجليزي
مهما غيرت اللغة فالنتيجة واحدة