Search results

Hi antonyx, You need to run and test the code. I wouldn’t say the code would work. But I will ask you; does it work according to what you have designed it to do? Don’t ask me because I can’t see your database and how you develop it and you didn’t even test it. Did you read post #16? Did you...

Hi giedrius, Looking at this, >However when I put code into On_Keypress event for control B, it fires >when the user hits Enter in field A. Did you put the code at the Form's KeyPress Event? Sounds more like the Form's event to me.

The code I post will not work. But look at post #9. Look at the If ElseIf, it should work except the missing End If. As there aren’t any error messages, I won’t conclude anything, as the ElseIf was incomplete in the beginning. Usually, a beginner doesn’t understand what Compiling code means...

As Paul and Bob have said about “KeyCode” thing, it appears that you need to put a line “Option Explicit” just below “Option Compare Database” When you compile and run the form or code, the editor will inform you that “Keycode” – Variable Not Define. Since “KeyCode” is reserved name in...

Hi antonyx, You really need to have the action/events planned first before jumping into coding, not by hammering and screwing into your codes. Try this, Private Sub idfound_AfterUpdate() Dim newid newid = idfound.Value If KeyCode = 9 And IsNull(idfound) Then Me.cboname.SetFocus Exit...

Hi, try it like this, Private Sub idfound_KeyDown(KeyCode As Integer, Shift As Integer) 'if idfound is your control/textbox If KeyCode = 9 Then If IsNull(idfound) Then Me.personname.SetFocus Else Docmd.openform "YourFormName" 'is it Job? Forms!Job!qbook.Value = idfound 'just in case you close...

Have a look at this.

hi scouser, Pat had mentioned that this will happened. If you have bound that text field, you can see that the table field is set correctly. What i can suggest is a command button for a popup form to insert new rows for the "frmOrderDetails" and make it as a single form, set properties to -...

Hi scouser, I don't know what are you trying to do to the sub form combos, anyway, you did not bound the field "MakeID" and "ModelID", that's why they disappear. As for the "[Forms]![frmOrderDetails]![cboMakeList]" delete it for the query of MakeID rowsource. I had a hard time at first, but...

Hi Andy, Try this.... Dim stLinkCriteria As String stLinkCriteria = stLinkCriteria & "[DateDealIn] = " & Me.yourtextbox &"" DoCmd.OpenForm "frmLog", , , stLinkCriteria set properties tab of the textbox - Default Value to Date() or in VB - yourtextbox.DefaultValue = "Date()" HNY

Well, for me i would create a command button to popup a form in the main form. First, create the popup form base the the customerID table. Create textboxes bound to fields of the table. In the properties tab - Data, set the Data Entry to 'Yes'. Save the form. Next, open the main form in design...