Visual Basic

<br />
        Dim s As Regex = New Regex("\""([^\""]*)\""(?:\s)*")<br />
        Dim match As Match = s.Match(w) ' where w is the string mentioned<br />
        While (match.Success)<br />
            ' match.Groups(1).Value will contain the string<br />
            match = match.NextMatch()<br />
        End While<br />

<br />
        Const quotchar As String = """"<br />
        w = w.Trim(quotchar) ' remove quotes from start and end<br />
        w = w.Replace(""" """, quotchar) ' replace " " with "<br />
        Dim stringarray As String() = w.Split(quotchar) ' Now just invoke split and save to array<br />

' This code is in Form1
Dim form2 As New Form2()
form2.TextBox1.Text = "Sometext..."
form2.ShowDialog()
Dim newString As String = form2.TextBox1.Text
form2.Dispose()
form2 = Nothing

Dim activeChild As Form2 = Me.ActiveMDIChild
If (Not activeChild Is Nothing) Then
    Try
        activeChild.RichTextBox1.LoadFile(whatever you're using to pass the filename)
    Catch
        MessageBox.Show("A problem occured loading the file...")
    End Try
End If