結果 : case statement in visual basic