求VB编程 :输出100~200间所有不能被3整除的数并求和.