Bom dia!
Você pode usar um arquivo HTML escrito separadamente e usar a classe Net.Mail.MailMessage.
Basta atribuir o conteúdo do arquivo como corpo da mensagem e definir como HTML.
Dim sr As New IO.StreamReader("caminho completo do arquivo html");
Dim message As New Net.Mail.MailMessage
message.Body = sr.ReadToEnd()
message.IsBodyHtml = True
Se você quiser deixar algum conteúdo do arquivo dinâmico pode criar uma convenção de argumentos, por exemplo:
<html>
<body>
<h1>Olá, #NOME_PESSOA#!</h1>
<b>Aviso importante...</b>
</body>
<html>
Aí bastaria fazer algo +- assim:
message.Body = message.Body.Replace("#NOME_PESSOA#", nomePessoa)
