AccessTr.neT
Anket oluşturmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-6-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Anket oluşturmak (/konu-anket-olusturmak.html)



Anket oluşturmak - reyhan0607 - 10/01/2011

Sevgili arkadaşlar ben bilgisayar programcılıgı 2 sınıfta okuyorum ve bugun final olucaz. her ne kadar günlerdirrr haftalardır sınava calıssamda hocanın gündüz programına sorduğu final sorusunu yapamadım ve son çare sizden yardım istemekte buldum. programın çalışması değildi sadece mantık olarak bile komutlarla biraz yardım edebilirseniz çok sevinirm.

soru : Sayısı belli olmayan öğrencilere 20 soruluk bir anket düzenlencek. anket soruları csvde tutuluyor ve belli bir puan sistemi var. 3. ve 7. sorulara 3 puanlık cevabı veren visual kodlarını yazın..


Cvp: Anket oluşturmak - Coskun0559 - 10/01/2011

"Anketi_Değerlendir" Command butonunun içerisine;

Private Sub Anketi_Değerlendir_Click()
If txtsoru_no.Text = 3 Or txtsoru_no.Text = 7 Then
puandeger.Text = 3
Else
End If
End Sub

txtsoru_no anketteki sorunun numarası;puandeger ise sorunun puanı



Cvp: Anket oluşturmak - reyhan0607 - 10/01/2011

Ama veritabanına kayıtlar felan var birde öğrenci cevaplarıcsvde tutulcak ya öğrenci numarası ; 254121545211 seklinde verdiği cevaplar olucak.
cevabınızı tam anlayamadım : /


Cvp: Anket oluşturmak - alpeki99 - 10/01/2011

Madem mantık istemişsin verelim.

Önce CSV'den soruları çekeceksin. CSV'de soru numarasının olduğu satırı alınca eğer değeri 3 veya 7 ise 3 puan ver. Yukarıdaki kod zaten bunu anlatıyor temel olarak.