RegExp - нужна помощь при создании шаблона - VB

Формулировка задачи:

Всем добрый день.
Что-то човсем у меня не получается создать шаблон регулярного выражения.
Дано:
Строка вида

Событие: тест75
Параметр: п1
Время:13:00
Событие: тест1
Параметр: п1
Время:13:00
Событие: тест2
Параметр: п2ааааааааааааа
Время:13:03
Событие: тест1
Параметр: п67
Время:18:00
Событие: тест6
Параметр: п1
Время:13:00

В результате хочу получить на выходе

Событие: тест1
Параметр: п1
Время:13:00
Событие: тест1
Параметр: п67
Время:18:00

Как пройтись циклом по всей строке и найти все вхождения я знаю

Expr.Global = True
Expr.IgnoreCase = True

 'Me.Winsock2.GetData s
 Set ExprMatches = Expr.Execute(s)
 For Each ExprMatch In ExprMatches
    Set ExprMatch = ExprMatches(0)
    strTMP = strTMP & ExprMatch
    
Next

А вот правильно создать

Expr.Pattern

не получается.
В нужной строке могут быть абсолютно любые символы и их кол-во может быть абсолютно разным.
Помогите плиз кто в теме.

Решение задачи: «RegExp - нужна помощь при создании шаблона»

textual
                            Листинг программы 
                        
                            Событие: тест1
Параметр: п1
Время:13:00