Module.CountOfDeclarationLines 屬性 (Access)

CountOfDeclarationLines 屬性傳回 Long 資料類型，指出在標準模組或類別模組中宣告區段程式碼的行數。 唯讀的 Long。

語法

運算式。CountOfDeclarationLines

表達 代表 Module 物件的變數。

註解

模組之中的行號是從 1 開始的。

CountOfDeclarationLines 屬性的值是等於在宣告區段最後一行的行號。 使用此屬性來判斷宣告區段的結束位置，以及模組的主體開始位置。

範例

下列範例會計算線條及 Modules 集合中每一個標準模組中的宣告行的數。 請注意， Modules 集合包含在模組編輯器中開啟的模組。

Public Sub ModuleLineTotal(ByVal strModuleName As String) 
 
 Dim mdl As Module 
 
 ' Open module to include in Modules collection. 
 DoCmd.OpenModule strModuleName 
 
 ' Return reference to Module object. 
 Set mdl = Modules(strModuleName) 
 
 ' Print number of lines in module. 
 Debug.Print "Number of lines: ", mdl.CountOfLines 
 
 ' Print number of declaration lines. 
 Debug.Print "Number of declaration lines: ", _ 
 mdl.CountOfDeclarationLines 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。