Private Python2VBText As New TextBox

' Test condition ans='y' or 'yes'.
Public Sub Routine2
    Dim ans As String
    ans = "y"
    if ans = "y" or ans = "yes" Then
    Python2VBText.Text = Python2VBText.Text + "y is OK" + vbNewLine
    Python2VBText.MultiLine = True
    Python2VBText.Width = 200
    Python2VBText.Height = 100
    Form1.Controls.Add(Python2VBText)
    End If
    ans = "no"
    if ans = "y" or ans = "yes" Then
    Python2VBText.Text = Python2VBText.Text + "no is OK!!???" + vbNewLine
    End If
End Sub