Как использовать строку внутри класса в подформе

---

У меня есть две формы и один класс, обе формы были соединены через класс а

Основная форма одно текстовое поле получите пользовательский ввод из текстового поля и отправьте его на редактирование для класса А,
ClassA делает некоторые изменения и отправляет в текстовое поле в Form2 для отображения вывода

Я попробовал ниже код, но он ничего не показывает

'01 ///Inside Form One Main Form
'------------------------------------------------------------------------------------------
Public Class Form1

    Private clasAObj As New ClassA

    '// Send to edit Class
    Sub sendToEdit()
        clasAObj.editText(TextBox1.Text.ToString)
    End Sub


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Form2.Show()
    End Sub
End Class


'----------------------------------------------------------------------------------------------------------
'02. //inside ClassA



Public Class ClassA

    Dim form2Obj As New Form2

    Sub editText(ByVal OriginalText As String)
        '/// Edit Like Something
        Dim EditText As String = OriginalText
        '/// Send to show form two text box
        form2Obj.ShowText(EditText)
    End Sub

End Class


'---------------------------------------------------------------------------------------------------------
'03. // Inside Form2

Public Class Form2
    Sub ShowText(ByVal receiveText As String)

        TextBox1.Text = receiveText.ToString & vbCrLf

    End Sub

End Class

если я пошлю в msg mox, это будет видно. но для текста это не работает

Пожалуйста, помогите мне

---