例子如下:表單中有三個文字框,分別為:編號,名稱,單價。需要手動輸入編號後,名稱,單價為自動匹配的解決方法如下:、先建立包含 編號 C型,名稱 C型,單價 N型 三個欄位的表,長度根據需要自定,起名:價格表.dbf。二、將表單中的 編號 對應的文字框改為組合框combo1,名稱、單價對應文字框text1、text2;表單的資料環境中新增 價格表.dbf。三、設定combo1屬性,rowsource值為:價格表.編號;rowsourcetype值為:6-欄位。四、設定text1、text2屬性,readonly值為:.T.-真五、combo1的interactivechange事件程式碼 bh1=thisform.combo1.value &&將combo1所選編號賦值給變數bh1 bh=["]+bh1+["] &&將bh1加定界符,欄位編號是字元型 select 價格表 &&選擇價格表 locate for 編號=&bh &&在價格表中查詢所選擇編號 thisform.text1.value=名稱 thisform.text2.value=單價六、執行表單,combo1編號選擇完成,text1、text2即顯示該編號對應的名稱、單價。
例子如下:表單中有三個文字框,分別為:編號,名稱,單價。需要手動輸入編號後,名稱,單價為自動匹配的解決方法如下:、先建立包含 編號 C型,名稱 C型,單價 N型 三個欄位的表,長度根據需要自定,起名:價格表.dbf。二、將表單中的 編號 對應的文字框改為組合框combo1,名稱、單價對應文字框text1、text2;表單的資料環境中新增 價格表.dbf。三、設定combo1屬性,rowsource值為:價格表.編號;rowsourcetype值為:6-欄位。四、設定text1、text2屬性,readonly值為:.T.-真五、combo1的interactivechange事件程式碼 bh1=thisform.combo1.value &&將combo1所選編號賦值給變數bh1 bh=["]+bh1+["] &&將bh1加定界符,欄位編號是字元型 select 價格表 &&選擇價格表 locate for 編號=&bh &&在價格表中查詢所選擇編號 thisform.text1.value=名稱 thisform.text2.value=單價六、執行表單,combo1編號選擇完成,text1、text2即顯示該編號對應的名稱、單價。