Redondear Formato Numérico en un Listview en VB.NET

Question

Buenos días, al cargar un listview una columna de datos numericos  por ejemplo 1,000.53 lo cargar así 1001, no encuentro la manera de ponerle formato numerico "#,##0.00".



f

  Sub CargarDatos()
        conextarse.Open()
        Dim sql As String = "SELECT Cuenta,Denominacion, Debe, Haber FROM TAsientosParametros WHERE Asiento='VP'"
        'Dim CARGA As New OleDb.OleDbDataAdapter("SELECT * FROM PlanContable WHERE Tipo_Registro='VEN' ORDER BY CUENTA", conextarse)

        MiAdaptador = New OleDbDataAdapter(sql, conextarse)
        MiAdaptador.Fill(TablaList)
        ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
        'TablaList.Rows(0).Item("Cuenta") = "701101"
        'TablaList.Rows(0).Item("Denominacion") = "Terceros"

        Dim Renglon As DataRow = TablaList.NewRow()

        TablaList.Rows(0).Item("Debe") = CDbl(txtTotal.Text)
        TablaList.Rows(1).Item("Debe") = Val(txtIGV.Text)

        TablaList.Rows.Add(Renglon)

        TablaList.Rows(2).Item("Cuenta") = "701101"
        TablaList.Rows(2).Item("Denominacion") = "Terceros"
        TablaList.Rows(2).Item("Debe") = 3220

        ListView2.Items.Clear()
        For Each registro In TablaList.Rows
            Dim fila As ListViewItem
            fila = ListView2.Items.Add(registro("Cuenta")) ' cabecera del listview-ItemPrincipal
            With fila
                .SubItems.Add(registro("Denominacion")) '1 los subItem o el resto de las columas
                .SubItems.Add(registro("Debe"))
                '.SubItems.Add(registro("Haber")) '1 los subItem o el resto de las columas
                ''Aqui puedes ir agregando todas las columnas que quieras mostrar de tu tabla
            End With
        Next
    End Sub

Gracias por su apoyo 

---

Miguel Arias

Answer 1

Hola  

Gracias por levantar tu consulta en los foros de MSDN. Con respecto a la misma, te hago la recomendación de ingresar al siguiente enlace en donde puedes encontrar una posible solución para tu problema.

https://social.msdn.microsoft.com/Forums/es-ES/7d939853-4e7d-497b-a67c-9ca3c91eaa9b/formato-numerico-personalizado?forum=vbes

https://social.msdn.microsoft.com/Forums/es-ES/932fd9b6-6d68-4201-94e4-b27dd9f3a34d/redondear-decimales-vbnet?forum=vbes

https://social.msdn.microsoft.com/Forums/es-ES/5af8be6e-556e-43d0-a156-4e0e9fb06de3/redondear-un-valor-de-un-resultado-para-mostrar-en-textbox-vbnet?forum=vsgenerales

Gracias por usar los foros de MSDN.

Carlos Ruiz
 ____

Por favor recuerde "Marcar como respuesta" las respuestas que hayan resuelto su problema, es una forma común de reconocer a aquellos que han ayudado, y hace que sea más fácil para los otros visitantes encontrar la solución más tarde. 

Microsoft ofrece este servicio de forma gratuita, con la finalidad de ayudar a los usuarios y la ampliación de la base de datos de conocimientos relacionados con los productos y tecnologías de Microsoft.  

Este contenido es proporcionado "tal cual" y no implica ninguna responsabilidad de parte de Microsoft.