получить имя контрола в процедуре обработки события

[devel]

Добрый день!
Не подскажете, как решить казалось бы простенькую задачу.
Есть контрол, скажем поле, у него есть процедура обработки события, скажем After Update. Хотелось бы автоматически в этой процедуре получать имя контрола (через какое-нибудь свойство или как-нибудь еще), а не вводить его ручками.

Заранее спасибо.

[Mikle]

Можно при создании контрола ОДИН РАЗ прописать руками, а форма будет получать автоматом. В контроле:

event MyEvent (RetName as string)
RetName="MyControl"
end event

в форме:

private sub MyControl_MyEvent (RetName as string)
s$=RetName
end sub

что-то вроде, под рукой нет бейсика. А вот как получить не имя, а ИНДЕКС, если у нас массив контролов - я сам столкнулся с проблемой.
Имеется ввиду получить ИЗ КОНТРОЛА не прописывая в форму ничего. Это к примеру если я пишу контрол НЕ ДЛЯ СЕБЯ, и есть необходимость узнать, один контрол на форме, или массив и, если массив - индекс.