Private Python2VBText As New TextBox

' Function with parameter called in main

Public Sub happyBirthday(person As String)
    Python2VBText.Text = Python2VBText.Text + "Happy Birthday to you!" + vbNewLine
    Python2VBText.MultiLine = True
    Python2VBText.Width = 200
    Python2VBText.Height = 100
    Form1.Controls.Add(Python2VBText)
    Python2VBText.Text = Python2VBText.Text + "Happy Birthday to you!" + vbNewLine
    Python2VBText.Text = Python2VBText.Text + "Happy Birthday, dear " + person + "." + vbNewLine
    Python2VBText.Text = Python2VBText.Text + "Happy Birthday to you!" + vbNewLine
End Sub

Public Sub main()
    happyBirthday("Emily")
    happyBirthday("Andre")
End Sub

'main()