Как обновить комбобокс, получив значение реестра

Question

Как я могу получить значение из реестра и автоматически заполнить поля, когда пользователь откроет программу, а также установить флажок, если значение в реестре равно 1 или 0 для примера?

Это код для ComboBox

Private Sub ComboBox3_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox3.SelectedIndexChanged
Select Case ComboBox3.SelectedItem

    Case "Volume 1"
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\VolumeLevel", "00000001", "REG_DWORD")
        ListBox1.Items.Add("Volume 1 Enabled")
    Case "Volume 2"
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\VolumeLevel", "00000002", "REG_DWORD")
        ListBox1.Items.Add("Volume 2 Enabled")
    Case "Volume 3"
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\VolumeLevel", "00000003", "REG_DWORD")
        ListBox1.Items.Add("Volume 3 Enabled")
    Case "Volume 4"
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\VolumeLevel", "00000004", "REG_DWORD")
        ListBox1.Items.Add("Volume 4 Enabled")
    Case "Volume 5"
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\VolumeLevel", "00000005", "REG_DWORD")
        ListBox1.Items.Add("Volume 5 Enabled")
End Select
End Sub

Это код для CheckBox

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
    If CheckBox1.Checked = True Then
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\SoundOnOff", "1", "REG_DWORD")
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\SoundOn", "1", "REG_DWORD")
        ListBox1.Items.Add("Sound Enabled")
    Else
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\SoundOn", "0", "REG_DWORD")
        objShell.RegWrite("HKEY_CURRENT_USER\SOFTWARE\MyApp\app\Config\SoundOnOff", "0", "REG_DWORD")
        ListBox1.Items.Add("SoundDisabled")
    End If
End Sub

Я пытаюсь сделать так, но поля все еще пустые, когда я открываю, вот что я пытаюсь:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ComboBox3.Text = My.Computer.Registry.GetValue("HKEY_CURRENT_USER\SOFTWARE\Webzen\Mu\Config\", "ID", " ")
        ComboBox3.Text = My.Computer.Registry.GetValue("HKEY_CURRENT_USER\SOFTWARE\Webzen\Mu\Config\", "UserID", " ")
        ComboBox3.Text = My.Computer.Registry.GetValue("HKEY_CURRENT_USER\SOFTWARE\Webzen\Mu\Config\", "Exe", " ")
    End Sub

Спасибо!