' Try parsing the value they entered into an integer, placed in "x" Dim isConverted As Boolean isConverted = Integer.TryParse(Me.xInputNum.Text, x)
If isConverted Then ' Clear the label beforehand Me.xNumTextBox.Text = ""
' Loop from 1 to 9 and multiple our input "x" and the counter value to get our result. Do While counter <= 9 Me.xTableListBox.Text &= x & " * " & counter & " = " & (x * counter) & ControlChars.CrLf counter += 1 ' Increment the counter Loop