' Error in addition from raw_input. Public Sub Routine2 Dim x As String x = InputBox("Enter a number: ") Dim y As String y = InputBox("Enter a second number: ") Dim Python2VBText As New TextBox Python2VBText.Text = "The sum of " + (x).toString + " and " + (y).toString + " is " + (x+y).toString + "." + vbNewLine Python2VBText.MultiLine = True Python2VBText.Width = 200 Python2VBText.Height = 100 Form1.Controls.Add(Python2VBText) End Sub