ส่งตัวอย่างการเขียน Code ใน VB.NET

ตัวอย่าง Form 1
Code
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, "variables")
End Sub
End Class

ภาพตัวอย่างการ Run จากCode ที่เขียน