Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim data1, data2, kekka As Integer data1 = 46 data2 = 59 kekka = data1 + data2 + 100 kekka = kekka - 100 MessageBox.Show(data1.ToString() & " + " & data2.ToString() & "=" & kekka.ToString()) End Sub End Class