Skip to main content

AccessTr.neT


Soru Bankasinin bitmiş hali, fakat küçük bir problemi mevcut

Soru Bankasinin bitmiş hali, fakat küçük bir problemi mevcut

#7
Dediğiniz şekilde her defasındasoruları karıştırıyor, aynı soruları sormuyor.

Private Sub noroloji_Click()
On Error GoTo Err_noroloji_Click

Dim Sayi As String
Sayi = InputBox("Adet giriniz lütfen", "Çözülecek Soru Adedi")
Form.RecordSource = "SELECT TOP " & Sayi & " neuroBoards.mainCategory, neuroBoards.question, neuroBoards.answer FROM neuroBoards WHERE (((neuroBoards.mainCategory)=14)) ORDER By rnd(-(questionID)*Time());"

Exit_noroloji_Click:
Exit Sub

Err_noroloji_Click:
MsgBox ("Soru Adedi girmediniz")
Resume Exit_noroloji_Click


End Sub


Bununla ile de kullanıcıya istediği kadar soruyu baştan seçe bilme imkanı veriyor ben sadece nöroloji butonuna uyarladım siz kendinize göre ayarlayınız.
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
#8
(05/12/2010, 19:36)iterlemez yazdı: "WHERE (((neuroBoards.mainCategory)=14))" bu bölümü çıkardım ve Top 100 yaptım. Bu şekilde tüm soruların içinden rastgele 100 soru çekiyor ve test yapabilirsiniz.

Pardon ben bölüme göre soru seçmek istediğinizi düşünmüştüm. Bütün bölümlerden olması için yaptığınız düzenleme doğru. Kolay gelsin.
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
#9
Pulletin kardeş doğru cevap vermiş fakat ben anlayamadım. Yandaki bölümlere her tıklandığında o bölüm içinde rastgele sorular seçiliyor. Problem çözülmüş. Bir de alta 100 butonu koydum. Rastgele tüm soruların içinden 100 soru seçiliyor.

Problem tamamen çözülmüş. Pulletin ve alpeki üstadlara teşekkür
.rar SoruBankasi.rar (Dosya Boyutu: 309,65 KB | İndirme Sayısı: 44)
iterlemez, 18-07-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#10
Paylaşım için teşekkürler Sn iterlemez
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
#11
Paylaşım ve emek için teşekkürler.

Saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi


Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task