メールの送信
Dim msg As New System.Net.Mail.MailMessage()
msg.From = New System.Net.Mail.MailAddress("sender@xxx.xxx", "山野井")
msg.To.Add(New System.Net.Mail.MailAddress("recipient@xxx.xxx", "山田"))
msg.Subject = "こんにちは"
msg.Body = "こんにちは" + vbCrLf + "テストメールです。"
Dim sc As New System.Net.Mail.SmtpClient()
sc.Host = "メールサーバのアドレス"
sc.Send(msg)