         =   7
      End
      Begin VB.Menu mnuTest 
         Caption         =   "Change First Item Ca&amp;ption"
         Index           =   8
      End
      Begin VB.Menu mnuTest 
         Caption         =   "-"
         Index           =   9
      End
      Begin VB.Menu mnuTest 
         Caption         =   "Change &amp;Width"
         Index           =   10
      End
   End
End
Attribute VB_Name = "frmTestARListBar"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_P