codice:
dim corpo as string=""
corpo+="Commento:" & Commento.Text  & "
"
corpo+=Eta':" & Eta.Text & "
"
ecc......
mail.Body = corpo
puoi usare anche vbLF al posto di "
"
es.
corpo+="Commento:" & Commento.Text & vbLF