D
default105
I have the following code:
Private Sub Form_Current()
Me.ListOrderedItems.Requery
Dim lngPOCRec As Long
lngPOCRec = (Me.CurrentRecord) - 1
Me.ListUnrecOnEmployee.SetFocus
Me.ListUnrecOnEmployee.ListIndex = lngPOCRec
End Sub
I am designing this in Access2k3 with the mdb as 2000 file format and it
works fine, when I navigate through the records it highlights the item in the
listbox associated to the current record and all buttons work correctly.
But when I tested it in Access 2k I have to click once to set the focus back
to the form and click again to get any buttons to work, cursor to go into a
txtbox, etc... I have no idea on how to fix this problem. Thanks in advance
for reading this and many thanks for your help.
Pete
Private Sub Form_Current()
Me.ListOrderedItems.Requery
Dim lngPOCRec As Long
lngPOCRec = (Me.CurrentRecord) - 1
Me.ListUnrecOnEmployee.SetFocus
Me.ListUnrecOnEmployee.ListIndex = lngPOCRec
End Sub
I am designing this in Access2k3 with the mdb as 2000 file format and it
works fine, when I navigate through the records it highlights the item in the
listbox associated to the current record and all buttons work correctly.
But when I tested it in Access 2k I have to click once to set the focus back
to the form and click again to get any buttons to work, cursor to go into a
txtbox, etc... I have no idea on how to fix this problem. Thanks in advance
for reading this and many thanks for your help.
Pete