Prova così, l'argomento è già stato trattato più volte.
codice:
'in Form1
Private Sub Ok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ok.Click 
    Dim testo As String 
    Dim myform As New Form2 

    myform.Owner = Me     '<===
    'myform.testo = Me.TextBox1.Text 
    myform.ShowDialog() 
    'Me.TextBox1.Text = myform.Txt1.Text 
End Sub

'in Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Dim f As Form1

    f = Me.Owner
    Me.Txt1.Text = f.Textbox1.Text
End Sub 

Private Sub BtnChange_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnChange.Click 
    Dim f As Form1

    f = Me.Owner
    f.Textbox1.Text = Me.Txt1.Text

    Me.close
End Sub
Ciao

P.S. se la prossima volta usi il tag CODE per postare il tuo codice risulterà a tutti molto più leggibile