Private WithEvents t As Form 'clsNewDocID
'WithEvents - тот, кто тебе (классу) педераст "сообщение" о своих событиях, т.е. "сервер". Твой класс - его "клиент".
В своем классе (клиенте) ты и пишешь процедуры запускаемые событиями "сервера", -т.е. определенными (и наступающими) для "сервера событий" (в твоем случае - Form). Если ты попытаешься определить в серверы событий класс, не реализующий событий - то его клиентам нечего будет получать. Если ты хочешь последовательно переслать от своего (промежуточного класса -клиента) сообщение (событие) другому классу - вызови в нем уже его, собственный RaiseEvent (которы и будет слаться дальше).


в языке просто скрыта реализация "передачи" управления от "серверов" - "клиентам" (или организация параллельных нитей - ит депендс - т.к., если сервер должен дождаться завершения одного _своего_ события, до возникновения следующего - он, думается, будет ждать завершения всех обработчиков "получателей", хотя в аналогии программирования событий с асинхронно читаемой почтой этого не просматривается - сервер не обязан ждать отклика клиентов, их, откликов, просто "не существует" в языке), и организация общего "вычислительного процесса" по синтаксическим меткам вида:
{Объявить_мне_клиенту WithEvents "сервер" AS "класс-рассыльщик-событий"}