 .RowMode = True
      ' Allow more than one row to be selected:
      .MultiSelect = True
      ' Set the default row height:
      .DefaultRowHeight = 18
      ' Outlook style for the header control:
      .HeaderFlat = True
      
      ' Add the columns:
      .AddColumn "group1", , , , 16, False, , , False
      .AddColumn "group2", , , , 16, False, , , False
      .AddColumn "group3", , , , 16, False, , , False
      .AddColumn "urgency", , , 9, 26, , , , False, , , CCLSortIcon
      .AddColumn "type"