ACC97: Datasheet of Chart Not Synchronized with Form or Report

MORE INFORMATION

Steps to Reproduce Behavior

1. Open the Product Sales for 1995 query in the sample database Northwind.mdb.
2. Add the Shippers table to the query. Microsoft Access automatically creates a join between the ShipVia field in the Orders table and the ShipperID field in the Shippers table.
3. Drag the CompanyName field from the Shippers table to the first empty column on the query design grid. Leave the Total row for this field set to the default value of Group By.
4. Save and close the query.
5. Create a new form based on the Categories table. Include only the CategoryID and CategoryName fields in the detail section of the form.
6. On the Insert menu, click Chart to create a chart in the detail section of the form.
7. On the first screen of the Chart Wizard, click Queries and select Product Sales for 1995. Click Next.
8. Move the CompanyName field from the Available Fields list to the Fields For Chart list. Then move the ProductSales field from the Available Fields list to the Fields For Chart list. Click Next.
9. Click Next in the chart type screen to select the default type of Column Chart.
10. On the layout screen of the Chart Wizard, click Next.
11. Click OK if you receive the following message:
    
    You must add field CategoryID if you want to use this link.
12. In the Form Fields list, click CategoryName; in the Chart Fields list, click CategoryName, and then click Finish.
13. On the View menu, click Properties and change the Name property of the chart to "chtSync" (without the quotation marks).
14. Save the form as frmChartSync.
15. On the Edit menu, click Select Form. On the View menu, click Properties, and then click the Event tab.
16. Click the OnCurrent property box, and then click the Build (...) button.
17. In the Choose Builder dialog box, click Code Builder. Click OK to display the Form_frmChartSync class module.
18. On the Tools menu, click References.
19. In the References dialog box, scroll down the Available References list and select the Microsoft Graph 8.0 Object Library. Click OK.
20. Set the OnCurrent property of the form to the following event procedure:
    

           Private Sub Form_Current()
              Dim i As Integer
              With Me!chtSync.Object.Application
                 ' Each datasheet row contains two columns for the
                 ' shipper's CompanyName and SumProductSales. The first
                 ' row contains the column headers.
                 Debug.Print "*** OnCurrent Values ***"
                 For i = 1 To 4
                    Debug.Print .DataSheet.Cells(i, 1).Value & _
                       " - " & .DataSheet.Cells(i, 2).Value
                 Next
              End With
           End Sub
    						

21. Close the module and insert a command button on the form.
22. View the property sheet of the command button and change the Name property to cmdGraphData and the Caption property to Current Graph Data.
23. Click the OnCurrent property box, and then click the Build (...) button.
24. In the Choose Builder dialog box, click Code Builder. Click OK to display the Form_frmChartSync class module.
25. Set the OnClick property of cmdGraphData to the following event procedure:
    

           Private Sub cmdGraphData_Click()
              Dim i As Integer
              With Me!chtSync.Object.Application
                 ' Note that this code is the same as
                 ' that in the Current event procedure.
                 Debug.Print "*** Form View Values ***"
                 For i = 1 To 4
                    Debug.Print .DataSheet.Cells(i, 1).Value & _
                       " - " & .DataSheet.Cells(i, 2).Value
                 Next
              End With
           End Sub
    						

26. Save the form and switch to Form view.
27. Press CTRL+G to display the Debug window. Note that the Debug window displays the East, West, and North values that correspond to the sample data instead of the actual values that correspond to the current record on the form.
28. Go to the next record. Note that the Debug window now displays Shippers data, but it does not match the data displayed in the chart on the form. The data in the Debug window corresponds to the previous record.
29. Click Current Graph Data. Note that the chart data displayed in the Debug Window now matches that of the current record.