Contoh Penggunaan Input Box pada Visual Studio 2015

KODINGNYA :

Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label1.Text = "Nilai pertama yang anda masukan :"
        Label2.Text = ""
        Label3.Text = "Nilai kedua yang anda masukan :"
        Label4.Text = ""
        Label7.Text = "----------Hasil dari penjumlahan adalah----------"
        Label5.Text = "Hasilnya adalah"
        Label6.Text = ""
        Button1.Text = "Tekan tombol untuk memasukan angka"
        Button2.Text = "Hapus data"
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim nilai1 As Integer
        Dim nilai2 As Integer
        Dim hasil As Integer
        MsgBox("anda akan memasukan angka pertama")
        nilai1 = InputBox("yang harus anda masukan angka, bukan kata/huruf")
        Label2.Text = nilai1
        MsgBox("anda akan memasukan angka kedua")
        nilai2 = InputBox("anda akan memasukan angka kedua")
        Label4.Text = nilai2
        MsgBox("hasilnya adalah.....")
        hasil = nilai1 + nilai2
        Label6.Text = hasil
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        MsgBox("anda akan menghapus datanya kembali")
        Label1.Text = "Nilai pertama yang anda masukan :"
        Label2.Text = ""
        Label3.Text = "Nilai kedua yang anda masukan :"
        Label4.Text = ""
        Label7.Text = "----------Hasil dari penjumlahan adalah----------"
        Label5.Text = "Hasilnya adalah"
        Label6.Text = ""
        Button1.Text = "tekan tombol untuk memasukkan angka"
        Button2.Text = "Hapus Data"
    End Sub
End Class