BUG: Recordset Update Error Differs Between 16-Bit and 32-Bit

MORE INFORMATION

Steps to Reproduce the Error in Visual Basic 4.0 16-Bit

1. Start 16-bit Visual Basic 4.0, or if it is already running, click New Project on the File menu.
2. Place a Data control on the Form1 form.
3. Set the Data control's DatabaseName property to Biblio.mdb.
4. Set the Data control's RecordSource property to Authors.
5. Add a TextBox control to the Form1 form. First set the TextBox control's DataSource property to Data1 and then set the DataField property to Authors.
6. Add a command button to the Form1 form.
7. Copy the following code sample to the Form1 code window:

          Private Sub Command1_Click()
             'To prevent the bug, uncomment the next line
             'Data1.RecordSet.Edit
             Data1.RecordSet.Update
          End Sub
   						

8. Press the F5 key or click Start on the Run menu to start the program.
9. Enter some text in the text box.
10. Click the command button. The following error message appears in the Microsoft Visual Basic Dialog Box:
    Run-time error '3426':
    The action was canceled by an associated object.
    Click the End button to close the dialog box and end the program.
11. Save the project. The project can be used to re-create the 32-bit error.

Steps to Reproduce the Error in Visual Basic 4.0 32-Bit

1. Start 32-bit Visual Basic 4.0 or if it is already running, click Open Project on the File menu.
2. Open the project that you just saved in step 12 above.
3. Press the F5 key or click Start on the Run menu to start the program.
4. Enter some text in the text box.
5. Click the command button. The following error message appears in the Microsoft Visual Basic dialog box:
   Run-time error '3020':
   Update or CancelUpdate without AddNew or Edit.
   Click the end button to close the dialog box and end the program.