Private Python2VBText As New TextBox ' Illustrate raw_input and print. Public Sub Routine2 Dim applicant As String applicant = InputBox("Enter the applicant's name: ") Dim interviewer As String interviewer = InputBox("Enter the interviewer's name: ") Dim time As String time = InputBox("Enter the appointment time: ") Python2VBText.Text = Python2VBText.Text +interviewer+ "will interview"+ applicant+ "at"+ time.ToString + vbNewLine Python2VBText.MultiLine = True Python2VBText.Width = 200 Python2VBText.Height = 100 Form1.Controls.Add(Python2VBText) End Sub