Projemize resim 1.1 de görüldüğü gibi sadece bir tane buton ekliyoruz.Butona tıklandığında yapmaya çalıştığımız 1.2 deki gibi bir mesaj görüntülenecek.
Buton 1 in click ine girerek şu kodları yazarsak örneğimizin çalışacağını göreceğiz.
[code language=”vb”]MsgBox("Merhaba Arkadaşlar", MsgBoxStyle.Question + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.YesNoCancel, "Deneme")[/code]
Örneğimizdeki mesajda soru işareti resmini evet,hayır ve iptal butonlarınıda değiştirebiliriz.
Örnek1 : Butona tıkladığımızda gelen mesajda sadece evet ve hayır butonları gelsin.
Örneğimizdeki bu değişikliği yapmak için kodumuzdaki ; MsgBoxStyle.YesNoCancel bölümünü; MsgBoxStyle.YesNo olarak değiştiriyoruz.Değiştirmeden önceki kodumuzun sonunda Cancel li sildiğimizde mesajdaki iptal butonunuda silmiş oluyoruz.
Örnek2 :Şimdide mesajdaki merhaba arkadaşlar mesajını ve soru işareti resmini değiştirelim.
Bu değişikliği yapmak içinse kodumuzdaki Merhaba Arkadaşlar bölümünü İyi günler olarak soru işareti resmini değiştirmek içinse kodumuzdaki MsgBoxStyle.Question
bölümünü MsgBoxStyle.Critical olarak değiştirmemiz değişiklikleri uygulamamıza yetecektir.
[code language=”vb”]MsgBox("İyi günler", MsgBoxStyle.Critical + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.YesNo, "Deneme")[/code]
Örnek3 : Bu örneğimizde ise mesajımızdaki evet,hayır butonlarından hayır butonu aktif görünüyor. Bu olayı tersine çevirelim ve evet butonunu aktif edelim.
Resim 1.5 te gördüğünüz gibi evet butonu aktif hale getirildi.bu değişiklikleri yapmak için kodumuza MsgBoxStyle.DefaultButton2 bölümünü eklediğimizde evet butonunun aktif olduğunu göreceksiniz.
[code language=”vb”]MsgBox("İyi günler", MsgBoxStyle.Critical + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.YesNo, "Deneme")[/code]
Örnek4 : Bu örnekte ise mesajımızın üstünde yazan deneme yazısını yani mesaj adını değiştirelim.
Mesajın adını değiştirmek için kodumuzun sonunda yazan Deneme kısmını Güle Güle olarak değiştirirseniz resim 1.6 görüldüğü gibi değişeceğini göreceksiniz.
[code language=”vb”]MsgBox("İyi günler", MsgBoxStyle.Critical + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.DefaultButton2 + MsgBoxStyle.YesNo, "Güle Güle")[/code]