【正文】 同時，也感謝學(xué)校能給我們這樣的一個鍛煉機會，讓我們有個鍛煉提升自己的平臺。這次的課程設(shè)計讓我真正明白了“腳踏實地”，“一份耕耘，一份收獲”的人生哲理，也體會到了技術(shù)開發(fā)人員思維的嚴(yán)密性和吃苦耐勞的精神。代碼放入控件的事件中，對庫的操作時用標(biāo)準(zhǔn)的foxpro命令來實現(xiàn)，但對表單和控件的控制就要用到面向?qū)ο蟮木幊陶Z言，例如：。 2．關(guān)于控件與數(shù)據(jù)庫結(jié)合。表單是一個大集合，控件就是一個小集合，它包含著自己的表現(xiàn)特征、用戶對它進行控制和觸發(fā)的事件和方法。例如變量定義、書寫規(guī)范、常用函數(shù)、循環(huán)語句等等，這些是編程的基礎(chǔ)。數(shù)據(jù)是管理的對象，一切具體編程都是以數(shù)據(jù)庫為中心，任何時候都應(yīng)把對數(shù)據(jù)的處理作為重點，對數(shù)據(jù)庫的原理應(yīng)作到心中有數(shù)。在此感謝我們的老師.，老師嚴(yán)謹(jǐn)細致、一絲不茍的作風(fēng)一直是我工作、學(xué)習(xí)中的榜樣。三、課程設(shè)計的總結(jié)及感想在整個的課程設(shè)計的過程中，個人還是真的學(xué)到了不少的東西，鑒于此，還是看的出來visual foxpro 還是沒有很好的學(xué)好，這份課程設(shè)計讓我更為具體的體會到了信息系統(tǒng)在物流過程中的作用，在這個信息化的年代，所有的實體都將變?yōu)閿?shù)據(jù)化的流程，因此，信息化不僅之于物流，更在于所有的經(jīng)濟活動。另外如果你需要把它裝在另一臺電腦內(nèi)，你要看看在臺電腦是否有visual ，是否有ActiveX控件：（農(nóng)歷控件）。 程序全編完了，運行一下主程序，看看是否有錯誤，在確認無錯誤之后進行連編。（圖127）（8）、所以要把此報表的“。 在本人編庫房管理軟件中有以下五個報表：、。望老師見諒。當(dāng)鼠標(biāo)點擊某一條記錄時，或用箭頭鍵移動時，被選中的整條背景顏色變?yōu)榧t色。),39。保存表單grgjk。xingm(圖105）。望老師見諒。picture=‘d:\demo\pic\’ ；：report form to preview（5）、建立命令按鈕mand4。請用A4紙！39。 amp。出現(xiàn)的問題：1. 點擊退出命令，出現(xiàn)程序錯誤解決方案：因為對vfp軟件操作不夠精通，暫時沒有想到解決方案。（3）、建立文本框text1。解決方案：因為對vfp軟件操作不夠精通，暫時沒有想到解決方案。 () CASE =1 AND =ctod(rq1) AND =ctod(rq2) and 0+bzu CASE =10 whe= where allt()=39。消耗品39。 AND =ctod(rq1) AND =ctod(rq2) and量具39。 CASE =6 whe= where allt()=39。 0+bzu AND =ctod(rq1) AND =ctod(rq2) and鋼材39。 CASE =2 and 0+bzu CASE =10 whe= where allt()=39。消耗品39。 and量具39。 CASE =6 whe= where allt()=39。 0+bzu and鋼材39。 CASE =2 CASE =1 CASE =11 CASE =10 CASE =9 CASE =8量具39。 CASE =6配件39。 CASE =4鋼材39。 CASE =2 whe= where allt()=39。 whe= where allt()=39。 whe= where allt()=39。 whe= where allt()=39。 whe= where allt()=39。 and 0 whe= where allt()=39。 and 0 whe= where allt()=39。 and 0 =4endifsele tempsum rkje to rkhjsum ckje to ckhjkchj=rkhjckhj=入庫金額：+str(rkhj)+ =sel+whe AND =ctod(rq1) AND =ctod(rq2) endcase AND =ctod(rq1) AND =ctod(rq2) AND =ctod(rq1) AND =ctod(rq2) AND =ctod(rq1) AND =ctod(rq2) AND =ctod(rq1) AND =ctod(rq2) whe= where allt()=39。 AND =ctod(rq1) AND =ctod(rq2) whe= where allt()=39。 AND =ctod(rq1) AND =ctod(rq2) whe= where allt()=39。 whe=where =ctod(rq1) AND =ctod(rq2) =4elseDO CASE =sel+whe endcase whe= where allt()=39。 whe= where allt()=39。 whe= where allt()=39。 whe= =sel=SELE ,qcmc,ggxh,lb,dj,pzbh,rksl,rkje,ckbh,cksl,ckje,bz,llr,fzr,bgy,jhy,lh,dw FROM main INTO CURSOR TEMP if empt() or empt()DO CASE ()Caption=‘清除選擇’；：===()（12）、建立Command5。 amp。amp。amp。)DO CASE Caption=‘打印’；：messagebox(39。ControlSounrce=‘bz1’；RowSounrce=‘一班,二班,三班,四班,五班,六班,辦公室’；RowSounrceType=‘1值’。ControlSounrce=‘rq1’；RowSounrce=‘select rq distinct from main into cursor bo1’；RowSounrceType=‘3SQL語句’。ButtonCount=11...（3）、建立表格Grid1。 （12）：=.t.=.t. （10）：（11）：=.t.=.t. go bottom go 1if found()在關(guān)閉此表單時顯示快捷圖標(biāo)（7）：locate for allt(qcmc)=allt()if found()定義全局變量（6）：amp。其它屬性在這里就不一一介紹了。出現(xiàn)的問題：1. 點擊保存命令，出現(xiàn)以下程序錯誤，顯示文件不存在2. 點擊退出命令，出現(xiàn)以下程序錯誤解決方案：因為對vfp軟件的使用不夠精通，所以對以上出現(xiàn)的錯誤無法給出解決方案，望老師見諒。,36,39。提示信息39。 附加：建立tjia菜單（1）、新建快捷菜單（2）、“填加一條”的‘過程’內(nèi)容為：locat for =0if found()amp。提示信息39。.= value (bh1,rq1,llr1,jhy1) (ckbh,rq,qcmc,ggxh,dw,dj,cksl,ckje,llr,jhy) 。 value (bh1,rq1,gcmc1,llr1,jhy1,bz1)insert into main (ckbh,rq,qcmc,ggxh,dw,dj,cksl,ckje,gcmc,yt,llr,jhy,lb,bz) 。,16,39。)messagebox(39。,16,39。,16,39。.=39。39。.=39。ls39。 dj n(8,2), cksl n(8,2), ckje n(10,2),gcmc c(30),bz c(6),?！癲eletemark”為：‘.’；“recordmark”為：‘.’；“recordsource”為：（無）（去掉‘main’）；“scrollbars”為：‘2垂直’。其他略。 text19,text20,text23,cbo1,text9,text13text5=text6=text7=text13=text17=text19=text20=text23=text12=text9=text4=text8=text10=text11=text1=year(date())text2=month(date())text3=day(date())cbo1= llr bgyrepl with rkje rksl with text8repl qcmc with text19repl gcmc with cbo1repl（4）、命令按鈕mand1（確定）的click過程為：tis=messagebox(保存入庫單？,4+64,提示窗口)if tis=6if !used(main)use解決方案：因為對vfp軟件的使用不夠精通，所以對該出現(xiàn)的問題無法解決，望老師見諒。（圖62）（5） 、text1~text5的“controlsource”、（6）、label1~label5的caption為：負責(zé)人、計劃員、材料員、保管員、密碼。望老師見諒。if n=3 amp。 amp。amp。 amp。amp。 = amp。判斷l(xiāng)abel1的寬度是否大于160amp。amp。 amp。 amp。（6）計時器timer1，interval=200。其init過程：use systen =0 =public tbs,bgy1,cly1,jhy1,fzr1=0=0bgy1=bgycly1=clyjhy1=jhyfzr1=fzr（2）Label1的caption為“歡迎使用庫房管理軟件”，透明，楷體，12號，黃色。跟建立表單一樣，如圖52，我們建立8個命令按鈕，其‘tooltiptext’分別為：器材入庫，器材出庫，修改，瀏覽，查找器材，身體狀態(tài)測試，猜數(shù)游戲，退出。amp。amp。 命令：do form stcs——\——心靈感應(yīng) 命令：do form systen游戲(\BR——猜數(shù)游戲 命令：do form grgjk——修改個人工具卡 命令：Clea event編輯(\BR——編輯瀏覽出入庫單amp。amp。amp。 amp。設(shè)置當(dāng)前路徑set path to data。amp。amp。amp。amp。 今天是：+dtoc(date())+ 庫房管理應(yīng)用軟件 ver 奇數(shù)日期=rgb(80,150,180) 今天是：+dtoc(date())+ 庫房管理應(yīng)用軟件 ver 偶數(shù)日期=rgb(80,180,150)amp。amp。amp。amp。amp。amp。amp。 ckbh c(10), rq d(8),qcmc