一、问题描述：

      如何在窗体里面获取当前文本框名称呢？

二、解决方案：

      可以使用 ActiveControl 属性和 Screen 对象来获取焦点控件的名称。

实现代码：

Private Sub Text0_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
      Me.文本框名称 = Screen.ActiveControl.Name
End Sub

演示图: