2020-02-16 标签:获取,数字的,个位,十位,百位,函数,代码,实现,如下,function,numbersplit,n,um,dim,i,length,len,mod,10

实现代码如下： Function NumberSplit(num) Dim i,length length=Len(num) For i=1 To length NumberSplit=NumberSplit & num mod 10 & "," '余数 num = num \ 10