Palavra-chave With Executa uma série de instruções em uma instrução With.End With ou indica a declaração de um inicializador ...

Palavra-chave With
Executa uma série de instruções em uma instrução With...End With ou indica a declaração de um inicializador de objeto ou de um tipo anônimo.
With ...End With  -or-
Dim  As New With {. = [, ...]}  -or-
Dim  As New  With {. = [, ...]}