Imports Microsoft.Ink Imports System.Globalization Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 'ListBox1.DisplayMember = "Name" 'ListBox1.DisplayMember = "NativeName" ListBox1.DisplayMember = "DisplayName" 'ListBox1.DisplayMember = "EnglishName" 'ComboBox1.DisplayMember = "Id" ComboBox1.DisplayMember = "Name" ComboBox1.DataSource = New Recognizers().OfType(Of Recognizer)().ToArray() End Sub Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged InkEdit1.Recognizer = TryCast(ComboBox1.SelectedItem, Recognizer) ListBox1.DataSource = InkEdit1.Recognizer.Languages.Select(AddressOf CultureInfo.GetCultureInfo).ToArray() End Sub End Class