Get total of flexgrid column

[rtshort]

How do I get the total of a flexgrid column. I'm trying to use:

Public Function GetTotal()
Dim Total
i = 0 to flexGrid.Rows - 1
Total = Total + flexGrid.TextMatrix(i, 0)
Next
txtTotal = Total
End Function

The above just concatonates the numbers instead of adding them together. Like:

1
1 =11

Instead of

1
1 = 2

I've tried using CStr, CDbl, CSng, but none of them work either. Rob
Just my $.02.

 

[matrix07]

I'm no expert but aren't you missing the FOR statement for your loop?

 

[rtshort]

Yep. I copied and pasted that code. I actually do have a For in the code. Don't know why it didn't copy over. I may have deleted it somehow after I pasted it. I've tried adding Hours = 0 before the loop too. Still no go. Thanks. Rob
Just my $.02.

 

[randy4126]

I think that it is thinking your working with string so I think if you make total an integer and get the value of the flex grid it should work.

Public Function GetTotal()
Dim Total as integer
Total = 0
for i = 0 to flexGrid.Rows - 1
Total = Total + val(flexGrid.TextMatrix(i, 0))
Next
txtTotal = Total
End Function
Randy

You can Email me at: RCooper@cinci.rr.com

 

[rtshort]

Thanks for the reply Randy. I finally figured out what I was doing wrong. I should have been using:

For i = 2 to FlexGrid.Rows - 1

My information in the FlexGrid doesn't start until the second row.

I tried Val eariler. I don't think it works in VBScript.

Thanks again for taking the time to answer my post.

Rob
Just my $.02.