DUVIDA COM DIVISAO DE NUMEROS NEGATIVOS EM VB.NET
Galera seguinte, tenho um programa que lê de uma balança as unidades de medidas da mesma, porém devido a oscilaçao causado pelo ar do ar condicionado o pendolo demora alguns segundos variais para estabilizar e demonstrar os valores reais, com esta demora aparece no visor da balança numeros negativos ex: -0,0002 algo assim, ate aparecer os valores verdadeiros positivos.
Estes valores aparecem em gramas, e preciso transforma-los, para quilo. Mas quando a divisao fica por numero negativo a programaçao da erro, alguem pode me ajudar, esta mais ou menos assim.
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
If TextBox2.Text < 0 Then
TextBox4.Text = ((Val(TextBox2.Text * -1)) / 1000)
Else
TextBox4.Text = Val(TextBox2.Text / 1000)
End If
End Sub
Obrigado.
Estes valores aparecem em gramas, e preciso transforma-los, para quilo. Mas quando a divisao fica por numero negativo a programaçao da erro, alguem pode me ajudar, esta mais ou menos assim.
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
If TextBox2.Text < 0 Then
TextBox4.Text = ((Val(TextBox2.Text * -1)) / 1000)
Else
TextBox4.Text = Val(TextBox2.Text / 1000)
End If
End Sub
Obrigado.
Faça assim
TextBox4.Text = Math.Abs(TextBox2.Text / 1000)
que nem precisa checar se o nº é negativo, pois a função abs retorna o valor positivo de um nº
TextBox4.Text = Math.Abs(TextBox2.Text / 1000)
que nem precisa checar se o nº é negativo, pois a função abs retorna o valor positivo de um nº
Tópico encerrado , respostas não são mais permitidas