elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Tutorial básico de Quickjs


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Redondear Formato Numérico en un Listview en VB.NET
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Redondear Formato Numérico en un Listview en VB.NET  (Leído 1,442 veces)
mangelperu

Desconectado Desconectado

Mensajes: 1


Ver Perfil
Redondear Formato Numérico en un Listview en VB.NET
« en: 29 Mayo 2019, 22:44 pm »

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".


  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


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Pregunta] Redondear Bordes Imagen
Programación Visual Basic
skyweb07 7 8,794 Último mensaje 29 Agosto 2009, 16:46 pm
por skyweb07
a que se referia Ferchu con redondear VirtualAddres?
Análisis y Diseño de Malware
Belial & Grimoire 2 3,751 Último mensaje 9 Noviembre 2011, 19:45 pm
por fary
(Solucionado)Redondear en c++. Ayuda
Programación C/C++
theseniorman 2 2,693 Último mensaje 4 Junio 2014, 20:13 pm
por theseniorman
Listview header modificado en listview vbnet
.NET (C#, VB.NET, ASP)
Juan Sanchez 3 7,967 Último mensaje 30 Enero 2016, 06:04 am
por Eleкtro
Redondear Multiplos
.NET (C#, VB.NET, ASP)
CM2ARY 3 7,317 Último mensaje 13 Agosto 2017, 02:11 am
por CM2ARY
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines