Tombol Interaktif

Assalamu'alaikum.........
Pa kabar sahabat semuanya mudahn sehat semua....
Tadi habis isi bensin gratis sekarang gilirannya saya yang sebarkan ilmu gratis buat sahabat yang baru belajar vb.net.
Supaya tombol lebih keren dikit ada muncul pertanyaan seperti gambar dibawah ini  caranya mudah sahabat semua.

klik 2 x pada tombol keluar kemudian ketikkan script dibawah ini:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        "mendeklarasinyan variabel tanya
        Dim tanya = MsgBox("Anda yakin ?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Sebiru")
        'Jika variabel tanya diklik tombol "Yes" maka akan mengakhiri jalannya program
        If tanya = MsgBoxResult.Yes Then
            End
        'kondisi berikutnya "Else"
        'Jika tidak melakukan klik tombol "Yes" maka program akan tetap berjalan kembali
        Else
            Return
        End If
    End Sub


He.... Semoga bermanfaat. Ikuti materi selanjutnya