摘要:'编号成生Geovin Du'不夠位數前面加零 塗聚文Function getStringlen(str,lenint) so="" itop=0 slen=Len(str) itop=lenint-slen i=0 if(slen" Next end if getStringlen=so&strEnd Functionsyear=year(now)smonth=Right("0" & Month(Now),2)sday=Right("0" & Day(Now),2)shour=Rig
阅读全文