【正文】 同時(shí)，也感謝學(xué)校能給我們這樣的一個(gè)鍛煉機(jī)會(huì)，讓我們有個(gè)鍛煉提升自己的平臺(tái)。這次的課程設(shè)計(jì)讓我真正明白了“腳踏實(shí)地”，“一份耕耘，一份收獲”的人生哲理，也體會(huì)到了技術(shù)開(kāi)發(fā)人員思維的嚴(yán)密性和吃苦耐勞的精神。代碼放入控件的事件中，對(duì)庫(kù)的操作時(shí)用標(biāo)準(zhǔn)的foxpro命令來(lái)實(shí)現(xiàn)，但對(duì)表單和控件的控制就要用到面向?qū)ο蟮木幊陶Z(yǔ)言，例如：。 2．關(guān)于控件與數(shù)據(jù)庫(kù)結(jié)合。表單是一個(gè)大集合，控件就是一個(gè)小集合，它包含著自己的表現(xiàn)特征、用戶(hù)對(duì)它進(jìn)行控制和觸發(fā)的事件和方法。例如變量定義、書(shū)寫(xiě)規(guī)范、常用函數(shù)、循環(huán)語(yǔ)句等等，這些是編程的基礎(chǔ)。數(shù)據(jù)是管理的對(duì)象，一切具體編程都是以數(shù)據(jù)庫(kù)為中心，任何時(shí)候都應(yīng)把對(duì)數(shù)據(jù)的處理作為重點(diǎn)，對(duì)數(shù)據(jù)庫(kù)的原理應(yīng)作到心中有數(shù)。在此感謝我們的老師.，老師嚴(yán)謹(jǐn)細(xì)致、一絲不茍的作風(fēng)一直是我工作、學(xué)習(xí)中的榜樣。三、課程設(shè)計(jì)的總結(jié)及感想在整個(gè)的課程設(shè)計(jì)的過(guò)程中，個(gè)人還是真的學(xué)到了不少的東西，鑒于此，還是看的出來(lái)visual foxpro 還是沒(méi)有很好的學(xué)好，這份課程設(shè)計(jì)讓我更為具體的體會(huì)到了信息系統(tǒng)在物流過(guò)程中的作用，在這個(gè)信息化的年代，所有的實(shí)體都將變?yōu)閿?shù)據(jù)化的流程，因此，信息化不僅之于物流，更在于所有的經(jīng)濟(jì)活動(dòng)。另外如果你需要把它裝在另一臺(tái)電腦內(nèi)，你要看看在臺(tái)電腦是否有visual ，是否有ActiveX控件：（農(nóng)歷控件）。 程序全編完了，運(yùn)行一下主程序，看看是否有錯(cuò)誤，在確認(rèn)無(wú)錯(cuò)誤之后進(jìn)行連編。（圖127）（8）、所以要把此報(bào)表的“。 在本人編庫(kù)房管理軟件中有以下五個(gè)報(bào)表：、。望老師見(jiàn)諒。當(dāng)鼠標(biāo)點(diǎn)擊某一條記錄時(shí)，或用箭頭鍵移動(dòng)時(shí)，被選中的整條背景顏色變?yōu)榧t色。),39。保存表單grgjk。xingm(圖105）。望老師見(jiàn)諒。picture=‘d:\demo\pic\’ ；：report form to preview（5）、建立命令按鈕mand4。請(qǐng)用A4紙！39。 amp。出現(xiàn)的問(wèn)題：1. 點(diǎn)擊退出命令，出現(xiàn)程序錯(cuò)誤解決方案：因?yàn)閷?duì)vfp軟件操作不夠精通，暫時(shí)沒(méi)有想到解決方案。（3）、建立文本框text1。解決方案：因?yàn)閷?duì)vfp軟件操作不夠精通，暫時(shí)沒(méi)有想到解決方案。 () 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=入庫(kù)金額：+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語(yǔ)句’。ButtonCount=11...（3）、建立表格Grid1。 （12）：=.t.=.t. （10）：（11）：=.t.=.t. go bottom go 1if found()在關(guān)閉此表單時(shí)顯示快捷圖標(biāo)（7）：locate for allt(qcmc)=allt()if found()定義全局變量（6）：amp。其它屬性在這里就不一一介紹了。出現(xiàn)的問(wèn)題：1. 點(diǎn)擊保存命令，出現(xiàn)以下程序錯(cuò)誤，顯示文件不存在2. 點(diǎn)擊退出命令，出現(xiàn)以下程序錯(cuò)誤解決方案：因?yàn)閷?duì)vfp軟件的使用不夠精通，所以對(duì)以上出現(xiàn)的錯(cuò)誤無(wú)法給出解決方案，望老師見(jiàn)諒。,36,39。提示信息39。 附加：建立tjia菜單（1）、新建快捷菜單（2）、“填加一條”的‘過(guò)程’內(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”為：（無(wú)）（去掉‘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過(guò)程為：tis=messagebox(保存入庫(kù)單？,4+64,提示窗口)if tis=6if !used(main)use解決方案：因?yàn)閷?duì)vfp軟件的使用不夠精通，所以對(duì)該出現(xiàn)的問(wèn)題無(wú)法解決，望老師見(jiàn)諒。（圖62）（5） 、text1~text5的“controlsource”、（6）、label1~label5的caption為：負(fù)責(zé)人、計(jì)劃員、材料員、保管員、密碼。望老師見(jiàn)諒。if n=3 amp。 amp。amp。 amp。amp。 = amp。判斷l(xiāng)abel1的寬度是否大于160amp。amp。 amp。 amp。（6）計(jì)時(shí)器timer1，interval=200。其init過(guò)程：use systen =0 =public tbs,bgy1,cly1,jhy1,fzr1=0=0bgy1=bgycly1=clyjhy1=jhyfzr1=fzr（2）Label1的caption為“歡迎使用庫(kù)房管理軟件”，透明，楷體，12號(hào)，黃色。跟建立表單一樣，如圖52，我們建立8個(gè)命令按鈕，其‘tooltiptext’分別為：器材入庫(kù)，器材出庫(kù)，修改，瀏覽，查找器材，身體狀態(tài)測(cè)試，猜數(shù)游戲，退出。amp。amp。 命令：do form stcs——\——心靈感應(yīng) 命令：do form systen游戲(\BR——猜數(shù)游戲 命令：do form grgjk——修改個(gè)人工具卡 命令：Clea event編輯(\BR——編輯瀏覽出入庫(kù)單amp。amp。amp。 amp。設(shè)置當(dāng)前路徑set path to data。amp。amp。amp。amp。 今天是：+dtoc(date())+ 庫(kù)房管理應(yīng)用軟件 ver 奇數(shù)日期=rgb(80,150,180) 今天是：+dtoc(date())+ 庫(kù)房管理應(yīng)用軟件 ver 偶數(shù)日期=rgb(80,180,150)amp。amp。amp。amp。amp。amp。amp。 ckbh c(10), rq d(8),qcmc