制表位的代码是什么？

dearzhy

请问下控制制表位的代码怎么写？
我想设计一个按钮，控制几个控件的制表位的0，1状态，不知道制表位的代码是什么。
最好能帮我直接例举一个源代码。

红尘如烟

TabStop 属性
使用 TabStop 属性可以指定是否能在“窗体”视图中通过 Tab 键次序将焦点移到一个控件上。Boolean 型，可读写。

expression.TabStop
expression      必需。返回“应用于”列表中的一个对象的表达式。

说明
TabStop 属性仅应用于窗体上的控件，不应用于报表上的控件。

如果复选框、选项按钮或切换按钮控件出现在选项组中，则该属性将不应用于它们，而只应用于选项组本身。

TabStop 属性使用以下设置：

设置 Visual Basic 说明
是 True   （默认设置）可通过按 Tab 将焦点移动到控件上。
否 False   不能通过按 Tab 将焦点移动到控件上。


注释  可以使用控件的属性表、宏或 Visual Basic 来设置该属性。

在窗体上创建控件时，Microsoft Access 会自动为其指定在窗体中的 Tab 键次序。每个新创建的控件都将排在 Tab 键次序的最后一个位置上。如果希望按 Tab 在窗体的控件之间移动焦点时使某个控件不可用，可将该控件的 TabStop 属性设置为“否”。

在“窗体”视图中，隐藏或禁用的控件依然处于 Tab 键次序中，只是在按 Tab 时将跳过它们，即使它们的 TabStop 属性已设为“是”。

只要控件的 Enabled 属性设为“是”，就可以通过单击该控件或使用访问键来选择它，而不受 TabStop 属性设置的影响。例如，可以将一个命令按钮的 TabStop 属性设为“否”以防止用户通过按 Tab 来选择它，但是用户仍然可以通过单击来选择该命令按钮。

示例
下面的示例将禁止通过 Tab 将焦点移动到“Suppliers”窗体“City”文本框。

Forms("Suppliers").Controls("City").TabStop = False