请大神帮忙转换函数，文本转货币怎么写代码 - vfp吧

level 3

程明艳happy 楼主

replace 售价 with thisform.text3.value
这个要怎么改啊,谢谢

2016年05月06日 11点05分 1

level 9

用户名有误vam

replace 售价 with NTOM(val(thisform.text3.value))

2016年05月06日 14点05分 2

level 9

用户名有误vam

Ntom 函数是吧数值表达式转化成含有4个小数的货币，val函数是字符转数值，先把文本框3中的字符型数据用val转换为数值型，然后外用ntom给得到的数值转成货币。

2016年05月06日 14点05分 3

程明艳happy

好的，谢谢。多谢了

2016年05月08日 14点05分

用户名有误vam

@程明艳happy 不客气

2016年05月08日 14点05分

Luosen56

不用 NTOM() 函数也可以，因为【售价】是字段名，数据表结构中已经规定了小数后有多少位。因此 VAL(ThisForm.Text3.Value) 做表达式已经很好了。

2016年05月08日 16点05分

用户名有误vam

@Luosen56 哦哦谢谢

2016年05月08日 16点05分

level 12

Luosen56

a = Val(ThisForm.Text6.Value)
b = Val(ThisForm.Text7.Value)
c = Val(ThisForm.Text8.Value)
d = a * b * 0.8 + c
ThisForm.Text10.Value = ALLTRIIM(Str(d, 18, 2))

2016年05月11日 16点05分 4