求VB Tab顺序
2个回答
展开全部
在tabindex属性中设置
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
TabIndex 属性
返回或设置父窗体中大部分对象的 tab 键次序。
语法
object.TabIndex [= index]
TabIndex 属性语法包含下面部分:
部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
Index 0 到 (n-1) 的整数,这里 n 是窗体中有 TabIndex 属性的控件的个数。给 TabIndex 赋一个小于 0 的值会产生错误。
说明
缺省情况下,在窗体上画控件时 Visual Basic 会分配一个 tab 键顺序,但 Menu、Timer、Data、Image、Line 和 Shape 控件除外,这些控件不包括在 tab 键顺序中。运行时,不可见或无效的控件以及不能接收焦点的控件(Frame 和 Label 控件)仍保持在 tab 键顺序中,但在切换时要跳过这些控件。
每个新控件都放在 tab 键顺序的最后。如果改变控件的 TabIndex 属性值来调整缺省 tab 键顺序,Visual Basic 会自动对其它控件的 TabIndex 属性重新编号,以反映出插入和删除操作。可以在设计时用属性窗口或在运行时用代码来作改变。
Zorder 方法不会影响 TabIndex 属性。
注意 控件的 tab 键顺序不会影响与其相关的访问键。对于 Frame 或 Label 控件,如果按下访问键,则焦点移到 tab 键顺序中能够接收焦点的下一个控件上。
当加载存为 ASCII 文本的窗体时,对于具有 TabIndex 属性但在窗体描述中没有列出的控件会自动地分配一 TabIndex 值。以后加载的控件,如果现有的 TabIndex 值与先前分配的值发生冲突,将给该控件分配新值。
删除一个或多个控件时,可以用 Undo 命令恢复控件以及除 TabIndex 之外所有的属性,TabIndex 是不能恢复的。用 Undo 命令时 TabIndex 被重放在 tab 键顺序的结尾。
TabIndex 属性示例
这个例子通过改变命令按钮数组的 TabIndex 属性使一组按钮的标签顺序反向。要尝试这个例子,请将代码粘贴到包含四个 CommandButton 控件的窗体的声明部分。将每个按钮的 Name 属性设置为 CommandX 来创建控件数组,然后按 F5 键并单击窗体使按钮的标签顺序反向。
Private Sub Form_Click ()
Dim I, X ' 声明变量。
' 通过设置X的起始值使标签顺序反向。
If CommandX(0).TabIndex = 0 Then X = 4 Else X = 1
For I = 0 To 3
CommandX(I).Caption = X ' 设置标题。
CommandX(I).TabIndex = X - 1 ' 设置标签的顺序。
If CommandX(0).TabIndex = 3 Then
X = X - 1 ' X 减一。
Else
X = X + 1 ' X 增一。
End If
Next I
End Sub
返回或设置父窗体中大部分对象的 tab 键次序。
语法
object.TabIndex [= index]
TabIndex 属性语法包含下面部分:
部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
Index 0 到 (n-1) 的整数,这里 n 是窗体中有 TabIndex 属性的控件的个数。给 TabIndex 赋一个小于 0 的值会产生错误。
说明
缺省情况下,在窗体上画控件时 Visual Basic 会分配一个 tab 键顺序,但 Menu、Timer、Data、Image、Line 和 Shape 控件除外,这些控件不包括在 tab 键顺序中。运行时,不可见或无效的控件以及不能接收焦点的控件(Frame 和 Label 控件)仍保持在 tab 键顺序中,但在切换时要跳过这些控件。
每个新控件都放在 tab 键顺序的最后。如果改变控件的 TabIndex 属性值来调整缺省 tab 键顺序,Visual Basic 会自动对其它控件的 TabIndex 属性重新编号,以反映出插入和删除操作。可以在设计时用属性窗口或在运行时用代码来作改变。
Zorder 方法不会影响 TabIndex 属性。
注意 控件的 tab 键顺序不会影响与其相关的访问键。对于 Frame 或 Label 控件,如果按下访问键,则焦点移到 tab 键顺序中能够接收焦点的下一个控件上。
当加载存为 ASCII 文本的窗体时,对于具有 TabIndex 属性但在窗体描述中没有列出的控件会自动地分配一 TabIndex 值。以后加载的控件,如果现有的 TabIndex 值与先前分配的值发生冲突,将给该控件分配新值。
删除一个或多个控件时,可以用 Undo 命令恢复控件以及除 TabIndex 之外所有的属性,TabIndex 是不能恢复的。用 Undo 命令时 TabIndex 被重放在 tab 键顺序的结尾。
TabIndex 属性示例
这个例子通过改变命令按钮数组的 TabIndex 属性使一组按钮的标签顺序反向。要尝试这个例子,请将代码粘贴到包含四个 CommandButton 控件的窗体的声明部分。将每个按钮的 Name 属性设置为 CommandX 来创建控件数组,然后按 F5 键并单击窗体使按钮的标签顺序反向。
Private Sub Form_Click ()
Dim I, X ' 声明变量。
' 通过设置X的起始值使标签顺序反向。
If CommandX(0).TabIndex = 0 Then X = 4 Else X = 1
For I = 0 To 3
CommandX(I).Caption = X ' 设置标题。
CommandX(I).TabIndex = X - 1 ' 设置标签的顺序。
If CommandX(0).TabIndex = 3 Then
X = X - 1 ' X 减一。
Else
X = X + 1 ' X 增一。
End If
Next I
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询