Se togli la riga:

Dim stp As New Mail.SmtpMail()

e la riga:

stp.SmtpServer = "127.0.0.1"

l'email si invia utilizzando il server smtp del server su cui è ospitato il sito. Per effettuare le prive di invio in locale bisogna configurare il server smtp della tua macchina, ma in rete sono già configurati e quindi non ci sono problemi!
Se vuoi una guida vai a questo link:

Iniviare email dal prorpio sito

Quì trovi anche un'esempio che puoi scaricare, è scritto in C#, ma basta che loguardi com'è fatto e fai la stessa cosa in VB.