意思就是说这组数等于或超过四个数，那就组数就不要啦？？？

dim fj()
fj=split(某组数,",")
if ubound(fj)<4 then
   需要
else
  不需要
end if

是不是相邻两个数之差大于四的数组就不要了？

有没好心朋友啊,帮帮忙了啊,

？？

你根本没说清楚啊？
遇到四个或大于四个是什么意思
遇到四个什么数？？？？？

就是（1~15）里面的数取6个来排列，比方排出的数有（1，2，3，4，5，6）；（10，11，12，13，14，15）；（3，6，8，12，13，15）等等这些数组，这些数是从小到大排列的，然后就是在这些数组里面如果遇到（3，6，8，9，10，12）这里面的（指的是上面这几个数）四个数字或是大于四个数字，然后这组数就不要了，就比方面前面的三组，余下的就是（1，2，3，4，5，6）；（10，11，12，13，14，15）这两组了，现在不知道你懂了没喔！！