在編程的過程當中我們難免出很多錯,對後期的代碼調試、代碼的維護對於我們程式員來說都將是個考驗,複雜、枯燥的代碼調試給很多人增加了心理負擔,在做學生管理系統中代碼調試成了自己的家常便飯,每天在調試中理解代碼意思提高了很多,也給自己帶來了很多樂趣,之後再米老師課件的講解中瞭解到為“
每個過程賦予單個退出點”可為是為人民大致服務宗旨的良好體現。 這種方式雖然簡單,但是它的意義重大,給了我們很大的思考……不管我們做任何工作,都應更好的本著為人民服務的宗旨。
Private sub command1_click() If Not Testtxt(txtCourseno.Text) Then '判斷課程編號是否為空白 MsgBox "請輸入課程編號!", vbOKOnly + vbExclamation, "警告" txtCourseno.SetFocus Exit Sub End If If Len(txtCourseno) > 12 Then '對編號位元的限制 MsgBox "課程編號不能超過12位", vbOKOnly + vbExclamation, "警告" txtCourseno.Text = "" txtCourseno.SetFocus Exit Sub End If ……End Sub
•對事件驅動的應用程式中的代碼進行調試是非常麻煩的,因為過程是從別的過程中調用(扇出)的,代碼的執行往往像撞球桌上的撞球彈來彈去。 –Exit Function和Exit Sub這樣的簡單語句可能進一步增強這種複雜性。
•
如果每個過程擁有單個進入點,這將是很有意義的。•每個過程也應該擁有單個退出點,建立單個退出點,可使過程更像是黑箱。代碼的執行從一個門進來,代碼的退出則從另一個門出去,因此產生的錯誤比較少,調試也不太難。•建立單個退出點的操作是非常複雜的,但是它的好處是極大的。•得到的好處大於你付出的努力,這種情況並不是總能碰到,因此務必充分利用它。•解決這個問題的辦法是在每個過程中建立一個PROC_EXIT標註。•在這個標註下面,放入所有必要的清除代碼和一個相應的Exit語句(ExitSub、Exit Function和Exit Property)。•每當你需要退出該過程時,只需加上一個GoToPROC_Exit語句,而不必直接調用Exit命令。
這樣為“每個過程增加單個退出點",在學生管理系統的過程中體現出的是出錯率很低、降低了代碼的複雜程度、很容易代碼調試、效率很高,在今後的學習當中我們應該從開發人員、使用者等多角度學習、思考問題,最大程度的為人民服務!