Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim length As Integer Dim breath As Integer Dim area As Integer Dim n, m, k As Integer Dim x, y, z As Double n = -123 x = -10.5 m = n + 3 'n has a value of -120 now k = n * m - 11 'k has a value m = 100 n = 0 y = 3.14 z = x / y MessageBox.Show("The values are:" & " n = " & CStr(n) & " m = " _ & CStr(m) & " k = " & CStr(k)) MessageBox.Show("The values are:" & " x = " & CStr(x) & " y = " _ & CStr(y) & " z = " & CStr(z)) length = 20 breath = 10 area = length * breath MessageBox.Show("Area is : " & CStr(area)) End Sub End Class