All text selected when clicking Tab Control 1

[TrekBiker]

A tab control on a client's form has three pages, each with a single field. When clicking the headers to move from tab to tab all of the existing text on the selected tab is highlighted automatically. Can I stop this?

 

[dhookom]

Have you confirmed there is no code running that might run sendkeys to select all? Typically clicking to a different tab will put the cursor in one control.

You may need to repair and compact.

Duane
Minnesota
Hook'D on Access
MS Access MVP 2001-2016

 

[TrekBiker]

Sorry for late reply, skiing trip intervened.

No code running to cause this. Seems to be an inbuilt feature because the fields I moved to the tab control pages didn't show the same behaviour when on the form itself.

 

[dhookom]

I don't think this has anything to do with tabs. Anytime you move from one control to another the entire contents of the control are selected. You can add code to the Got Focus to position the cursor at the beginning or end of the text.

Check out the .SelStart method.

Duane
Minnesota
Hook'D on Access
MS Access MVP 2001-2016

 

[strongm]

It is the default behaviour for SetFocus for text controls in Access

 

[Andrzejek]

all of the existing text on the selected tab is highlighted automatically

You may want to be more precise - what text is highlighted? Do you have several text boxes on the tab and all text in all textboxes is highlighted? A picture here would go a long way presenting your issue...


---- Andy

There is a great need for a sarcasm font.

 

[strongm]

>Do you have several text boxes on the tab
> each with a single field
Suggests a single textbox ...

 

[TrekBiker]

Thanks to all.

This does seem to be a default behaviour. When the fields are in the normal form the texts they contain don't get highlighted when swapping from one to the other. When moved to the Tab Control pages, one field per page, they show the behaviour - specifically the default page isn't highlighted but going to another page does show the highlighting. Hope this is clear in the attachment (thanks Andy, didn't know I could do this - if it works).

Thanks to dhookom for pointing to the .SelStart method, which led me to adding Got Focus events to each field on the Tab Control pages, like this example. Works a treat.

Private Sub ContactInformation_GotFocus()

    If Nz(Me.ContactInformation, "") = "" Then
         Me.ContactInformation.SelStart = 0
    Else
         Me.ContactInformation.SelStart = Len(Me.ContactInformation) + 1
    End If

End Sub

 

[strongm]

>the texts they contain don't get highlighted when swapping from one to the other

It'll depend on the Tab Index order

 

[Andrzejek]

Interesting picture, with your phone of your screen (I guess...?)
Have you used a Snipping Tool in Windows?


---- Andy

There is a great need for a sarcasm font.

 

[TrekBiker]

Andy, yes use Shipping tool all the time but starting it removed the highlight I was asking about. Hence use of phone, sorry.

 

[strongm]

> removed the highlight

Odd. Works fine here without removing the highlight … oh well.

 

[Andrzejek]

There is always a PrintScreen or Alt-PrintScreen

Just a suggestion...


---- Andy

There is a great need for a sarcasm font.

 

[lameid]

Just to clarify in words what was happening from what I can tell looking at the picture...

There is a tab control with tabs each having one textbox on it. When the tab was changed, all the text in the only control was selected which is the same as the first control in the tab order which is the default. Personally I had never run across or needed selstart... good to know.