VFP 求小数位数设计一个简单程序,求小数位数.

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 18:43:24
VFP 求小数位数设计一个简单程序,求小数位数.

VFP 求小数位数设计一个简单程序,求小数位数.
VFP 求小数位数
设计一个简单程序,求小数位数.

VFP 求小数位数设计一个简单程序,求小数位数.
x="11.111"
c=at(".",x)
xsws=len(x)-c
xsws

fuction xsws
para pn_number
local i
do while pn_number-int(pn_number)<>0
i=i+1
pn_temp=pn_temp*10
enddo
return i
endfunc
i即小数的位数。