SetFocus error

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   I have some vb textboxes on a Frame which is on a Tab control. All this is on a Form in an MDI child using DockingPane.

To move user from one text box to another, I use  textbox(x).SetFocus

This 95% works OK, but sometimes gives error. 
I think this error is same as if textbox is not enabled or not visible.

I guess this is a timing error or similar.  Most times the SetFocus is fine. But sometimes I guess the DockingPane is busy doing something and the SetFocus gives error.   (without the DockingPane it always works OK.)

Any ideas to workaround this?

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
chrisABC Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 05 June 2008 Status: Offline Points: 258	Post Options Post Reply Quote chrisABC Report Post Thanks(0) Quote Reply Topic: SetFocus error Posted: 11 June 2009 at 11:02am
	I have some vb textboxes on a Frame which is on a Tab control. All this is on a Form in an MDI child using DockingPane. To move user from one text box to another, I use textbox(x).SetFocus This 95% works OK, but sometimes gives error. I think this error is same as if textbox is not enabled or not visible. I guess this is a timing error or similar. Most times the SetFocus is fine. But sometimes I guess the DockingPane is busy doing something and the SetFocus gives error. (without the DockingPane it always works OK.) Any ideas to workaround this?
	Chris (Manchester, UK) -- www.abc6.co.uk ---- Using CodeJock ActiveX Suite 13.1.0 with Windows8, VB6 SP6

chrisABC Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 05 June 2008 Status: Offline Points: 258	Post Options Post Reply Quote chrisABC Report Post Thanks(0) Quote Reply Posted: 11 June 2009 at 11:43am
	Possible workaround The following sort of thing seems to work OK Sub AttemptSetFocus(myControl) On Error Goto ERR_SF For X = 1 to 5 myControl.SetFocus Exit Sub ERR_SF: DoEvents Next End Sub (Note this is not real code. Just to give the idea).
	Chris (Manchester, UK) -- www.abc6.co.uk ---- Using CodeJock ActiveX Suite 13.1.0 with Windows8, VB6 SP6