在該段代碼中,首先定義了一個靜態(tài)變量i,它用來記錄用戶輸入密碼的次數(shù)。i的初值為O,每單擊一次按鈕,則i的值增1(i=i+1).然后使用If語句來判斷i的值,如果i的值小于3,即用戶輸入密碼不超過三次,又使用了一個If語句來判斷用戶所輸入的密碼是否正確。如果正確(即輸入的是abcd),則驗(yàn)證密碼窗體消失,同時啟動另一個窗體。如果輸入的密碼不正確,則會在窗體的標(biāo)簽上顯示"密碼錯誤,請?jiān)僭囈槐?".如果第三次輸入密碼也不正確,此時i的值已經(jīng)累加到3.再次輸入密碼,程序不會再判斷密碼是否正確(因?yàn)?≮3 ),而是在窗體上顯示"三次輸入錯誤,拒絕重新輸入!",并且將文本框置為無效。因此,即便是用戶在第四次輸入了正確的密碼,也無濟(jì)于事。
雙擊另一個窗體上的按鈕控件,將程序結(jié)束語句End添加到按鈕的Click事件中,如下所示:
Private Sub ComMain_Click()
End
End Sub
在【工程屬性】對話框中設(shè)置啟動窗體為ForPass,運(yùn)行該程序,則出現(xiàn)【驗(yàn)證密碼】窗體,在文本框中輸入字符串a(chǎn)bcd,文本框中顯示的是"****",如圖5-23所示。單擊【確定】按鈕,則驗(yàn)證密碼窗體消失,另一個窗體顯示出來,如圖5.24所示。單擊【關(guān)閉】按鈕可以退出該程序。
再次運(yùn)行該程序,在【驗(yàn)證密碼】窗體的文本框中隨意輸入一個字符串(不是abcd),單擊【確定】按鈕,則窗體上顯示"密碼錯誤,請?jiān)僭囈槐?".如圖5.25所示。連續(xù)三次輸入錯誤的密碼,當(dāng)?shù)谒拇屋斎朊艽a時,無論密碼正確與否,單擊【確定】按鈕則窗體上顯示"三次輸入錯誤,拒絕重新輸入!",并且將文本框置為無效,用戶無法繼續(xù)輸入密碼,如圖5.26所示。
2011計算機(jī)等級考試二級VB考點(diǎn)及習(xí)題匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |