[RESOLVED] Tab Stop

[swtransaction]

I have a screen with a lot of stuff on it. Grids, frames, tabs, etc. I'm trying to turn off all the tab stops except one. I was able to get all of them off except the one I want off and one other one I can't seem to find.

Is there a easier way to find what is still on? Thanks!

[PORRASTAR]

try this code inside a command button:

Dim ctrl As Control

For Each ctrl In Me.Controls
If ctrl.TabStop = True Then
MsgBox ctrl.Name
End If
Next

[kows]

To check a property, you can always do this:

Private Sub Command1_Click()
  Dim ctl As Control
  For Each ctl In Controls
    On Error Resume Next
    If ctl.TabStop = True Then MsgBox ctl.Name
  Next ctl
End Sub

Be fore warned -- this will check EVERY control on the form for a TabStop.. so, if you want to only try one type of control, dimension ctl as that type of control, so for example, for only TextBoxes:

Dim ctl as TextBox

I think this would work better for what you wanted, but I wasn't sure. It will give you a message box for each control that has a TabStop = True.

The error thing is added because not all items have a TabStop, so otherwise you'll get some "data property not found" errors.