VBScript中用for next循环语句求1到100内的奇数或偶数的和写详细点