[VB6 ] End if 一問

[ILoveRiva (天下至柔莫若水)]

各位版友大家好，這是摘自vb研究小站裡面的一段code

想請教版眾這一段code裡面的幾個邏輯


Private Sub Form_Load()
Dim Passed As Byte

TryAgain:

Rslt = InputBox("請輸入正確的通行密碼！","安全檢查","輸入密碼")
If Rslt <> "私拾四十四噬石獅蝨食溼死獅屍詩" Then
Passed = Passed + 1
If Passed = 3 Then
MsgBox "密碼錯誤，禁止通行" ,16     '到目前這一行都懂

End                      <--- 請問為何要這樣子寫呢 , 是語法的規則嗎 ?
End If                        我的想法是 MsgBox "密碼錯誤，禁止通行" ,16
                              下一行就寫Goto TryAgain了

                              還是這個End的意思，是End那個Msgbox掉
                              然後才再跑入TryAgain原來的這個模組呢

                              如果是，為何不End完之後，就加Goto TryAgain呢
                              而是先上一段End If再接 TryAgain ?

                              很不好意思請教版友這麼簡單的問題 > <
                              最近學習vb覺得還蠻好玩的，想說再小不懂
                              都想把他弄清楚，基礎才不會薄弱，還請版友高手
                              不吝賜教，感恩 :)
Goto TryAgain 

End If
MsgBox "密碼正確，你可以通行", vbInformation
End Sub

--




                 一生懸命にあなたと(一緒の)すてきのおもいをてくります

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.132.105.48