Private Sub Anketi_Değerlendir_Click()
If txtsoru_no.Text = 3 Or txtsoru_no.Text = 7 Then
puandeger.Text = 3
Else
End If
End Subtxtsoru_no anketteki sorunun numarası;puandeger ise sorunun puanı
#2
"Anketi_Değerlendir" Command butonunun içerisine;
txtsoru_no anketteki sorunun numarası;puandeger ise sorunun puanı
txtsoru_no anketteki sorunun numarası;puandeger ise sorunun puanı
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
