はじめまして。中学校を利用させていただきVB2008の勉強をしております。
Vb2008にてCombobox1にキーと値を設定しています。
テキストボックスにキー値を入力しButton1をクリックすることで
Combobox1の表示がテキストボックスのキーに相当した値になるように
するにはどうすればよいのでしょうか？教えて下さい。

[Form Load　にて]
        ComboBox1.Items.Clear()
        ComboBox1.Items.Add(New DictionaryEntry("001", "日本"))
        ComboBox1.Items.Add(New DictionaryEntry("002", "アメリカ"))
        ComboBox1.Items.Add(New DictionaryEntry("003", "中国"))
        ComboBox1.Items.Add(New DictionaryEntry("004", "インド"))

[Button1_Clickｸﾘｯｸ]
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

　　　
　　この部分がわかりません。 　　
　
    End Sub

技術的なことで申し訳ありませんがよろしくお願いします。