日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

PB 模糊查询

發布時間:2023/12/31 编程问答 31 豆豆
生活随笔 收集整理的這篇文章主要介紹了 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
? 這里用到的拼接字符串,首先在第二頁中查到信息,然后逐條查看顯示在界面


總結

以上是生活随笔為你收集整理的PB 模糊查询的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。