用VB编写程序输出1~100之间不能被3整除的数,并统计其个数.