AccessTr.neT

Tam Versiyon: Soru Bankasinin bitmiş hali, fakat küçük bir problemi mevcut
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Uzmanlık ve Tıpla ilgili sınavlara hazırlananlar için içinde 5000 soru olan Soru bankasının bitmiş halini sunuyorum. Küçük bir sorun şu.

Forum'da yandaki dallara tıklandığında o bölüm ile igili sorular geliyor ve güzelce sorular çıkıyor. fakat sorular herzaman tablodaki sıraya göre geliyor. ben o soru sırasının rastgele olmasını istiyorum. Yani Nöroloji bölümünden 500 soru çözüldüğünde ve program kapatıldığında tekrar açıldığında 500 soruyu tekrar geçmek gerekir ki 501. soru çıksın. yani soruların sırasının karıştırılmasını istiyorum
Akşam müsait olduğumda programı indirip inceleyeceğim ancak ipucu isterseniz Random komutunu incelemenizi tavsiye ederim.
Biraz araştırdım fakat atağa geçmekte zorlanıyorum.

Soldan bölüm seçildiğinde belli sayıda soru açılıyor. Bu sorular içinde rastgele gezmek için aklıma şu geliyor. İleri butonuna tıklandığında

Private Sub sonraki_Click()
On Error GoTo Err_sonraki_Click


DoCmd.GoToRecord , , acNext
Me.answer.Visible = False

Exit_sonraki_Click:
Exit Sub

Err_sonraki_Click:
MsgBox Err.Description
Resume Exit_sonraki_Click

End Sub

DoCmd.GoToRecord,,acNext yerine

DoCmd.GoToRecord acDataForm, "NeuroBoards", acGoTo, 7 yazmak (7 nolu kayıta gidiyor) 7 yerine toplam soru sayısını Random şeklinde nasıl yazmak gerektiğini düşünüyorum.

Random'u inceledim ama sonuç alamadım

Private Sub noroloji_Click()
Form.RecordSource = "SELECT TOP 50 neuroBoards.mainCategory, neuroBoards.question, neuroBoards.answer FROM neuroBoards WHERE (((neuroBoards.mainCategory)=14)) ORDER By rnd(-(questionID)*Time());"
End Sub

"TOP 50" bölümünü kendinize göre değiştire bilirsiniz...
Pardon bu tablodaki ilk 50 kaydı mı alıyor.

Ben Herhangi bir bölüme tıklandığı zaman o bölüm içerisinde rastgele soruları karıştırnasını istemiştim. yani program her açılışında soruların sırasını karıştırsın aynı soruları sormasın istemiştim
"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.

Puletin kardeş teşekkür. Bu da işe yarar fakat bölüm seçildikten sonra da ileri butonuna tıklandığında rastgele o bölüm içinden de soru çıksa fena olmaz
Sayfalar: 1 2