2011年度計(jì)算機(jī)等級(jí)考試二級(jí)VFP基礎(chǔ)教程(35)

　　2.編寫代碼：

　　*表單的activate事件代碼：

　　this.text2.enabled=.f. &&輸入用戶名后才能輸入密碼

　　this.text1.setfocus &&表單啟動(dòng)后光標(biāo)先定位到用戶名文本框

　　*"用戶名"文本框text1的確良keypress事件代碼：

　　if nKeycode=13.and.!empty(this.value) &&輸入完用戶名按回車鍵即進(jìn)入輸密碼

　　thisform.text2.enabled=.t.

　　thisform.text2.setfocus

　　endif

　　*命令按鈕"確定"的click事件代碼：

　　name=thisform.text1.value

　　yes=.f. &&全局變量yes在主程序中定義，用于傳回登錄信息。如果合法用戶登錄，將yes置為。t.

　　do case

　　case name="guest".and.alltrim(thisform.text2.value)=="123456"

　　yes=.t. &&第一個(gè)用戶為guest,密碼是123456

　　case name="human".and.alltrim(thisform.text2.value)=="45678"

　　yes=.t. &&第二個(gè)用戶為human,密碼是45678

　　endcase

　　if yes &&此條件為真，說明提交的是正確的用戶名和密碼

　　messagebox("登錄成功")

　　else

　　messagebox("用戶名或密碼不正確")

　　endif

　　thisform.release

　　clear events

　　*"取消"按鈕的click事件代碼：

　　thisform.release

　　clear events

　　*主程序main.prg的代碼：

　　public yes &&用于接收登錄信息的正確性

　　set default to e:\myvfp

　　do form login

　　read events

　　if yes &&此條件為真，說明登錄的是合法用戶

　　do form xggz

　　read events

　　endif

　　cancel

　　　　　　　全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VF輔導(dǎo)筆記匯總

　　　　　　　計(jì)算機(jī)等級(jí)考試二級(jí)VFP上機(jī)試題及答案匯總

　　　　　　　2011年計(jì)算機(jī)等級(jí)考試二級(jí)VFP常用命令小結(jié)