如何精确地得到一个整数

功能numbersonlynodecimals(pinstring)lnumbersonly =X = 1 len(pinstring)= Y(Len(pinstring)x + 1如果(中)(pinstring ISNUMERIC,y,1))然后lnumbersonly = lnumbersonly +中(pinstring,y,1)如果中期(pinstring,Y,1)=。thenlnumbersonly =结束如果x = 1(Len下lnumbersonly)y=len(lnumbersonly)x 1 + lnumbersonlyforward = lnumbersonlyforward +中(lnumbersonly,y,1)下如果lnumbersonlyforward =然后lnumbersonlyforward =0numbersonlynodecimals = lnumbersonlyforward端功能