كيف يتم تحويل اللغه الى اللغه العربيه في الفيجوال

طبيعة السؤال غر مفهومة لكن ممكن تجرب التابع

    Public Shared Sub ChangeToArabic()
        If InputLanguage.CurrentInputLanguage.Culture.EnglishName.ToLower().IndexOf("arabic") = -1 Then
            For Each lang As InputLanguage In InputLanguage.InstalledInputLanguages
                If lang.Culture.EnglishName.ToLower().IndexOf("arabic") <> -1 Then
                    InputLanguage.CurrentInputLanguage = lang
                    Exit For                End If
            Next 
        End If
    End Sub

اولا  اشكر حضرتك على اجابتي 

ثانيا اشكر حضرتك على انك نبهتني ان السؤال غير واضح 

كان قصدي ان عند ادراج كائن من الكائنات مثلا label عند الكتابه به باللغه العربيه لا يمكنني الكتابه باللغه العربيه لكن تظهر لي لغه اخرى لا اعلمها اعتقد انها لغه Afrikaans كل ما اردته ان اجعل هذه اللغه لغه عربيه مع العلم ان هذه اللغه تظهرمعي  في  برامج الفيجوال فقط  يارب اكون قد اوضحت لحضرتك وساجرب هذا الكود لكن لايوجد طريقه اخرى غير هذا الكود؟