化妝品銷(xiāo)售管理系統(tǒng)-閱讀頁(yè)
2025-04-23 13:57本頁(yè)面
【正文】 im() into cursor tempcase =2 select * from 資料 where 品名 like alltrim()+% into cursor tempcase =3 select * from 資料 where 單價(jià)= and 單價(jià)= into cursor temp endcasedo form mand2————————click:release thisform 20 / 34 Form1————————init:=temp數(shù)據(jù)環(huán)境：Form1————————init:= .F.= .F.= .F.= .F.= .F.= .t.= .t.= .t.= .t. 21 / 34= .t.Command1————————click:GO topLOCATE ALL FOR ALLTRIM()==ALLTRIM()IF ==MESSAGEBOX(查詢(xún)不能為空！,48,溫馨提示)elseIF FOUND() =編號(hào) =品名 =單價(jià) =規(guī)格 =數(shù)量 ELSE MESSAGEBOX(無(wú)此記錄,48,溫馨提示) endifendifmand2————————click:DO CASE CASE =1 replace 編號(hào) WITH ALLTRIM() CASE =1 replace 品名 WITH ALLTRIM() CASE =1 replace 單價(jià) WITH CASE =1 replace 規(guī)格 WITH ALLTRIM() CASE =1 replace 數(shù)量 WITH ENDCASE MESSAGEBOX(修改成功！)Command3———————— =check1————————click:= .t. 22 / 34= .f.check2————————click:= .t.= .f.check3————————click:= .t.= .f.check4————————click:= .t.= .f.check5————————click:= .t.= .f.mand4————————click:RELEASE thisform10．刪除表單數(shù)據(jù)環(huán)境：Form1————————init:= .F.text1————————enteractivechange:=”sele 品名 from 資料 where 品名 likeALLTRIM()+39。 into cursor temp list1————————click：= = .F.mand1————————click:USE EXCLUSIVE 23 / 34GO toploca ALL FOR 品名=alltrim()IF FOUND()DELETE ALL FOR 品名=alltrim()PACK MESSAGEBOX(success!)ELSE MESSAGEBOX(no record!)endif1商品增添表單 數(shù)據(jù)環(huán)境：Command1————————click:SELECT 資料IF == OR 。=”本品是 版，版權(quán)所有，盜版必究！”Thisform。=”qq：971137239”Thisform。=”電話(huà)：18749650123 住址：2 區(qū) 1118” 31 / 34系統(tǒng)管理————子菜單注冊(cè)新用戶(hù)——do form 修改密碼———do form 用戶(hù)注銷(xiāo)———do form 退出系統(tǒng) ———quit數(shù)據(jù)更新維護(hù)——子菜單查詢(xún)信息————do form 信息查詢(xún)修改信息————do form 信息修改增添信息————do form 信息增添刪除信息————do form 信息刪除積分——————子菜單積分注冊(cè)————do form 積分積分查詢(xún)————do form 積分查詢(xún)積分添加————do form 積分添加積分用戶(hù)注銷(xiāo)——do form 注銷(xiāo)銷(xiāo)售——————子菜單銷(xiāo)售———do form 打印報(bào)表————子菜單今日?qǐng)?bào)表 report form preview 月報(bào)表 report form preview年報(bào)表 report form preview 關(guān)于本軟件————do form 五、設(shè)計(jì)體會(huì)Vfp 是一門(mén)比較有趣的課程，在設(shè)計(jì)過(guò)程中完全感受到它的魅力，通過(guò)可 32 / 34視化的操作使得操作界面更加美觀(guān)更加的人性化。對(duì)于實(shí)習(xí)過(guò)程中選用的代碼，我感覺(jué)這都是一些簡(jiǎn)單的代碼，沒(méi)有什么太大的難度，只是好多人不愿意去弄明白罷了。還有就是，我感覺(jué)至于代碼不用弄得那么死板，完全可以根據(jù)自己的理解來(lái)自由的變換，使得自己能夠得心應(yīng)手就行了。六、參考文獻(xiàn) 33 / 34 習(xí)題解析與編程實(shí)例 （清華大學(xué)出版社）Visualfoxpro8 數(shù)據(jù)庫(kù)項(xiàng)目案例導(dǎo)航 （清華大學(xué)出版社）Visualfoxpro 數(shù)據(jù)庫(kù)設(shè)計(jì)教程 （機(jī)械工業(yè)出版社）Visualfoxpro 應(yīng)用基礎(chǔ) （高等教育出版社）
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1