lSMall
   
   With barMain
      .ImageList = m_cIml.hIml
   
      .Add "CALENDAR", "Check Your Work &amp;Calendar", 0
      .Add "TIMECARDS", "Book &amp;Timecards", 1, "Book and submit your weekly
       timecards, and track your time."
      .Add "NOTES", "Contact &amp;Notes", 2, "View meeting and lead notes"
      .Add "POSTITS", "&amp;Pinboard Notes", 3, , False
      .Add "OPTIONS", "Confi&amp;gure Options", 4, "Set up offline options and
       configure the program"
      
      .ItemSelected("CALEN