Can I disable the left mouse click

[SKM]

Hello.

On my form I have a Frame containing 6 Textbox's and I need to stop the user from clicking on these Textbox's with the Left mouse button but I still need the user to be able to Tab from one box to the next. On the forum I have seen a couple of code posts that claim to disable the mouse click but I cannot get either one to work.

If anyone can help I would be most gratefull.

Thanks.
SKM

[Bruce Fox]

So, you want to prevent a TextBox from gaining the Focus when using the mouse?

[Bruce Fox]

Here is a simple solution using a hidden CommandButton (with it's TabStop diabled):

Option Explicit
 
Private Sub Form_Load()
    cmdHidden.TabStop = False
End Sub
 
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbLeftButton Then cmdHidden.SetFocus
End Sub

If your TextBox's were in a Control Array, then you would just need one line of code, as the example I provided will only do ONE of them .