My, NexoN Account Creator with Full Source Code!!

Public Class Form1
    Dim captchurl As String
    Private Sub fillinfo()
        WebBrowser1.Document.All("txtAccountId").SetAttribute("value", id.Text)
        WebBrowser1.Document.All("txtPassword").SetAttribute("value", password.Text)
        WebBrowser1.Document.All("txtPasswordConfirmation").SetAttribute("value", password.Text)
        WebBrowser1.Document.All("txtEmail").SetAttribute("value", email.Text)
        WebBrowser1.Document.All("txtFirstName").SetAttribute("value", fname.Text)
        WebBrowser1.Document.All("txtLastName").SetAttribute("value", lname.Text)
        WebBrowser1.Document.All("ddlBirthMonth").SetAttribute("value", "1")
        WebBrowser1.Document.All("ddlBirthDay").SetAttribute("value", "1")
        WebBrowser1.Document.All("ddlBirthYear").SetAttribute("value", "1987")
        WebBrowser1.Document.All("txtEmailConfirmation").SetAttribute("value", email.Text)
  For Each InputBx As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input")
            If (InputBx.GetAttribute("type").ToLower = "radio") AndAlso (InputBx.GetAttribute("value").ToLower = "0") Then
                InputBx.InvokeMember("Click")
            End If
        Next
        WebBrowser1.Document.All("chkTermofuse").InvokeMember("click")
    End Sub
     Private Sub getcaptcha()
        Dim nn As String = WebBrowser1.Document.Body.InnerHtml

        Dim tb1 As String = nn
        Dim findStart As String, pulledOut As String
        findStart = "properties="
        Dim start As Integer, [end] As Integer
        start = tb1.IndexOf(findStart)
        tb1 = tb1.Remove(0, start + findStart.Length)
        [end] = tb1.IndexOf("""")
        tb1 = tb1.Remove([end], tb1.Length - [end])
        pulledOut = tb1
        capurl.Text = ""
        capurl.Text = ("http://passport.nexon.net/Registration/FormShieldHttpHandler.aspx?__formShieldID=captchaFS&generate=image&properties=") & pulledOut
        captcha.Show()
    End Sub
    Private Sub randominfo()
         Dim source As String
        Dim MyWebClient As New System.Net.WebClient()
        source = MyWebClient.DownloadString("http://www.fakenamegenerator.com/gen-random-en-us.php")
        'nfame
        Dim tb1 As String = source
        Dim findStart As String, pulledOut As String
        findStart = "fireform.php?identity="
        Dim start As Integer, [end] As Integer
        start = tb1.IndexOf(findStart)
        tb1 = tb1.Remove(0, start + findStart.Length)
        [end] = tb1.IndexOf("-")
        tb1 = tb1.Remove([end], tb1.Length - [end])
        pulledOut = tb1
        fname.Text = pulledOut
        'lfame
        Dim tb2 As String = source
        Dim findStart1 As String, pulledOut1 As String
        findStart1 = "fireform.php?identity=" & fname.Text & "--"
        Dim start1 As Integer, [end2] As Integer
        start1 = tb2.IndexOf(findStart1)
        tb2 = tb2.Remove(0, start1 + findStart1.Length)
        [end2] = tb2.IndexOf("--")
        tb2 = tb2.Remove([end2], tb2.Length - [end2])
        pulledOut1 = tb2
        lname.Text = pulledOut1
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If WebBrowser1.StatusText = ("Done") Then
            If WebBrowser1.Document.All("txtAccountId") Is Nothing Then
                MsgBox("Something went wrong")
            Else
                randominfo()
                fillinfo()
                getcaptcha()
                captcha.PictureBox1.Image = New System.Drawing.Bitmap(New IO.MemoryStream(New System.Net.WebClient().DownloadData(capurl.Text)))
            End If
        Else
         End If
    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If WebBrowser1.StatusText = ("Done") Then
            PictureBox1.BackColor = Color.Green
            Label4.Text = ("Ready!")
            Button1.Enabled = True
            Label4.BackColor = Color.Green
        Else
            Button1.Enabled = False
            PictureBox1.BackColor = Color.Red
            Label4.Text = ("Not Ready!")
            Label4.BackColor = Color.Red
        End If
    End Sub
    Private Sub wait(ByVal interval As Integer)
        Dim sw As New Stopwatch
        sw.Start()
        Do While sw.ElapsedMilliseconds <> interval
            ' Allows UI to remain responsive
            Application.DoEvents()
        Loop
        sw.Stop()
    End Sub
    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        If WebBrowser1.DocumentTex*****ntains("Activate your account") Then
            wait(1000)
            Dim lvi As ListViewItem
            lvi = New ListViewItem(id.Text)
            lvi.SubItems.Add(email.Text)
            lvi.SubItems.Add(password.Text)
            ListView1.Items.Add(lvi)
            WebBrowser1.Navigate("http://passport.nexon.net/Registration/Signup.aspx?nexonTheme=Nexon")
        Else
            If WebBrowser1.DocumentTex*****ntains("FormShield") Then
            Else
                MsgBox("something went wrong", MsgBoxStyle.Critical)
            End If
        End If
    End Sub

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim lvi As ListViewItem
        lvi = New ListViewItem(id.Text)
        lvi.SubItems.Add(email.Text)
        lvi.SubItems.Add(password.Text)
        ListView1.Items.Add(lvi)

    End Sub
End Class

Imports WindowsApplication1.Form1
Public Class captcha
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        PictureBox1.Image = New System.Drawing.Bitmap(New IO.MemoryStream(New System.Net.WebClient().DownloadData(Form1.capurl.Text)))
    End Sub
    Private Sub captcha_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        PictureBox1.Image = New System.Drawing.Bitmap(New IO.MemoryStream(New System.Net.WebClient().DownloadData(Form1.capurl.Text)))
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If TextBox1.Text = ("") Then
            MsgBox("noob enter the code you see in the picture")
        Else
            Form1.WebBrowser1.Document.All("txtCaptcha").SetAttribute("value", TextBox1.Text)
            Form1.WebBrowser1.Document.All("btnSubmit").InvokeMember("click")
            Me.Hide()

        End If

    End Sub
End Class

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class captcha
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.PictureBox1 = New System.Windows.Forms.PictureBox
        Me.TextBox1 = New System.Windows.Forms.TextBox
        Me.Button1 = New System.Windows.Forms.Button
        Me.Button2 = New System.Windows.Forms.Button
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'PictureBox1
        '
        Me.PictureBox1.Location = New System.Drawing.Point(7, 3)
        Me.PictureBox1.Name = "PictureBox1"
        Me.PictureBox1.Size = New System.Drawing.Size(238, 50)
        Me.PictureBox1.TabIndex = 0
        Me.PictureBox1.TabStop = False
        '
        'TextBox1
        '
        Me.TextBox1.BackColor = System.Drawing.Color.White
        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.TextBox1.Location = New System.Drawing.Point(7, 54)
        Me.TextBox1.Multiline = True
        Me.TextBox1.Name = "TextBox1"
        Me.TextBox1.Size = New System.Drawing.Size(86, 18)
        Me.TextBox1.TabIndex = 1
        '
        'Button1
        '
        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.Button1.Location = New System.Drawing.Point(99, 53)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(70, 20)
        Me.Button1.TabIndex = 2
        Me.Button1.Text = "Refresh"
        Me.Button1.UseVisualStyleBackColor = True
        '
        'Button2
        '
        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.Button2.Location = New System.Drawing.Point(173, 53)
        Me.Button2.Name = "Button2"
        Me.Button2.Size = New System.Drawing.Size(70, 20)
        Me.Button2.TabIndex = 3
        Me.Button2.Text = "Submit"
        Me.Button2.UseVisualStyleBackColor = True
        '
        'captcha
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.Gray
        Me.ClientSize = New System.Drawing.Size(252, 78)
        Me.Controls.Add(Me.Button2)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.TextBox1)
        Me.Controls.Add(Me.PictureBox1)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.Fixed3D
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "captcha"
        Me.ShowIcon = False
        Me.ShowInTaskbar = False
        Me.Text = "captcha"
        Me.TopMost = True
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents Button2 As System.Windows.Forms.Button
End Class

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
        Me.email = New System.Windows.Forms.TextBox
        Me.password = New System.Windows.Forms.TextBox
        Me.Label3 = New System.Windows.Forms.Label
        Me.Label2 = New System.Windows.Forms.Label
        Me.Label1 = New System.Windows.Forms.Label
        Me.id = New System.Windows.Forms.TextBox
        Me.WebBrowser1 = New System.Windows.Forms.WebBrowser
        Me.Button1 = New System.Windows.Forms.Button
        Me.state = New System.Windows.Forms.TextBox
        Me.phone2 = New System.Windows.Forms.TextBox
        Me.phone1 = New System.Windows.Forms.TextBox
        Me.zip = New System.Windows.Forms.TextBox
        Me.city = New System.Windows.Forms.TextBox
        Me.address = New System.Windows.Forms.TextBox
        Me.phone = New System.Windows.Forms.TextBox
        Me.lname = New System.Windows.Forms.TextBox
        Me.fname = New System.Windows.Forms.TextBox
        Me.capurl = New System.Windows.Forms.TextBox
        Me.PictureBox1 = New System.Windows.Forms.PictureBox
        Me.Label4 = New System.Windows.Forms.Label
        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
        Me.ListView1 = New System.Windows.Forms.ListView
        Me.ColumnHeader1 = New System.Windows.Forms.ColumnHeader
        Me.ColumnHeader2 = New System.Windows.Forms.ColumnHeader
        Me.ColumnHeader3 = New System.Windows.Forms.ColumnHeader
        Me.Label5 = New System.Windows.Forms.Label
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'email
        '
        Me.email.Location = New System.Drawing.Point(81, 69)
        Me.email.Name = "email"
        Me.email.Size = New System.Drawing.Size(100, 20)
        Me.email.TabIndex = 38
        '
        'password
        '
        Me.password.Location = New System.Drawing.Point(81, 40)
        Me.password.Name = "password"
        Me.password.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
        Me.password.Size = New System.Drawing.Size(100, 20)
        Me.password.TabIndex = 37
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.Font = New System.Drawing.Font("Corbel", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label3.Location = New System.Drawing.Point(40, 72)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(38, 15)
        Me.Label3.TabIndex = 36
        Me.Label3.Text = "Email"
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("Corbel", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.Location = New System.Drawing.Point(16, 43)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(61, 15)
        Me.Label2.TabIndex = 35
        Me.Label2.Text = "Password"
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Corbel", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.Location = New System.Drawing.Point(9, 16)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(69, 15)
        Me.Label1.TabIndex = 34
        Me.Label1.Text = "Account ID"
        '
        'id
        '
        Me.id.Location = New System.Drawing.Point(81, 13)
        Me.id.Name = "id"
        Me.id.Size = New System.Drawing.Size(100, 20)
        Me.id.TabIndex = 33
        '
        'WebBrowser1
        '
        Me.WebBrowser1.Location = New System.Drawing.Point(287, 3)
        Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
        Me.WebBrowser1.Name = "WebBrowser1"
        Me.WebBrowser1.Size = New System.Drawing.Size(435, 294)
        Me.WebBrowser1.TabIndex = 50
        Me.WebBrowser1.Url = New System.Uri("http://passport.nexon.net/Registration/Signup.aspx?nexonTheme=Nexon", System.UriKind.Absolute)
        '
        'Button1
        '
        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.Button1.Location = New System.Drawing.Point(81, 95)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(100, 20)
        Me.Button1.TabIndex = 51
        Me.Button1.Text = "Register"
        Me.Button1.UseVisualStyleBackColor = True
        '
        'state
        '
        Me.state.Location = New System.Drawing.Point(32, 378)
        Me.state.Name = "state"
        Me.state.ReadOnly = True
        Me.state.Size = New System.Drawing.Size(98, 20)
        Me.state.TabIndex = 63
        '
        'phone2
        '
        Me.phone2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.phone2.Location = New System.Drawing.Point(97, 432)
        Me.phone2.Name = "phone2"
        Me.phone2.ReadOnly = True
        Me.phone2.Size = New System.Drawing.Size(33, 20)
        Me.phone2.TabIndex = 62
        '
        'phone1
        '
        Me.phone1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.phone1.Location = New System.Drawing.Point(62, 432)
        Me.phone1.Name = "phone1"
        Me.phone1.ReadOnly = True
        Me.phone1.Size = New System.Drawing.Size(29, 20)
        Me.phone1.TabIndex = 61
        '
        'zip
        '
        Me.zip.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.zip.Location = New System.Drawing.Point(32, 352)
        Me.zip.Name = "zip"
        Me.zip.ReadOnly = True
        Me.zip.Size = New System.Drawing.Size(98, 20)
        Me.zip.TabIndex = 58
        '
        'city
        '
        Me.city.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.city.Location = New System.Drawing.Point(32, 325)
        Me.city.Name = "city"
        Me.city.ReadOnly = True
        Me.city.Size = New System.Drawing.Size(98, 20)
        Me.city.TabIndex = 56
        '
        'address
        '
        Me.address.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.address.Location = New System.Drawing.Point(32, 301)
        Me.address.Name = "address"
        Me.address.ReadOnly = True
        Me.address.Size = New System.Drawing.Size(98, 20)
        Me.address.TabIndex = 54
        '
        'phone
        '
        Me.phone.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.phone.Location = New System.Drawing.Point(32, 432)
        Me.phone.Name = "phone"
        Me.phone.ReadOnly = True
        Me.phone.Size = New System.Drawing.Size(24, 20)
        Me.phone.TabIndex = 52
        '
        'lname
        '
        Me.lname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.lname.Location = New System.Drawing.Point(187, 430)
        Me.lname.Name = "lname"
        Me.lname.ReadOnly = True
        Me.lname.Size = New System.Drawing.Size(98, 20)
        Me.lname.TabIndex = 65
        '
        'fname
        '
        Me.fname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.fname.Location = New System.Drawing.Point(187, 404)
        Me.fname.Name = "fname"
        Me.fname.ReadOnly = True
        Me.fname.Size = New System.Drawing.Size(98, 20)
        Me.fname.TabIndex = 64
        '
        'capurl
        '
        Me.capurl.Location = New System.Drawing.Point(187, 456)
        Me.capurl.Name = "capurl"
        Me.capurl.Size = New System.Drawing.Size(100, 20)
        Me.capurl.TabIndex = 66
        '
        'PictureBox1
        '
        Me.PictureBox1.BackColor = System.Drawing.Color.Red
        Me.PictureBox1.Location = New System.Drawing.Point(81, 121)
        Me.PictureBox1.Name = "PictureBox1"
        Me.PictureBox1.Size = New System.Drawing.Size(100, 21)
        Me.PictureBox1.TabIndex = 67
        Me.PictureBox1.TabStop = False
        '
        'Label4
        '
        Me.Label4.AutoSize = True
        Me.Label4.BackColor = System.Drawing.Color.Red
        Me.Label4.Font = New System.Drawing.Font("Mongolian Baiti", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label4.ForeColor = System.Drawing.Color.White
        Me.Label4.Location = New System.Drawing.Point(94, 125)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(70, 13)
        Me.Label4.TabIndex = 68
        Me.Label4.Text = "Not Ready!"
        '
        'Timer1
        '
        Me.Timer1.Enabled = True
        Me.Timer1.Interval = 1
        '
        'ListView1
        '
        Me.ListView1.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2, Me.ColumnHeader3})
        Me.ListView1.FullRowSelect = True
        Me.ListView1.GridLines = True
        Me.ListView1.LabelEdit = True
        Me.ListView1.Location = New System.Drawing.Point(1, 161)
        Me.ListView1.Name = "ListView1"
        Me.ListView1.Size = New System.Drawing.Size(280, 135)
        Me.ListView1.TabIndex = 69
        Me.ListView1.UseCompatibleStateImageBehavior = False
        Me.ListView1.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader1
        '
        Me.ColumnHeader1.Text = "Account ID"
        Me.ColumnHeader1.Width = 82
        '
        'ColumnHeader2
        '
        Me.ColumnHeader2.Text = "Email"
        Me.ColumnHeader2.Width = 116
        '
        'ColumnHeader3
        '
        Me.ColumnHeader3.Text = "Password"
        Me.ColumnHeader3.Width = 90
        '
        'Label5
        '
        Me.Label5.AutoSize = True
        Me.Label5.Location = New System.Drawing.Point(112, 145)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(52, 13)
        Me.Label5.TabIndex = 70
        Me.Label5.Text = "Accounts"
        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.Gray
        Me.ClientSize = New System.Drawing.Size(285, 300)
        Me.Controls.Add(Me.Label5)
        Me.Controls.Add(Me.ListView1)
        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.PictureBox1)
        Me.Controls.Add(Me.capurl)
        Me.Controls.Add(Me.lname)
        Me.Controls.Add(Me.fname)
        Me.Controls.Add(Me.state)
        Me.Controls.Add(Me.phone2)
        Me.Controls.Add(Me.phone1)
        Me.Controls.Add(Me.zip)
        Me.Controls.Add(Me.city)
        Me.Controls.Add(Me.address)
        Me.Controls.Add(Me.phone)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.WebBrowser1)
        Me.Controls.Add(Me.email)
        Me.Controls.Add(Me.password)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.id)
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.MaximizeBox = False
        Me.Name = "Form1"
        Me.Text = "NexoN Account Creator"
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents email As System.Windows.Forms.TextBox
    Friend WithEvents password As System.Windows.Forms.TextBox
    Friend WithEvents Label3 As System.Windows.Forms.Label
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents id As System.Windows.Forms.TextBox
    Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents state As System.Windows.Forms.TextBox
    Friend WithEvents phone2 As System.Windows.Forms.TextBox
    Friend WithEvents phone1 As System.Windows.Forms.TextBox
    Friend WithEvents zip As System.Windows.Forms.TextBox
    Friend WithEvents city As System.Windows.Forms.TextBox
    Friend WithEvents address As System.Windows.Forms.TextBox
    Friend WithEvents phone As System.Windows.Forms.TextBox
    Friend WithEvents lname As System.Windows.Forms.TextBox
    Friend WithEvents fname As System.Windows.Forms.TextBox
    Friend WithEvents capurl As System.Windows.Forms.TextBox
    Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
    Friend WithEvents Label4 As System.Windows.Forms.Label
    Friend WithEvents Timer1 As System.Windows.Forms.Timer
    Friend WithEvents ListView1 As System.Windows.Forms.ListView
    Friend WithEvents ColumnHeader1 As System.Windows.Forms.ColumnHeader
    Friend WithEvents ColumnHeader2 As System.Windows.Forms.ColumnHeader
    Friend WithEvents ColumnHeader3 As System.Windows.Forms.ColumnHeader
    Friend WithEvents Label5 As System.Windows.Forms.Label

End Class