[VB6 ] End if 一問
各位版友大家好，這是摘自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
討論串 (同標題文章)