You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

9 lines
230 B

Attribute VB_Name = "modClassIDGenerator"
Function GetNextClassDebugID() As Long
'class ID generator
Static lClassDebugID As Long
lClassDebugID = lClassDebugID + 1
GetNextClassDebugID = lClassDebugID
End Function