我的应用中有一个用于添加订单的简单表单。
它包含两个文本框控件,'neworder_costprice'和'neworder_saleprice'。 我还有一个滑块控件markup_percent',它可以是0到100之间的值,增量为10。
如果用户在costprice文本框中键入“1.20”,我试图这样做,saleprice文本框将自动填充costprice + markup_percent的值。
我尝试过几种不同的方式让它发挥作用,但似乎没有什么想要为我做的!任何人都可以指出我的方式错误吗?
以下是来自'workoutsaleprice()'函数的当前代码,该函数在costprice.valuechanged ....上调用。
tech_neworder_costprice.Text = String.Format("{0:n2}", neworder_costprice.Text)
Dim costprice As Double = neworder_costprice.Text
Dim markup As Integer = percent_slider.Value
Dim saleprice As Double = ((costprice / 100) * markup) + costprice
neworder_saleprice.Text = saleprice.ToString
答案 0 :(得分:1)
使用NumericUpDown
代替TextBox
进行数字输入。验证是自动处理的,因此保证永远不会有非数值。
您可以使用Decimal类型的NumericUpDown.Value
属性来执行数值运算。