Search results

This has most definitely been asked before but I really cant find anything on the forum! Ive created a data entry form which has a save button which the user must click each time to save the record. However how do I refresh the form i.e. empty all data from the previous record without exiting...

No Im not trying to store the total in the databse! Ive simply used the terminology as an indication. Howvever I still need to calculate the total of a text field, the reason being when the form is loaded the user must see a ? in the tetxt box to indicate that the field requires information

Hi, has anyone any ideas how we can add up the values in a textbox when the field type is a 'text' type?

Its fine Ive now just used Dans advice and used constants to declare the new locations of objects when a certain event happens. Howevere is there a way of restoring the original values of the form i.e. the ones which are created in the design procedure? Cheers Mike

Oh well! Ive now found a new problem. Each time a user updates a form the code is executed again i.e. everything is moved up again!. Is there anyway of preventing this. Im using the AfterUpdate() event is this correct?

Dan thanks very much mate I eventually got there! You was correct it was in the wrong event! Cheers Mike

I take it by the lack of responses that Im trying to do the impossible! I need to create a form which saves data about a " Press Line." In each Press Line there are a number of Pressses sometimes 5 but mostly six which have there own information. However for those lines which only have 5 Presses...

Sorry about this but has anyone got anymore suggestions. I dont see why the .Top function isnt working!

The quotes dont make any difference. It still doesnt work regardless of whether there is quotes or not. Its just programming preferences!!

No Im afraid the above suggestions are still not working. Im still using; Private Sub Presses_AfterUpdate() If Me.Presses = "5" Then Me.Text5.Top = "2500" End Sub Is the syntac correct?

No, Im still not able to move it! Im using exactly the same code as before and its simply sending the text box to top 0. Im using XP in case the version matters!

Im wondering if anyone has any ideas. I have a field which declares an integer call it Presses. If Presses is equal to five I want to be able to move a text box to a different location i.e. More up the page. At the moment i am looking at the code; If Me.Presses = "5" Then Me.Text5.Top...

Finito!!! Ive eventually managed to finish it. Ive removed the Else statement used above and just allowed the predefined tab control to take effect. Thanks for all your help!

Nearly there Rich that seems to work howvere there is a new problem! When Im entering values that are within the boundaries i.e. Tonnage 6 < Press6Max I am getting the error that i previously mentioned in thread five. Thanks for all your help by the way!

Error Ive to0ok the advice above and put the following code in Private Sub Tonnage6_BeforeUpdate(Cancel As Integer) If Me.Tonnage6 > Me.Press6Max Then If MsgBox("The tonnage exceeds the maximum allowed. Do you wish to continue", vbYesNo, "Exceeded tonnage") = vbNo Then...

A little bit better I have sorted out the message box and when I click yes to continue it does go to the right field. However when I click No to continue it should go back to the text box where I have previously visited. Which it doesnt! Should I be typing refresh or anything similar?

Still no luck! Apoligies for PM! There still seems to be a problem with the above code. Im still receiving the message with a vbOK format instead of vbYesNo. Also when I click on OK there seems to be no focus structure. If its any use Im using Access XP! Any help is much appreciated

Just wondering if anyone can help! I have the following code; Private Sub Tonnage6_AfterUpdate() If Tonnage6.Value > Press6Max.Value Then Dim bytResponse As Byte bytResponse = MsgBox("The tonnage exceeds the maximum allowed. Do you wish to continue", vbYesNo, "Exceeded tonnage") If...

Sorted Ive been able to sort the previous problem all I had to do is type =([Outer rear left]+[Outer rear right]+[Outer front right]+[Outer front left]) in the control source and it worked. However I have a new problem the above command will only work for a number data type. However in some...

Still no luck! Sorry people but Ive still not managed to work it. Both examples do not work. As I said I need to be able to see the data being manipulated. Also in the table ive created the field Outer total which should save the calculated field into the database. Thanks for the suggestions...