本文整理匯總了VB.NET中System.Windows.Forms.InputLanguage類的典型用法代碼示例。如果您正苦於以下問題:VB.NET InputLanguage類的具體用法?VB.NET InputLanguage怎麽用?VB.NET InputLanguage使用的例子?那麽, 這裏精選的類代碼示例或許可以為您提供幫助。
在下文中一共展示了InputLanguage類的2個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: GetLanguages
Public Sub GetLanguages()
' Gets the list of installed languages.
Dim lang As InputLanguage
For Each lang In InputLanguage.InstalledInputLanguages
textBox1.Text &= lang.Culture.EnglishName & ControlChars.Cr
Next lang
End Sub
示例2: SetNewCurrentLanguage
Public Sub SetNewCurrentLanguage()
' Gets the default, and current languages.
Dim myDefaultLanguage As InputLanguage = InputLanguage.DefaultInputLanguage
Dim myCurrentLanguage As InputLanguage = InputLanguage.CurrentInputLanguage
textBox1.Text = "Current input language is: " & _
myCurrentLanguage.Culture.EnglishName & ControlChars.Cr
textBox1.Text &= "Default input language is: " & _
myDefaultLanguage.Culture.EnglishName & ControlChars.Cr
' Changes the current input language to the default, and prints the new current language.
InputLanguage.CurrentInputLanguage = myDefaultLanguage
textBox1.Text &= "Current input language is now: " & _
myDefaultLanguage.Culture.EnglishName
End Sub