Hiya folks!

This one must have an easy solution but cant seem to figure it out!

Each time I click on a field in a form (let us say I click in the middle of the field), I want it to automatically move the cursor the beginning of the field (position 1?). Is there a way to do this? I tried using SendKey on the OnGetFocus event for the field with the {Home} but that didnt work.

Thanks!!!

Do this for the 'on focus' and 'on click' events:
------------------------------------------------------
  iFrameSource_Text.SelStart = 0
  My_Textbox.SelLength = 0
------------------------------------------------------

If you want to afterwards be able to click a second time to move cursor possition, your code will need to be a little more complex. Try this (Assuming you're not using the Tag property of the text object already):

-------------------------------------------------------
Private Sub My_Textbox_Click()

'Moves cursor on first click after focus
  If My_Textbox.Tag = True Then
    My_Textbox.Tag = False
    My_Textbox.SelStart = 0
    My_Textbox.SelLength = 0
  End If

End Sub

Private Sub My_Textbox_GotFocus()

'Moves cursor on receiving focus
  My_Textbox.Tag = True
  My_Textbox.SelStart = 0
  My_Textbox.SelLength = 0

End Sub

Private Sub My_Textbox_KeyUp(KeyCode As Integer, Shift As Integer)

'Removes first click when focus gathered by keypress instead of click
  My_Textbox.Tag = False

End Sub
-------------------------------------------------------

Remember if you copy and paste above that you have an text object named My_Text and that you assign an event procedure to the three events the code is written for.


Hope this is what you were looking for.

Hi!!! Sorry for the laaaaaaate reply!

Your solution worked perfectly on a Text Box.

And I guess I should have mentioned this ealier, but I need to use this on a combo box, but its not working.

Any clues?

What I am trying to do is the following (in Access 2000): I have a form..... and you know that function where you can search for a record using a combo? Well.... I dont want the user to click on the combo in order to view a list of possible values (in this case "dates"). I want the user to type in a date (using a mask) so that the form can lookup and display the data related to that date.

Thanksssss!

The problem with a combo box is that most of the properties, including OnClick, refer to the combobox more than the textbox associated with it. To do it you'd have to lay a text box on top of the combo box just short enough to allow the drop down to be clicked and have the value be the same. This has it's own problems as well such as autocomplete when typing in won't work.

It sounds more like you want to type in a date in a text box and have it look up similar to how a drop down can be coded to work.

You CAN do this with a text box control. It has an OnChange routine in which you can code your own lookup procedure. Or you could have a button next to it, use the eyeglass icon if you like, which will perform a lookup based on the date put in the text box. Then use Me.Recordset.findfirst("Where TheDate = "#" & My_TextBox.Value "#").

Does this give you pointers in the right direction? If not, or you're not comfortable with coding custom routines, I'd need more details on what you want.