Merhaba arkadaşlar

vb'de ufak bir programcık yazmaya çalışıyorum. Kullanıcıdan bir inputboxle şifre istiyorum ve kullanıcı doğru şifre yazarsa program sorunsuz açılacak ve yanlış yazarsa kullanıcıya 3 hak sunacak 3 kez şifresini isteyecek. 3 kezde doğru yazamazsa programı kapatacak. Şimdi bunu if ve for ile yapmak istiyorum. 3 kez tekrarlama için for doğru yanlış olayı içinde if. Şu şekilde bir kod yazdım.

        Dim kutu, sifre As String
        Dim i As Short

        sifre = "123"
        kutu = InputBox("Şifre Giriniz")

        For i = 1 To 3
            If kutu = sifre Then
                MsgBox("Tebrikler! Programa Hoşgeldiniz.")
            Else
                MsgBox("Hatalı Şifre Girdiniz. Lütfen Tekrar Deneyiniz.")
            End If
        Next

Şimdi forun içersindeki kodları 3 kez çalıştırıyor. Ve ben ifle kontrol yapıyorum yani düşüncem şu bakıcak şifre kutu ile aynımı aynıysa tebrikler dicek değilde hatalı dicek sonra başa dönecek gene aynı kontrolü yapacak. Ama böyle olmuyor if kontrolunu forun içinde yapmıyor. Diyelim şifre doğru 3 kez ekrana msgbox tebrikler basıyor. Yada yanlışsa 3 kez ekrana hatalı şifre basıyor.

Nerde hata yapıyorum ? Lütfen kod vermeden hatamın nerde olduğunu hangi mantıkla gitmem gerektiğini söyleyebilirmisiniz ?