PTT數位生活區 / Visual_Basic

Re: [VB6 ] 密碼問題

看板Visual_Basic作者 (MP3隨身碟眼花嘹亂~~)時間19年前 (2005/08/23 21:00), 編輯推噓2(2推 0噓 1→)
留言3則, 2人參與, 最新討論串3/4 (看更多)
為什麼要用While判斷呢？ VB是"事件驅動"(找不到什麼好的名詞) 所以只要使用者觸發事件時 去檢查前面輸入錯誤的次數 若超過次數，直接結束就好了 想不出那個while是幹麻用的 ※ 引述《fuwafuwa (０８１９我要輕鬆玩)》之銘言： : 　我想要寫一個輸入密碼的程式， : 　密碼輸入錯誤三次就結束系統， : 　密碼對了就進入另一個form， : 　程式碼如下： : Dim flag As Integer : Private Sub Text1_KeyPress(KeyAscii As Integer) : flag = 0 : While flag < 3 : If KeyAscii = 13 Then : If Text1.Text = "12345" Then : Form8.Visible = False : Form1.Visible = True : Else : flag = flag + 1 : Print "密碼輸入錯誤，請重新輸入。" : End If : End If : Wend : Print "密碼輸入錯誤已達三次，謝謝光臨歡迎下次再來。" : End : End Sub : 執行時無法在text1輸入，只要按一個鍵， : 整個程式就當掉。 : 請問問題出在哪，先謝謝回答的人。:D -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.161.73.179
推
210.58.156.43 08/24, , 1F
而且在迴圈中也沒有給予重新輸入的機會
210.58.156.43 08/24, 1F
推
140.109.128.107 09/07, , 2F
用隱藏的 text物件 來累積錯誤次數 也是可以　
140.109.128.107 09/07, 2F
→
140.109.128.107 09/07, , 3F
把 while 拿掉,說得沒錯,還要再加上再輸入的程序
140.109.128.107 09/07, 3F
‣ 更多 idleidle 的文章
文章代碼(AID): #132ntn-g (Visual_Basic)
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 3 之 4 篇)：
排序： 最舊先 | 最新先 | 留言數
在新視窗開啟完整討論串 (共4篇)
Visual_Basic 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 idleidle 的文章
文章代碼(AID): #132ntn-g (Visual_Basic)