VFP基礎(chǔ)教程 5.4 文本框(textbox)控件

    一。文本框用于顯示，修改和錄入數(shù)據(jù)，常用屬性見下表：

    例如，如果表單中一個(gè)文本框用于顯示和輸入日期型數(shù)據(jù)，則應(yīng)該將其value屬性設(shè)為{};如果一個(gè)文本框用于輸入5個(gè)任意字符，應(yīng)該將其inputmark屬性設(shè)為XXXXX;如果一個(gè)文本框用于輸入6位的數(shù)字，則應(yīng)該將其inputmark屬性設(shè)為999999.

Visual FoxPro基礎(chǔ)教程完整版

    二。文本框常用的事件：見下表：

    例如，可在when事件的代碼中保存文本框中原來的內(nèi)容，可在valid事件代碼中驗(yàn)證文本框中輸入內(nèi)容的正確性。valid事件中的return返回。F.,則文本框不會(huì)失去焦點(diǎn)。表單釋放時(shí)，忽略return值的影響。

    三。例1:在主程序main.prg中先調(diào)用表單login.scx進(jìn)行用戶登錄，如果用戶名和密碼正確，則調(diào)用表單xggz.scx（該表單的制作見5-2的例一）.

    1.制作login.scx并設(shè)置屬性：

    表單login.scx包含下列對象：標(biāo)簽label1～label2作提示信息；文本框text1用于輸入用戶名，文本框text1用于輸入密碼，"確定"命令按鈕用于提交登錄；"取消"命令按鈕用于取消登錄，界面如圖18所示。

    依照界面設(shè)置命令按鈕和標(biāo)簽的caption屬性，并將表單的caption屬性設(shè)為"用戶登錄",autocenter屬性設(shè)為。T.;將文本框text2的passwordchar屬性設(shè)為"*".將表單保存在e:myvfp.

    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

Visual FoxPro基礎(chǔ)教程完整版

生活不易，碼農(nóng)辛苦
如果您覺得本網(wǎng)站對您的學(xué)習(xí)有所幫助,可以手機(jī)掃描二維碼進(jìn)行捐贈(zèng)