1樓：匿名使用者
你的問題很多，首先passtime的判斷不對，應該設為初始值為1，結束的時候判斷是否為3就可以了
其次，你語句中的end永遠不會執行，因為前面是exit sub，已經退出過程了，這句就忽略了。
再次，你應該在滑鼠的click事件裡面加上對passtime的累加和判斷語句。
下面是我改好的**，你參考一下。
dim passtime as integer
private sub form_load()
text1.text = ""
text1.maxlength = 8
text2.text = ""
text2.maxlength = 16
text2.passwordchar = "*"
passtime = 1 '我改動了
end sub
private sub command1_click()
if text1 = "123" and text2 = "123" then
msgbox ("登入成功")
form2.show
else
msgbox ("賬戶或密碼錯誤")
text1.text = ""
text2.text = ""
passtime = passtime + 1 '我改動了
end if
if passtime > 3 then
msgbox ("顯示非法使用者,請退出程式.")
end '我改動了
end if
end sub
private sub command1_keypress(keyascii as integer)
if keyascii = 13 then
passtime = passtime + 1
if passtime = 3 then '我改動了
msgbox ("顯示非法使用者,請退出程式.")
end '我改動了
end if
end if
end sub
你的command1的default屬性要為true才可以預設回車時激發command的click 事件
我除錯通過的。
2樓：匿名使用者
passtime 是全域性變數嗎
public
輸密碼的vb程式：第一次輸正確繼續錯誤就重設．第二次正確繼續錯誤就重設．第三次正確繼續錯誤就退出．
3樓：匿名使用者
定義一個窗體級變數n,用於記錄輸入的次數,初始為0,輸入一次加1,當n=3時,且密碼錯,就退出
三次密碼輸入錯誤退出登入用vb**怎樣寫
4樓：
dim a as integer
private sub command1_click()if text1 <> "123" thenif a < 2 then
a = a + 1
text1 = ""
msgbox "密碼錯誤，請重新輸入，你還有" & 3 - a & "次機會"
elseif a = 2 then
msgbox "對不起，因3次輸入錯誤，所以無權使用"
unload me
end if
elseif text1 = "123" thenmsgbox "歡迎使用！"
a = 0 '可用可不用
end if
end sub
5樓：風中的牛
先設定變數x等於輸入錯誤次數,如果大於3則結束程式dim x as integer
private sub command1_click()if text1.text <> "111" thentext1.text = ""
x = x + 1
label1.caption = x
if x > 3 then
endend if
end if
end sub
做一個vb程式，使用者名稱必須是資料庫中的才能進入，若使用者名稱與密碼不相匹配，輸入錯誤三次程式自動退出的
6樓：
資料庫怎麼連線就不寫了，我給你基本的**
vb 口令輸入錯誤超過3次就禁止輸入 怎麼搞 網上的答案都不行的 急急急啊
7樓：匿名使用者
最簡單的方法，超過三次就退出
或者禁用
具體把你用的**發上來，幫你修改
8樓：砍侃看
是輸入框enable屬性為false，或者直接退出
9樓：牛人影視
dim p as integer
private sub command1_click()if text1="123456" thenmsgbox "通過"
else
p=p+1
msgbox "密碼錯誤 " & p & " 次"
if p>3 then
msgbox "密碼錯誤超過 3 次！"
endend if
end if
end sub
vb程式除錯。不清楚**錯了幫忙看下 15
10樓：匿名使用者
print 中b不是反顯了嗎，在b後加個英文分號或逗號。
還有msgbox 也錯了，你是magbox
11樓：我是小柊
首先，你的 **中，if沒有新增對應的end if
如果還是不對，請修改print那行，改成 print "百位數 = " & a & "十位數 = "& b & "個位數 = " & c
12樓：
b 字母后缺了一個分號
b的前面是不是一個冒號「：」, 把它也改成分號
13樓：匿名使用者
x還沒賦值就開始判斷了，把x等於文字框的值放在if前面
vb程式設計,在密碼登陸框中,當使用者輸入使用者名稱錯誤的時候,怎麼讓使用者重新輸入使用者名稱和限制僅輸入三次即退出執行
14樓：
在使用者確認和退出系統之間加個計數，滿3次則end，不滿3次則回到輸入使用者名稱那一段**。
15樓：匿名使用者
dim i as integer
for i=0 to 2
"顯示輸入密碼對話方塊和驗證密碼的**"
"如果密碼正確
exit for"
next i
銀行卡輸錯密碼三次被鎖然後學校還可以扣除學費嗎
銀行卡輸錯密碼三次被鎖，學校還可以扣除學費。申請信用卡和借記卡的過程是不一樣的。申請信用卡時，需攜帶本人有效證件 身份證或身份證影印件 居住地證明單位收入證明或個人資產證明等材料，到銀行櫃檯辦理有關手續，需要填寫申請表，其中填寫資訊要求真實。填寫好申請表之後，要到開戶行總行備案，由開戶行總行對申請資...
銀行卡密碼輸錯三次會怎麼樣啊？怎麼辦啊
如果發生輸入三次密碼錯誤情況,櫃員機首先會提示密碼錯誤 交易已經取消，目前所有銀行櫃員機不會在三次密碼錯誤後吃卡，但貴卡肯定會被凍結。必須在週一至週五正常營業工作日，攜帶開卡本人身份證件原件，到開卡行辦理解凍，櫃員卡才能正常使用。申請信用卡和借記卡的過程是不一樣的。申請信用卡時，需攜帶本人有效證件 ...
銀行卡輸入三次密碼錯誤，怎麼辦，農行卡密碼輸入錯誤3次怎麼辦？
必須本人持身份證，到開卡地這家銀行的任意一家網 點辦理密碼掛失重置業務。密碼掛失業務是必須本人辦理不能代辦的。如果是在工行atm機.上試了三次密碼不對給鎖定了的話 在銀行櫃檯上還有三次試密碼的機會，只要你想起正確密碼，到櫃檯上輸入一下即可，在工商銀行任意一家營業網點都可辦理的業務。擴充套件資料 借記...