获取多个text框焦点解决方法

2013-01-25

获取多个text框焦点窗体上有几个text控件怎么判断目前聚焦是哪个，text框的名字是这样子的：txtx(0) txtx(1

获取多个text框焦点
窗体上有几个text控件怎么判断目前聚焦是哪个，text框的名字是这样子的：
txtx(0)
txtx(1)
txtx(2)
txtx(3)
当我点在某个框的时候，比如txtx(1),我想获取下位机串口发过来的数据，在那个框显示。

[解决办法]
本帖最后由 bcrun 于 2013-01-19 10:00:40 编辑

Dim CurrentIndex As Integer

Private Sub Textx_GotFocus(Index As Integer)
    CurrentIndex = Index
End Sub

[解决办法]
还有一种方法，在任何时刻获取 Index:

If Me.ActiveControl.Name = "Textx" Then Debug.Print Me.ActiveControl.Index
[解决办法]
当然，如果是点击文本框触发写操作的话，直接在 Textx_GotFocus 事件中写代码，直接引用 Index.

热点排行

VB

获取多个text框焦点解决方法