le.asp"><img src="../../../../res/newsite.png" width="125" height="129" alt="The New Site" /></a>
<br /><br />
</td><td width="100%" valign="top"><h1>vbAccelerator - Contents of code file: mUtility.bas</h1><pre>Attribute VB_Name = "mUtility"
Option Explicit

Private m_lId As Long
Private m_lColID As Long

Public Const gcObjectProp = "vbalListViewCtl:ObjectPtr"
Public gsInfoTipBuffer As String

#Const DEBUGMODE = 1

Public Property Get NextItemID() As Long
   
   ' Get the ID:
   m_lId = m_lId + 1
   NextIte