>>101
アクティブなコントロールを得るには、activecontrol オブジェクトを使うと楽です。
こんな感じで書くと良いですよ。

if (activecontrol.name = "txtArray") then
CurrentIndex = activecontrol.index
end if