22-07-22, 06:56 PM
(آخر تعديل لهذه المشاركة : 22-07-22, 07:51 PM {2} بواسطة أبو خالد الشكري.)
وعليكم السلام ورحمة الله وبركاته
تفضل هذا هو كود التحقق من البارتيشن الذي يتواجد عليه الويندوز
وهذا هو كود التحقق من لغة الإدخال
تفضل هذا هو كود التحقق من البارتيشن الذي يتواجد عليه الويندوز
كود :
Dim winPath As String
winPath = Environ$("windir")
MsgBox (winPath)وهذا هو كود التحقق من لغة الإدخال
كود :
Dim myCurrentLanguage As InputLanguage = InputLanguage.CurrentInputLanguage
MsgBox(myCurrentLanguage.Culture.DisplayName)
