結果 : select case in visual basic 6.0