2016-04-07 31 views
0

我在表单上有3个文本框,分别命名为CboNetCostTxtMarginTxtPrice表格上的ms访问百分比计算

TxtMargin具有格式属性为百分比,CboNetCostTxtPrice具有format属性作为货币。

我需要增加CboNetCost的值,无论我在TxtMargin中有什么百分比值,并将答案放在TxtPrice

只是为了澄清一下,下面是一个例子,假设我在CboNetCost中有($ 10.00),我选择TxtMargin并写入10%的值,TxtPrice将为11.00美元。

我试图更新事件的txtMargin后加入本宏 click to see image of macro

谢谢您的时间。

+0

你熟悉使用VBA,而不是在Access宏制作? – LiamH

+0

是的,我对VBA有点熟悉,但是我对它很陌生 –

回答

1

您可以用这句话作为ControlSourceTxtPrice

=Val(Nz(CboNetCost))*(1+Nz(TxtMargin, 0)) 

要删除括号和减号:

=Abs(Val(Replace(Replace(Nz(CboNetCost),")",""),"(","")))*(1+Nz(TxtMargin, 0)) 
+0

它的工作和非常感谢你只有一件事我真的对不起,我忘了提及成本是在paranthisis其负面,我需要的答案是积极的没有括号的正常有没有办法呢? –

+0

您可以使用'Replace'替代' - 和'Abs' - 请参阅编辑。 – Gustav

+0

你的天才我的朋友谢谢loadz dono如何感谢你的工作!我怎么能把声誉添加到你的声音中:S似乎我没有足够的声望来投票 –