<% 

select case x 'comment
 case y
end select
 

select case x 'comment
 case y
             moo
 case y: moo
 case x,y,z: moo
 case x,sin(y/0),z
             moo
 case else:  moo
end select

'case and comments:
select case x 'comment
 case y      'statement on the next string
             moo
 case y: moo 'statement on the same string
 case x,y,z: moo  'multiple-case
 case x,y,z       'multiple-case with comment
      select case y
          case z
             for x=1 to 2
                 y
             next
      end select
      moo
 case else:  moo  'comment at default
end select
 

%>