InputLanguage.FromCulture(CultureInfo) 方法

public:
 static System::Windows::Forms::InputLanguage ^ FromCulture(System::Globalization::CultureInfo ^ culture);

public static System.Windows.Forms.InputLanguage FromCulture (System.Globalization.CultureInfo culture);

public static System.Windows.Forms.InputLanguage? FromCulture (System.Globalization.CultureInfo culture);

static member FromCulture : System.Globalization.CultureInfo -> System.Windows.Forms.InputLanguage

Public Shared Function FromCulture (culture As CultureInfo) As InputLanguage

參數

傳回

InputLanguage，表示先前選取的輸入語言。

範例

下列程式碼範例會將預設輸入語言設定為目前的輸入語言。

首先， DefaultInputLanguage 會呼叫 來取得系統預設語言。 接下來， CurrentInputLanguage 會呼叫 來取得目前的輸入語言。 結果會列印在文字方塊中。 然後，使用預設輸入語言呼叫 CurrentInputLanguage 會將目前的輸入語言變更為預設值。 新的目前輸入語言會顯示在文字方塊中。

此程式碼假設 textBox1 已具現化。

public:
   void SetNewCurrentLanguage()
   {
      // Gets the default, and current languages.
      InputLanguage^ myDefaultLanguage = InputLanguage::DefaultInputLanguage;
      InputLanguage^ myCurrentLanguage = InputLanguage::CurrentInputLanguage;
      textBox1->Text = String::Format( "{0}Current input language is: {1}\n",
         myCurrentLanguage->Culture->EnglishName, myDefaultLanguage->Culture->EnglishName );
      
      //Print the new current input language.
      InputLanguage^ myCurrentLanguage2 = InputLanguage::CurrentInputLanguage;
      textBox1->Text = String::Format( "{0}New current input language is: {1}",
         textBox1->Text, myCurrentLanguage2->Culture->EnglishName );
   }

 public void SetNewCurrentLanguage() {
    // Gets the default, and current languages.
    InputLanguage myDefaultLanguage = InputLanguage.DefaultInputLanguage;
    InputLanguage myCurrentLanguage = InputLanguage.CurrentInputLanguage;
    textBox1.Text = "Current input language is: " +
        myCurrentLanguage.Culture.EnglishName + '\n';
    textBox1.Text += "Default input language is: " +
        myDefaultLanguage.Culture.EnglishName + '\n';
 
    //Print the new current input language.
    InputLanguage myCurrentLanguage2 = InputLanguage.CurrentInputLanguage;
    textBox1.Text += "New current input language is: " +
        myCurrentLanguage2.Culture.EnglishName;
}

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
       
   'Print the new current input language.
   Dim myCurrentLanguage2 As InputLanguage = InputLanguage.CurrentInputLanguage
   textBox1.Text &= "New current input language is: " & _
       myCurrentLanguage2.Culture.EnglishName
End Sub

備註

方法 FromCulture 會從所有已安裝的鍵盤配置清單中傳回第一個鍵盤配置與比 culture 對。 如果在單一使用者語言下安裝多個鍵盤，它可能會傳回非預期的值。

具體而言，此方法會執行下列作業：

1. 從 函式取得可用輸入語言識別項的完整清單， (HKL) GetKeyboardLayoutList 。

2. 如果存在，則尋找對應至 的 culture HKL。

3. 傳回與該 HKL 相關聯的已安裝鍵盤。

4. 如果找不到鍵盤，則傳 null 回 。

適用於

另請參閱

• DefaultInputLanguage
• CurrentInputLanguage
• Equals(Object)