数值问题

Question

Private Sub TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox8.TextChanged, TextBox9.TextChanged, TextBox10.TextChanged, TextBox11.TextChanged, TextBox12.TextChanged

Dim a, c As Integer

        Dim b As String '暂存变量

        Label13.Text = "0.00" '储存结果变量

       

        If TextBox12.Text = "" Then TextBox12.Text = "0"

        Label12.Text = My.Settings.absent * TextBox12.Text

        Label13.Text = Val(Label8.Text) + Val(Label9.Text) + Val(Label10.Text) + (Val(Label11.Text) * My.Settings.ot) - (Val(Label12.Text) * My.Settings.absent)

      

    End Sub

My.Settings.absent=10（不会变）

每当TextBox8.TextChanged, TextBox9.TextChanged, TextBox10.TextChanged, TextBox11.TextChanged, TextBox12.TextChanged的时候，label13就会自动计算全部的值。

当时是label12的值会根据textbox的值改变。原本label12的值是（11*10）=110，当有textbox值变化时，label12.text就会变成11（没有乘10).为什么label12的值无法乘My.Settings.absent的值。