在vb中打印输出0-200的所有的奇数，每行输出5个，并求他们的和，求指教

在vb中打印输出0-200的所有的奇数，每行输出5个，并求他们的和，求指教

private sub command1_click()
for i=1 to 199 step 2
print i;
if i mod 10=9 then print
sum=sum+i
next
print
print sum
end sub

输入的是两个变量，vi和vj（要注意的是vi和vj中的i与j只是字母，是不变的vi是一个整体就相当于v，vj也是一个整体相当于w。不要和变量i 搞混掉。） 输出的是循环结束后的i和sumi。 具体如下： 输入vi：就是输入的最大的数的范围，比如我们要求1到100内的奇数的和，那么vi就是100。 输入vj：就是所求范围内奇数的和不超过这个范围中的一个数，比如vi是100的话，那么vj你只能取100内数，如50。 输出i：就是参与计算的奇数个数。 输出sumi，就是所有满足条件的奇数的和。 整个程序实现这样一个功能： 从1到vi这么多个奇数之中，特取其中一个数vj，使他们的和不超过vj，这样的奇数有多少个（i个），这些奇数的和是多少（sumi）。