Добавить обработчик событий к каждому элементу управления в форме во время выполнения VB6

У меня есть приложение VB6, в котором я хотел бы иметь согласованное поведение среди его элементов управления в масштабах всего приложения. Одно из вариантов поведения, например, будет выделять текстовое поле, когда оно получает фокус, и убирать выделение, когда оно теряет фокус. Я бы хотел, чтобы это происходило с каждой формой.

Я пытаюсь создать одну подпроцедуру, которая может вызываться всеми формами при загрузке, что приведет к такому поведению. Таким образом, мне не нужно вручную кодировать каждое отдельное текстовое поле, чтобы выделить его.

Я пытался заставить VB6 прикрепить обработчик событий к элементу управления во время выполнения, но он просто лает на меня. Я происхожу из среды .Net, так что, возможно, я ошибаюсь для VB6. Но как я могу добиться этого желаемого поведения без необходимости вручную кодировать его для каждого элемента управления?