Module.ProcCountLines 屬性 (Access)

ProcCountLines 屬性會傳回指定程序在標準模組或類別模組中的行數。 唯讀的 Long。

語法

運算式。ProcCountLines (ProcName、 ProcKind)

表達 代表 Module 物件的變數。

參數

名稱	必要/選用	資料類型	描述
ProcName	必要	字串	程序在模組中的名稱。
ProcKind	必要	vbext_ProcKind	程序的類型。 請參閱這些可能設定的「備註」小節。

註解

ProcKind引數可以是下列其中一個vbext_ProcKind常數。

常數	描述
vbext_pk_Get	Property Get 程序。
vbext_pk_Let	Property Let 程序。
vbext_pk_Proc	Sub 或 Function 程序。
vbext_pk_Set	Property Set 程序。

程序以任何在程序定義之前的備註和編譯常數開始，以下列其中一項表示：

• Sub語句
• Function語句
• Property Get語句
• Property Let 語句
• Property Set 語句

ProcCountLines 屬性傳回程序中的行數，以 ProcStartLine 屬性所傳回的行開始並且以程序的最後一行作為結束。 該程序可以以End Sub、End Function 或 End Property 做為結束。

注意事項

ProcCountLines 屬性會以類似方式處理 Sub 及 Function 程序，但會區別 Property 程序的每個類型。

範例

下列範例顯示的訊息，會指出指定程序的行數。

Dim strForm As String 
Dim strProc As String 
 
strForm = "Products" 
strProc = "Form_Activate" 
 
MsgBox "There are " & Forms(strForm).Module.ProcCountLines(strProc, vbext_pk_Proc) & _ 
 " lines in the " & strProc & " procedure."

支援和意見反應

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