Public Sub happyBirthdayEmily() Dim Python2VBText As New TextBox 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 Emily." + vbNewLine Python2VBText.Text = Python2VBText.Text + "Happy Birthday to you!" + vbNewLine End Sub ' does nothing as written