我无法解决我无法解决的下一个问题。
我有三个 BUCKET_START | BUCKET_END | COUNT(*)
------------------+-------------------+---------
17-03-20 00.00.00 | 17-03-20 00.09.59 | 4
17-03-20 00.10.00 | 17-03-20 00.19.59 | 2
:
TextBox
,其中包含数字PRECIOTextBox
,其数学公式如“+ 10%* 2”FORMULA_ATextBox
必须在第1和第2 PRECIO_ATextBox
之间显示等式的结果。到目前为止,我只有下一个代码,只有当百分比符号出现时才能分割字符串。所以我可以解决方程式:“+ 10%-20%+ 10%”。
TextBox
我不知道如何解决 Dim FormulaA As String = FORMULA_ATextBox.Text
Dim FormulaASeparado() As String
Dim Precio1 As Double = PRECIOTextBox.Text
FormulaASeparado = FormulaA.Split("%")
For x = 0 To FormulaASeparado.Length - 1
If FormulaASeparado(x).ToString <> "" Then
If Val(FormulaASeparado(x)) > 0 Then
Precio1 = Precio1 + (Precio1 * Val(FormulaASeparado(x)) / 100)
Else
Precio1 = Precio1 - (Precio1 * Math.Abs(Val(FormulaASeparado(x))) / 100)
End If
End If
Next
PRECIO_ATextBox.Text = Precio1
上有“+”,“ - ”,“/”,“*”和“%”的公式。
如果您有任何疑问请分享。谢谢!