被5整除的数有一个特点，分为两类，一类是可以被10整除，如10,20……，另一类就是不能被10整除但是能被5整除，如5,15……dim count1 as long ‘先看n整除以10等于多少，比如n是10的话，那么为1，但是有两个数能被5整除,20同理。count1=(n \10)*2if (n mod 10<5) then elsecount1=count1+1end if '结果就是count1
