標籤:style blog color 使用 2014 問題
在寫機房學生註冊功能的時候,遇到了一些小問題,正如“麻雀雖小,五髒俱全”一樣,問題雖小不一定自己就完全理解它的邏輯流程,在這裡總結一下,便於以後的使用和深入學習。
首先來看看學生註冊的流程:當輸入卡號的時候,通過尋找,判斷卡號是否存在,存在,重新輸入;反之繼續輸入資訊。點擊儲存時,先判斷學號是否存在,存在,提示重新輸入學號;不存在,提示註冊成功。
當然這是我理解的,每個人的理解存在些許的不同。
在設計的時候,在D層中就出現了,尋找,插入,判斷三個方法。在B層中首先要尋找卡號是否存在,再在插入之前判斷學號是否存在。這就說明在插入方法中用了判斷方法。
瞭解了流程,接下來看看這三個方法在B層中怎麼寫。第一種,我們可以定義插入、判斷兩個方法,在插入中直接使用判斷。
第二種,將判斷方法定義為私人方法,在插入方法中調用這個私人方法。來看看第二種的代碼:
Public Sub InsertStudentInfoDAL(ByVal enStudentInfo As Entity.enStudentInfo) '執行插入語句 這裡定義的參數enStudentInfo在整個方法中都適用 Dim dInfo As DAL.RegisterDAL Dim isExist As Boolean '定義一個boolean變數 ,用於判斷是否成功註冊 isExist = QueryStudentNo(enStudentInfo.StudentNo) '此處調用了定義的私人方法
If isExist = True Then '若值為true,則說明註冊成功 dInfo = New DAL.RegisterDAL() dInfo.InsertDAL(enStudentInfo) MsgBox("註冊成功!") End If End Sub
Private Function QueryStudentNo(ByVal StudentNo As String) As Boolean '定義一個私人的方法,在別的方法中去調用它 Dim dInfo As DAL.RegisterDAL Dim eInfo As New Entity.enStudentInfo dInfo = New DAL.RegisterDAL() eInfo = dInfo.QueryStudentNo(StudentNo) If Not eInfo Is Nothing Then '判斷學號是否重複 MsgBox("學號重複,請重新填寫!") Return False End If Return True End Function 上述代碼中,將私人方法QueryStudentNo的返回值定義為boolean型。當InsertStudentInfoDAL方法中需要調用它的時候,定義一個boolean型的變數IsExist來接受QueryStudentNo的返回值,接著通過判斷IsExist是否為true,來確定是否需要返回。
以上的兩種方法,實際上沒有什麼大的變化,但是第二種將方法定義成為私人的。當有多個方法都需要使用到這個方法的時候,這種寫法就體現出了它的好處。
機房重構中,有的時候是不理解,有的時候理解了不知道怎麼寫。有的時候寫出來了,但你卻不理解。是不是當我們真的搞清了這些的時候,就是進步、、