none
Sumar todos los valores de una columna RRS feed

  • Pregunta

  • Hola otra vez! Estoy intentando sumar los valores de una columna llamada Total al momento de abrir un formulario

    Private Sub Consulta2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            'TODO: esta línea de código carga datos en la tabla 'RegistroventasmsDataSet.registro' Puede moverla o quitarla según sea necesario.
            Me.RegistroTableAdapter.Fill(Me.RegistroventasmsDataSet.registro)


        End Sub

    Pero no logro encontrar la consulta para sumar todos los valores de la columna Total

    viernes, 22 de junio de 2012 0:08

Respuestas

  • "JuanPabloSepulveda" preguntó:

    > Estoy intentando sumar los valores de una columna llamada
    > Total al momento de abrir un formulario
    >
    > Pero no logro encontrar la consulta para sumar todos
    > los valores de la columna Total

    Hola, Juan Pablo:

    Tienes que llamar al método Compute del objeto DataTable que contiene el campo o columna llamado Total:

        Private Sub Consulta2_Load(ByVal sender As Object, _
         ByVal e As EventArgs) Handles MyBase.Load
         
         ' Referenciamos el objeto DataTable
         '
         Dim dt As DataTable = Me.RegistroventasmsDataSet.registro
         
         Dim expression As String = String.Format("Sum({0})", "Total")
         
         Dim value As Object = dt.Compute(expression, Nothing)
         
         Dim total As String = String.Format("{0:N2}", value)
         
         MessageBox.Show(total)
         
        End Sub

    Lo mismo te resulta útil la lectura del siguiente artículo:

    Cómo sumar una columna del control DataGridView


    Un saludo


    Enrique Martínez
      [MS MVP - VB]

    Nota informativa: La información contenida en este mensaje, así como el código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin garantías de ninguna clase, y no otorga derecho alguno. Usted asume cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o sugerido en el presente mensaje.

    Si esta respuesta le ha resultado útil, recuerde marcarla como satisfactoria.

    Si usas Visual Basic .NET y deseas ser productivo y feliz, activa la instrucción Option Strict.

    viernes, 22 de junio de 2012 6:23
    Moderador