Consonants solutions

Consonants was solved using Visual Basic by 6 contestants. Solution sizes: average 2006 bytes (shortest: 1524; longest: 2370).