[asmarsou]

(18-08-22, 09:56 AM)حسن الجلب كتب : السلام عليكم عاوز ثلاثة أكواد الاول لجلب اللغات علي الويندوز (مختصر اللغه ) لاستخدامها في البرمجه فيما بعد والآخر لجلب جميع لغات العالم عن طريق النت تقريبا وكود اخر لقلب لغه لوحه المفاتيح الي اي لغه حتي وإن لم تكن مثبته علي لوحه المفاتيح مثل التحديث الاخير لترجمه جوجل

و عليكم السلام و رحمة الله و بركاته
فيما يخص السؤال الاول اليك بمثال لعرض اللغات المثبتة في الجهاز في ليشت بوكس و كومبوبوكس

PHP كود :

Imports System.Globalization
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim cultures() As CultureInfo = CultureInfo.GetCultures(CultureTypes.AllCultures)
        For Each culture As CultureInfo In cultures
            ListBox1.Items.Add(culture.DisplayName)
            ComboBox1.Items.Add(culture.DisplayName)
        Next
    End Sub
End Class