您所在位置：主题：如何得到数组控件的索引号
hjrhqs
[专家分：0] 发布于 2010-12-23 19:58:00
是这样的，一个窗体中有10个TEXT的控件数组，1个TIMER控件。我要用这个TIMER控件，随时把得到焦点的TEXT控件的数组索引号传给一个子程序。请问TIMER控件用什么方法得到当前TEXT数组控件的索引号。
用下面这个代码只能得到名字TEXT1。
Dim ctl As Control
Set ctl = Screen.ActiveControl
Label1.Caption = "当前得到焦点的是:" & ctl.Name
搞定了，原来只是把：Label1.Caption = "当前得到焦点的是:" & ctl.Name改成：Label1.Caption = "当前得到焦点的是:" & str(ctl.Name.index)
用下面这个代码只能得到名字TEXT1。
Dim ctl As Control
Set ctl = Screen.ActiveControl
Label1.Caption = "当前得到焦点的是:" & ctl.Name
搞定了，原来只是把：Label1.Caption = "当前得到焦点的是:" & ctl.Name改成：Label1.Caption = "当前得到焦点的是:" & str(ctl.Name.index)