Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer Dim n As Integer = 3 Dim d As Double 'i = n + 3 'MessageBox.Show("i set to " & CStr(i)) 'i = n * 4 'MessageBox.Show("i set to " & CStr(i)) 'n = n + 1 'MessageBox.Show("n set to " & CStr(n)) 'n = n + 1 'MessageBox.Show("n set to " & CStr(n)) i = 5 \ 2 MessageBox.Show("i set to " & CStr(i)) i = 5 Mod 2 MessageBox.Show("i set to " & CStr(i)) 'd = 3 * 2 ^ 4 'MessageBox.Show("d set to " & CStr(d)) 'd = 3.5 / 2 'MessageBox.Show("d set to " & CStr(d)) End Sub End Class