nd As Long, ctlCmdBar As vbalCommandBar)
   If (m_colhWnd Is Nothing) Then
      ColourInitialise
      Debug.Print "PREPARE FOR INVASION"
      VerInitialise
      Set m_colhWnd = New Collection
      Set m_colCommandBars = New Collection
      Set m_colButtons = New Collection
      AttachKeyboardHook 0
      InitTheme hWnd
      CreateChevronBars
   End If
   m_colhWnd.Add hWnd, "H" &amp; hWnd
   ' tag control with object pointer:
   TagControl hWnd, ctlCmdBar, True
End Sub

Public Sub ReleaseRef(ByVal h