[VB6 ] |||囧rz 快瘋掉了

看板Visual_Basic作者 (卡布奇諾)時間18年前 (2005/11/09 00:41), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/4 (看更多)
我是高職生 這學期剛剛接觸VB 基本上第一次月考都在上應用軟體丙檢的題目 (唔~~這不是重點) 所以我們的VB知識應該是...趨近於0吧= =+ 目前唯一會的就是....IF...then (一""一就這樣) 然後還有基本的msgbox inputbox 一"一結果老師出了一題很邏輯的問題 ||囧rz _______________ |輸入帳號 | | | →(假如輸入錯誤)出現一個msgbox說帳號錯誤 | | 然後回到輸入帳號 |_____________| ↓(假如輸入正確) _______________ |輸入密碼 | | | →(假如輸入錯誤) 出現一個msgbox說密碼錯誤 | | 然後回到輸入密碼 |_____________| ↓(假如輸入正確) 出現一個msgbox 顯示你的帳號密碼 然後就end了 我現在的問題是.... 要怎麼在出現帳號錯誤or密碼錯誤的時候 回到上一格? 我是用最笨的方法下去寫的囧(沒辦法 我就只會降) Private Sub Form_Load() 1 Dim 帳號, 密碼 As String 2 帳號 = InputBox("請輸入帳號") 3 If 帳號 = "scs60" Then 密碼 = InputBox(帳號 + "輸入密碼") 4 If 帳號 <> "scs60" Then MsgBox ("帳號錯誤") Goto 2<---這是我看書上寫的 5 If 密碼 = "12345" Then MsgBox("帳號"+帳號+"密碼"+密碼) 6 If 密碼 <> "12345" Then MsgBox ("密碼錯誤") Goto 3 End Sub 結果執行的時候恐怖的來了 囧" 一邊打一邊試的時候都還ok 到了第5.6步完的時候要測試 發現......無限輪迴 囧" 我應該要從哪修改呢?! <(_ _)>謝謝大家看完這篇! -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.162.66.60
文章代碼(AID): #13SDL0Wb (Visual_Basic)
文章代碼(AID): #13SDL0Wb (Visual_Basic)