none
No me sale esta cuenta RRS feed

  • Pregunta

  • Buenas esto intentando hacer esta cuanta y no  me sale

    la formula es la siguiente

    Dim Ren As Integer = DGV_Maltas.CurrentRow.Cells(7).Value * 10 / 1000 'RENDIMIENTO DE LA MALTA

    DGV_Maltas.CurrentRow.Cells(7).Value = 81,0 <---- Aparece asi

    tengo que conseguir que se ponga 0,81 pero el resultado que me lanza es 1

    jueves, 23 de junio de 2016 6:39

Respuestas

  • JETET,

    A menos que te encuentres seguro de que la celda(7) contiene sólo valores numéricos se recomienda que puedas manejar las posibles excepciones a causa de valores no permitidos:

    Dim valor As Decimal = 0
    Dim Ren As Decimal = (If(Decimal.TryParse(DGV_Maltas.CurrentRow.Cells(7).Value, valor), valor, 0) * 10) / 1000

    • Propuesto como respuesta Sergio Parra jueves, 23 de junio de 2016 13:25
    • Marcado como respuesta JETET jueves, 23 de junio de 2016 16:40
    jueves, 23 de junio de 2016 13:14

Todas las respuestas