表單 Iinit 事件中：
　　Set Exact OFF　 ? 過濾時模糊匹配
　　public m_namp　 ＆＆用于保存輸入值
　　m_namp=′′
　　thisform.dataenvironment.cursor1.filter=′namp=m_namp′ ＆＆設置基本資料庫過濾條件
　　組合框　Dropdown　（下拉）事件中：
　　this.style=0 ＆＆改為下拉組合框以顯示輸入值
　　this.displayvalue=m_namp ＆＆顯示輸入值
　　this.tag=′.t.′ ＆＆置下拉標志
　　組合框　Click　（回收）事件中：
　　this.style=2＆＆恢復為下拉列表框
　　this.tag=′.f.′ ＆＆刪除下拉標志
　　組合框　Keypress　（按鍵）事件中：
　　LPARAMETERS nKeyCode, nShiftAltCtrl ＆＆接收系統傳來的按鍵參數
　　k=nkeycode
　　if (between(k,33,127) or k=7) and this.tag=′.t.′ ＆＆下拉狀態
　　if k=127 or k=7
　　m_namp=left(m_namp,len(m_namp)－1) ＆＆Backspace　或　Del　鍵
　　else
　　m_namp=m_namp＋upper(chr(k)) ＆＆字符鍵,合成查詢值
　　endi
　　this.displayvalue=m_namp ＆＆顯示輸入值
　　nowno=recno()
　　this.requery＆＆刷新列表項
　　if this.listcount=0 ＆＆無符合條件的，清空輸入值且全部顯示
　　m_namp=′′
　　this.displayvalue=′′
　　this.requery
　　? chr(7)
　　wait window ′沒有符合條件的記錄! ′ timeout(1)
　　if nowno>0 and nowno<=recc()
　　go nowno
　　endi
　　endif 
　　nodefault ＆＆不執行父類代碼（首字符匹配，或漸進式查找）
　　endif