Not sure, but I believe your messagebox line got a syntax error:
Code:
MessageBox.Show("Value of intNumber + 1 = " & intNumber.ToString, _ "Variables")
To:
Code:
MessageBox.Show("Value of intNumber + 1 = " & intNumber.ToString, "Variables")
The '_'-sign is used to make code flow over to the next line, like this:
Code:
Dim mystring As String = "This string is extremely long so I " & _
"use a '_' character to make it flow over correctly"
Or use the good ol' MsgBox:
Code:
MsgBox("Text to display")
Other than that there are no errors to be seen.