【正文】
End SubPrivate Sub Timer1_Timer() = Time = DateEnd SubOption ExplicitDim rs_find As New Private Sub Command1_Click()On Error GoTo cmderrorDim find_date1 As StringDim find_date2 As StringIf = True Then sqlfind = select * from 入出庫 where 貨單號 between 39。 amp。 _ Combo1(0).Text amp。 39。 amp。 and amp。 39。 amp。 Combo1(1).Text amp。 39。End IfIf = True Then find_date1 = Format(CDate(boy(0).Text amp。 amp。 _ bom(0).Text amp。 amp。 bod(0).Text), yyyymmdd) find_date2 = Format(CDate(boy(1).Text amp。 amp。 _ bom(1).Text amp。 amp。 bod(1).Text), yyyymmdd) sqlfind = select * from 入出庫 where 日期 between amp。 _ find_date1 amp。 amp。 and amp。 amp。 find_date2 amp。 End If sqlfind, conn, adOpenKeyset, adLockPessimisticUnload Mecmderror:If 0 Then MsgBox 請輸入正確的查詢條件!, vbOKOnly + vbExclamation, 警告End IfEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim i As IntegerDim j As IntegerDim sql As String39。If findok = True Then 39。39。End Ifsql = select * from 入出庫 order by 貨單號 desc = adUseClient sql, conn, adOpenKeyset, adLockPessimisticIf = False Then 39。添加貨單號 With rs_find Do While Not .EOF Combo1(0).AddItem .Fields(0) Combo1(1).AddItem .Fields(0) .MoveNext Loop End WithEnd IfFor i = 2001 To 2005 39。添加年 boy(0).AddItem i boy(1).AddItem iNext iFor i = 1 To 12 39。添加月 bom(0).AddItem i bom(1).AddItem iNext iFor i = 1 To 31 39。添加日 bod(0).AddItem i bod(1).AddItem iNext iEnd SubPrivate Sub Form_Unload(Cancel As Integer)End SubPrivate Sub Option1_Click() = FalseEnd SubPrivate Sub Option2_Click() = FalseEnd Sub設(shè)計(jì)總結(jié)通過對本倉庫貨物管理系統(tǒng)的設(shè)計(jì),使我認(rèn)識到軟件開發(fā)的過程實(shí)際上就是描述現(xiàn)實(shí)世界的過程。而由現(xiàn)實(shí)世界向軟件模型的轉(zhuǎn)化過程是其中最核心的過程。在課程設(shè)計(jì)的過程中我們遇到了許多問題。而這些問題的產(chǎn)生都是由于理論知識和實(shí)踐經(jīng)驗(yàn)的缺乏造成的。在此過程中我通過張聚禮老師的指導(dǎo)、同學(xué)的幫助、自學(xué)戰(zhàn)勝了所有的困難。使我得到一次難的鍛煉機(jī)會(huì),加深了對理論知識的理解,豐富了實(shí)踐經(jīng)驗(yàn)。同時(shí)更讓我深刻體會(huì)到團(tuán)隊(duì)協(xié)作的重要性,并通過這次設(shè)計(jì)讓我從整體的程序開發(fā)到具體軟件的設(shè)計(jì)都有了一個(gè)全面的掌握,為我即將從事的工作打下了一個(gè)堅(jiān)實(shí)的基礎(chǔ)!但是由于課程設(shè)計(jì)時(shí)間較短,所以該系統(tǒng)還有許多不盡人意的地方,用戶界面設(shè)計(jì)不夠美觀,統(tǒng)計(jì)功能還不完善等,這些都有待進(jìn)一步改善。這次課程設(shè)計(jì),提高了我的實(shí)際操作能力,從以前的理論上升到實(shí)踐,從感性認(rèn)識上升到理性認(rèn)識,真正做到學(xué)有所用。雖然在設(shè)計(jì)過程中也遇到一些困難,但在周小健老師和同學(xué)們的幫助下,再加上自己的努力,都一一克服了!參考文獻(xiàn)[1]張海藩,軟件工程導(dǎo)論[M].清華大學(xué)出版社,2003年12月[2][M].清華大學(xué)出版社,2004年9月[3]薩師煊,[M].清華大學(xué)出版社,2002年2月[4]汪孝宜,劉中兵,[M].電子工業(yè)出版社,2005年1月[5][M].,9.[6][M].,2.[7][J].,5.[8][M].,3.[9][M].,1.[10][M].,4.