?
Solved

How to add a new row in datagridview in vb.net that calculates totals for columns

Posted on 2010-11-13
4
Medium Priority
?
1,055 Views
Last Modified: 2012-05-10
Hi,
I have populated datagridview from sql server database...
Datagridview has 5 colums...
First column is varchar column type and the rest are float....
The datagridview counts 15 rows....
I would like to add 16 th row to show sum of each respective column...It should look like

TOTAL    Sum(column1)    Sum(Column2)  Sum (Column3)     Sum(Column4)

Can someone help me to make this working....
Thanks...
0
Comment
Question by:alsam
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 17

Expert Comment

by:nepaluz
ID: 34128830
try this

'insert your column
Dim NewColumn As New DataGridViewColumn
Form1.DataGridView1.Columns.Insert(16, NewColumn)
Dim ColumnsToAdd As New List(Of Integer) From {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16}
For x = 0 To Form1.DataGridView1.RowCount - 1
    Form1.DataGridView1.Item(16, x).Value = SumColumns(ColumnsToAdd, x)
Next

'and alsoadd this function
Function SumColumns(ByVal columns As List(Of Integer), ByVal row As Integer) As Double

Dim q As Double = 0.0
For Each y As Integer In columns
    Try
        q = Form1.DataGridView1.Item(y, row).Value + q
    Catch ex As Exception
    End Try
Next
Return q

End Function

Open in new window

0
 
LVL 17

Expert Comment

by:nepaluz
ID: 34128837
Actually, you have to remove the 16 from the list that calls the function.
0
 
LVL 36

Expert Comment

by:Miguel Oz
ID: 34129183
See code below:

For more datagridview usage check:
http://dotnetperls.com/datagridview-vbnet
'insert total row
Dim totalIndex As Integer = DataGridView1.Rows.Add()
'calculate totals
For x = 1 To Form1.DataGridView1.ColCount - 1
    Form1.DataGridView1.Rows.Item(totalIndex).Cells(x).Value = SumColumns(x)
Next

Function SumColumns(ByVal col As Integer) As Double

Dim q As Double = 0.0
For x = 0 To Form1.DataGridView1.RowCount - 2
    q = Form1.DataGridView1.Item(x).Cells(col).Value + q
Next
Return q

End Function

Open in new window

0
 
LVL 83

Accepted Solution

by:
CodeCruiser earned 2000 total points
ID: 34131209
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
The ECB site provides FX rates for major currencies since its inception in 1999 in the form of an XML feed. The files have the following format (reducted for brevity) (CODE) There are three files available HERE (http://www.ecb.europa.eu/stats/exch…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
In this video, Percona Solution Engineer Rick Golba discuss how (and why) you implement high availability in a database environment. To discuss how Percona Consulting can help with your design and architecture needs for your database and infrastr…
Suggested Courses

771 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question