【正文】
更多的是團隊的合作不僅是一個能夠更好的完成任務的前提,同時也使我明白了如何與他人配合,如何與他人相處。通過這次的設計,我們小組學到了很多,同時也學會了細心與耐心的培養(yǎng)。不足之處就是我們在溝通這方面做的還不夠,有時候制作系統(tǒng)時效率不高,導致時間浪費。由于缺乏相關的管理系統(tǒng)設計經(jīng)驗,我們制作系統(tǒng)的過程中,方法不太成熟,一些步驟出現(xiàn)錯誤,但經(jīng)過修改,已經(jīng)完成了任務。在具體的設計與實施中,我們看到并感受到了一個校園快件派件管理系統(tǒng)從無到有的過程,對具體的設計步驟、思路、方法、技巧都有了進一步的了解,并感受深刻。這對我們來說是一次嘗試與創(chuàng)新的過程,也可以說是一個挑戰(zhàn)的過程,畢竟以前沒有作過,缺少經(jīng)驗。課程設計是對我的一次全面的測試,它既鍛煉了我的動手的能力也磨練了我的心理素質(zhì)。經(jīng)過一個多星期的課程設計,收獲頗多。我們的目的就是為了以最便捷的派件方式,運送和配送到指定的目的地或?qū)W生手中。 = strquerySet = Adodc1End SubPrivate Sub Command2_Click()End Sub實踐心得這個短學期我們做了系統(tǒng)的設計,感覺受益不淺。 / amp。 _ End SubPrivate Sub Adodc2_WillMove(ByVal adReason As , adStatus As , ByVal pRecordset As ) = 記錄: amp。 amp。 = strqueryEnd SubPrivate Sub Command2_Click()End SubPrivate Sub DataCombo1_Click(Area As Integer)Dim strquery As String = adCmdTextstrquery = select * from 派件完成情況表 where = amp。 = strqueryEnd SubPrivate Sub Command9_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command8_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command7_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command6_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command5_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command4_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command2_Click()End SubPrivate Sub Command3_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command16_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command15_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command14_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command13_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubPrivate Sub Command12_Click()Dim strquery As String = adCmdTextstrquery = select * from 貨位分配表 where 貨位號 like 39。 = strqueryEnd SubP