PB 模糊查询
??? 自考畢業設計已經完成,其中用到了模糊查詢,和之前用到的異曲同工。
1.需求
?? 我的系統是《醫藥信息管理系統》,要根據藥品名等字段查詢銷售藥品的記錄。
2.界面
3.查詢功能的實現
//窗口xsdjcx_win的“查詢”按鈕的clicked()事件,檢索滿足條件的數據記錄 string fh,zd,nr,zhtj fh=trim(ddlb_2.text)if ddlb_1.text="銷售票號" thenzd="xsph"nr="'"+sle_1.text+"'" elseif ddlb_1.text="藥品編號" thenzd="ypbh"nr="'"+sle_1.text+"'" elseif ddlb_1.text="藥品名稱" thenzd="ypmc"nr="'"+sle_1.text+"'" elseif ddlb_1.text="簡稱" thenzd="jc"nr="'"+sle_1.text+"'" end if //綜合條件 zhtj=zd+fh+""+nr+"" tab_1.tabpage_2.dw_1.settransobject(sqlca) //對滿足條件的數據進行過濾 tab_1.tabpage_2.dw_1.setfilter(zhtj) //檢索數據 tab_1.tabpage_2.dw_1.filter() tab_1.tabpage_2.dw_1.retrieve() int row string xsph //得到當前行的行號 row=tab_1.tabpage_2.dw_1.getrow() if row=0 thenmessagebox("","沒有您要查詢的入庫信息!") else//得到當前行第四列的值xsph=tab_1.tabpage_2.dw_1.getitemstring(row,3)string xsph1//選擇數據select xsph into :xsph1 from xxdj_tab;if xsph1="" thenelsestring ypbh,jsr,czy,xsph4,ckrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je//選擇數據select ypbh,jsr,czy,xsph,ckrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je into :ypbh,:jsr,:czy,:xsph4,:ckrq,:jsfs,:ckmc,:ypmc,:jc,:jx,:hw,:cd,:gg,:bz,:dw,:sb,:pzwh,:ph,:bzq,:dj,:sl,:je from xxdj_tab where xsph=:xsph;xsdjcx(ypbh,jsr,czy,xsph,ckrq,jsfs,ypmc,ckmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je)end if end if? 這里用到的拼接字符串,首先在第二頁中查到信息,然后逐條查看顯示在界面
總結
- 上一篇: 易语言多线程框架教程
- 下一篇: android美图秀秀--基础