VB Code:
  1. Case Is > 5, Is <= 10