' Add any initialization after the InitializeComponent() call. So I edited/tweaked your code and came up with the following to get the emails into Textbox1.text: HERE IS MY ENTIRE FORM1.VB CODES: Imports I noticed that you had your code extract the emails and then show a message.box with the emails inside of it.
#Jee juh instrumentals free download software
John Grove - TFD Group, Senior Software Engineer, EI Division, Hey John The code that you gave me is very good, but the only issue is that it will only extract 1 email out of the huge collection of html text that was copied and pasted into Textbox1.Text. What you can do is this if you want to see it: Private emails As New List(Of String) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim m As Match = Regex.Match(TextBox1.Text, While m.Success emails.Add(m.Value) m = m.NextMatch() End While For Each email As String in emails MessageBox.Show(email) Next End Sub End Class Well, I created a local list just for demonstration purposes. Maybe I misunderstood your code? Is it insufficient or is this the complete code to perform this function? Thanks again. I used the above code exactly the way that you have it and when I click button1 after dragging and dropping text or copying and pasting text into Textbox1.Text and nothing happens. John Grove - TFD Group, Senior Software Engineer, EI Division, Thanks for your quick reply Jonn. Me.TextBox1.Text = is one heck of a guy while shows potential" Me.TextBox1.Multiline = True End Sub Private Sub Button1_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Clickĭim m As Match = Regex.Match(TextBox1.Text, m.Success ' This call is required by the Windows Form Designer.