即時通訊使用CodeSmart 2013來分析我的VB6項目。 審查功能說我應該添加錯誤處理(或至少「錯誤恢復下一個」)我的類屬性。屬性中的VB6錯誤處理 - >最佳實踐?
我的特性通常是這樣的(在99%的情況下):
Public Property Let PLZ(ByVal strPlz As String)
myStrPLZ = strPlz
End Property
Public Property Get PLZ() As String
PLZ = myStrPLZ
End Property
當我自動添加錯誤處理它看起來像這樣:
Public Property Let PLZ(ByVal strPlz As String)
'<EhHeader>
On Error GoTo PLZ_Err
'</EhHeader>
myStrPLZ = strPlz
'<EhFooter>
Exit Property
PLZ_Err:
MsgBox Err.Description & vbCrLf & _
"in TNV.frmSucheTeilnehmer.PLZ " & _
"at line " & Erl, _
vbExclamation + vbOKOnly, "Application Error"
Resume Next
'</EhFooter>
End Property
Public Property Get PLZ() As String
'<EhHeader>
On Error GoTo PLZ_Err
'</EhHeader>
PLZ = myStrPLZ
'<EhFooter>
Exit Property
PLZ_Err:
MsgBox Err.Description & vbCrLf & _
"in TNV.frmSucheTeilnehmer.PLZ " & _
"at line " & Erl, _
vbExclamation + vbOKOnly, "Application Error"
Resume Next
'</EhFooter>
End Property
是任何人實際上在屬性中進行錯誤處理? 是最佳做法嗎?,因爲這將是我的項目很多額外的代碼(代碼概述減少恕我直言)
Thx求助! 來自德國的問候 SLimke
爲什麼你必須添加一個錯誤處理一個簡單的任務?這裏會發生什麼錯誤? (只是想知道) – Hrqls
這就是爲什麼我問。這樣簡單的屬性不會產生任何問題,不是嗎? – SLimke
當屬性過程很細時(你甚至沒有在那裏分配對象引用)添加異常陷阱是荒謬的。只是爲了回過頭來提出另一個例外?我懷疑他們正試圖向您推銷另一種生成錯誤處理程序的工具。 – Bob77