"Evet, Hayır" mesaj kutusu nasıl yapılır?

FaustRIP

Hectopat
Katılım
25 Ağustos 2018
Mesajlar
144
Minik bir uzantısı ne olursa olsun arka arkaya şöyle sürekli soru soracak bir uygulamaya ihtiyacım var .teşekkürler.

1676214919711.png
 
.vbs uzantılı yapacaksınız:

Kod:
result = MsgBox ("Evet veya Hayır?", vbYesNo, "Evet hayır örneği")

Select Case result
Case vbYes
    MsgBox("Evete bastınız")
Case vbNo
    MsgBox("Hayıra bastınız")
End Select

Sadece basit bir örnek.
 
Derdin ne kanka kız arkadaşım için sevgililer gününe bir şeyler hazırlıyorum.

.VBS uzantılı yapacaksınız:

Kod:
result = MsgBox ("Evet veya Hayır?", vbYesNo, "Evet hayır örneği")

Select Case result.
Case vbYes.
 MsgBox("Evete bastınız")
Case vbNo.
 MsgBox("Hayıra bastınız")
End Select

Sadece basit bir örnek.

Biraz daha açıklayabilir misiniz? Kusura bakmayın.
 
Son düzenleyen: Moderatör:

Geri
Yukarı