این هم نمونه کدی برای تغییر زبان کامپیوتر. بعضی از افراد از Api ها برای این کار استفاده میکنن. بهشون پیشنهاد میکنم اولویت رو به توابع دات نت بدهند. در مواقعی که این توابع پاسخگو ی نیازتان نیستند به سراغ api ها بروید کد: If InputLanguage.CurrentInputLanguage.LayoutName = "US" Then Dim farsi As New Globalization.CultureInfo("fa-IR") InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(farsi) Else Dim en As New Globalization.CultureInfo("en-US") InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(en) End If