Im getting this error mesage, for the below code. I have tried to add END Sub at the end but still didnt work
Any ideas?
Expand|Select|Wrap|Line Numbers
- Private Sub Command45_Enter()
- Function updateList()
- 're-create query stuff
- Me.lstName.ControlSource = "Form_hours worked"
- Me.lstName.Requery
- End Function