Public Class Form1
Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click
Dim intNumber As Integer
intNumber = 27
intNumber = intNumber + 1
MessageBox.Show("value of intNumber+1=" & intNumber.ToString, "Variables")
End Sub
End Class