Помогите с CheckBox - VB

Формулировка задачи:

Всем доброго времени суток! у меня проблемка вот такая: мне нужно чтобы при нажатии на галочку (B CheckBox) Менялся ключ реестра на 1 и обратно, подскажите пожалуйста что для этого вписать в CheckBox надо ?! Заранее большое спасибо.

Решение задачи: «Помогите с CheckBox»

textual
                            Листинг программы 
                        

                            Private Sub CheckBox1_Click()
If CheckBox1.Value Then parametr = 1 Else parametr = 0
End Sub
                        