VB.Net Question (Evet – Hayır – Vazgeçtiniz)

ormumuza 1 button üç textbox üç label ekliyoruz formumuzun genel aşağıda ki gibi olacaktır.

Buton 1 olayına aşağıdaki kodu yazıyoruz;

Dim a as Integer

 a=msgbox (“merhaba,msgboxstyle ,Informatıon + msgboxstyle.default button1,”deneme”)

If MsgBox("Devam etmek istiyor musunuz?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Soru") = _
        MsgBoxResult.Yes Then
            MsgBox("Devam edebilirsiniz")
        Else
            MsgBox("Program kapatılıyor")
        Else
           Msgbox (“vazgez tuşuna bastınız”)

        End If

Programı çalıştırdığınız zaman aşagıdaki pencere karşınıza gelecektir.