sent amount form SubForm to MainForm

[Mehvan]

Hello everyone



I have mainform and subform , I connected between both , ID to ID
In subform I added new text even I know How much sum amount in that subform ( for expamle name of that text is = "text1" , subformname is " subbuyform ", and mainform = " BuyInvoice ")

I would like to sent amount in subform to Mainform and name is Mainform is " amount "
but I would like to make it by VBA

If someone can help me , I will be very pleased .

[ssanfu]

I have mainform and subform , I connected between both , ID to ID

You have linked the forms in the fields "ID"? Are both the "ID" field PK fields?

[Mehvan]

PK is for MianForm , but subform is foreign key
Just when I brought subform to mainform even both work together in define my own I connected ID to ID

and in Relationship I made connect between both ID to ID

[ssanfu]

You see where having both fields named "ID" is confusing?? It is better to give informative names to fields. Fields with "ID" is usually the PK field.
If you have a table of Employees, "EmpID", "EmpIDPK" or "EmpID_PK" are better names.
If there is a table named WorkHours, "WorkHoursID_PK" could be the name of the PK field, with a related field to employees named "EmpIDFK" or "EmpID_FK".
So you would have "EmpID_PK" linked to "EmpID_FK". Which is easier to know which in the PK field and which is the FK field?

sum amount in that subform ( for expamle name of that text is = "text1" , subformname is " subbuyform ", and mainform = " BuyInvoice ")
I would like to sent amount in subform to Mainform and name is Mainform is " amount "

So the main form control is named "amount" and the sub form control is named "text1" ?

The code would be something like

Me.amount = Me!subbuyform.Form!text1

How are you going to execute the code? When do you want the control "amount" to update?

[Mehvan]

It means I will click on text1 then I will go to events after that I will use After Update as VB
and I will write that code
in this way I used this code but didn't give me any result ,, I don't know my ms is has a problem or I'm using wrong code


after I used that code in that way I talked about on above also Didn't gave me result

[ssanfu]

Add a button next to the "Amount" control

Create a click event for the button.
Name the button whatever you want.
Then paste in this code

    Me.amount = Me!subbuyform.Form!text1

When I create this button, this is what MY code looked like

Private Sub Command6_Click()
    Me.amount = Me!subbuyform.Form!text3
End Sub

Save it then switch back to normal view and click the button.
The amount control should have an amount in it... hopefully $9,400.00...

[Mehvan]

I create by this way

I mean I made that text to invisible
because I don't want to use command for amount , I want all value comes by codes .

[ssanfu]

And the mainform controls display the values from the subform controls in the subform footer??

[Mehvan]

thanks for your help
now I haven't a problem

[ssanfu]

Very good...

Good luck with your project.

Ready to mark this solved?

[Mehvan]

I'm glad to found this great website for learning programming by Microsoft Access ,, really have great people in this website for helping us when We have a questions