VB6 Datagrid with ADO - Select Sum question
Posted on 2002-03-04
I'm fairly new to VB and having problems using a SQL statement with VB6. In my application I have two tables called Job and Labour. A job can have many 'labours' (for example an employee does work, I've made that a 'labour' for a particular job number). So in the Job table there is a field called Job Number. In the Labour table there is a Total Time field.
In my VB application I have two forms, a Job form and a Labour form. The Job form launches first and is simple with a datagrid, an ADO control, and a bunch of text fields and combo boxes. The Labour form is spawned from the Job form by double clicking a record in the datagrid and then I just use a SQL statement to select all 'labours' where they equal the job number in the job table.
Anyways, that all works fine. My problem is that I want to display a text field on the Job form that adds up all of the Labours TotalTime field. So basically if a Job has three Labours, or stuff done on it, then I want to add those three fields together and display one total on the Job form. I realize that is what the Sum part of the SQL statement is for, and I can easily get the textfield to display the total time on the Job form, grabbing and summing the records from Labour where they have the same Job number. I should mention I do this in the Form_Load procedure.
So that works. What doesn't work is that if I change rows (I've got a toolbar up top) then it keeps reading the same value...of the first Job number. So I tried combating that by finding the datagrid property which will tell me that the row has changed. I've tried all of them listed pretty much that pertain to setting the focus of the row. None of them seem to work.
To summate: How do I display a textfield total value and update that value as I change rows, either by using my toolbar to MoveNext or by just clicking the datagrid. (it is enabled, but doesn't allow updates). Basically I want to query the database each time a new row has gotten the focus and sum all values in a column where their job number is the job number of the row selected.
If anyone needs more info feel free to ask, I'd love to solve this annoying obstacle. Thanks a lot!