Carry over values to next record in a form

[mfaisalwarraich]

Hi everybody,

I want to carry over last values of a record to the next record on ms access form. I'm using the Allen Browne's following method:

http://allenbrowne.com/ser-24.html

but its not working. please tell me what should I do?

[NeoPa]

I suggest you start by telling us exactly what you're doing and exactly what goes wrong (please include error message) and where.

[mfaisalwarraich]

Thanx for reply.

I have two tables named mainTable and named student table. In the mainTable i have RNO (Integer), LEC(Integer) and dated(medium date) fields. Whereas in the student table have student names with their roll numbers.

In the mainTable RNO datatype is a lookup value (combo box) from Student table and LEC also has its datatype as lookup value (combo box) from some other table. The dated filed in the mainTable do not relates to field and it needs to be entered each and every time. I want to avoid entering values again and again for each student like date and lec. i just want to select the RNO (which is roll number) and the other values will be selected as entered previously (last record in the mainTable).

I am not receiving any error while deploying Allen Browne's method. But the method is not working.

I hope the above explanation would serve ur purpose and you will help me accordingly. Thanking you.

[ChipR]

You'll have to show us the code you are using in the BeforeUpdate event of your form.

[mfaisalwarraich]

here is the code which im using on the Before Insert event of the form as written in the instructions of the method:

 
Private Sub Form_BeforeInsert(Cancel As Integer)
        Dim strMsg As String
        Call CarryOver(Me, strMsg)
        If strMsg <> vbNullString Then
            MsgBox strMsg, vbInformation
        End If
    End Sub
 
 

[ChipR]

Let's check and see what the default value of some controls are at the end of the function. Use the debugger or a MsgBox to stop the code at the End If line and check some control .DefaultValue properties. You can print them in debug, or put in

MsgBox aControl.DefaultValue

Then we'll know whether the default value is being saved properly before going to the next record.

[NeoPa]

For more about debugging see Debugging in VBA.

PS. I noticed you posted the BeforeInsert event procedure instead of the BeforeUpdate one. Was there any reason for that?

[mfaisalwarraich]

thanx chipr and neopa.

as i already mentioned dat the instructions at the allen browne's site asked me to paste it at BeforeInsert event instead of BeforeUpdate. But the code is not working at any event.

Am not very much familiar with the VBA Debugging. Please tell me how i can debug this error as there are no error messages im having while running the form.

As neopa gave me a link and i studied dat link. i dont know where the watch pane will come as there is no watch pane in the debugging window dat i can see. please help me to get rid of this problem.

thanx alot.

[NeoPa]

@mfaisalwarraich
I may have to update the article. I thought I had everything covered.

Anyway, all panes are viewable from the View menu. A shortcut for the Watch Pane is Alt-V+H. I'm sure using debug will be a great help to you going forward.