如何將表記錄計數存儲到全局變量vba msaccess

Question

我聲明一個公共變量作爲整數來存儲表的記錄計數與vba代碼。使用

這個代碼

public @VarName as integer 
@VarName = Dcount("*","TBL_Name") 

，似乎在DCOUNT在公共模式下無法正常工作。

我該如何創建這樣的代碼？

Answer 1

Public Function TotalCount() As Long 
    TotalCount = DCount("*", "TBL_Name") 
End Function 

然後你可以把它叫做：

ModuleName.TotalCount