VB编写程序计算出1--100的所有偶数的和与所有奇数的和