Random(rnd) Fonksiyonu ve DB

[karani]

Elimizde içinde 10 adet soru olan bir veri tabanı var.
ekrana 10 adet sorudan rastgele soru seçtireceğiz ama bir kere gelen soru tekrar gelmeyecek. Kişi soruda doğru cevabı tıkladığında tebrikler deyip diğer soruya geçecek ama bilemezse yanlış işaretlediği sorunun açıklamasını yapacak ve tekrar cevaplama hakkı verecek. Kişi 2 kere yanlış bilirse diğer soruya geçecek ve hafızaya 1. soru yanlış diye alacak.

Elimizde olan 10 orudan her seferinde 5 soru seçecek sınav sonunda konularına göre doğru ve yanlış bildiği sorular gösterilecek....

[Revlis]

1 .Soru tipinde yeni tür yaratman gerekiyor. (vb6 için: Type ; Vb.net için
[code]
Structure)

Public Structure StcSoru
public sorubaslik as string
public soruicerik as string
public siklar(4) as string
public soruldu as boolean
public yanitdogru as boolean
end Structure
 
...
 
dim sorular(29) as stcsoru

gibimsi...
2. Soruları dizi ye aktarman gerekiyor.
3. Rasgele seçilen sayı soruldu=false olana kadar do while / until döngüsünde kalır false olunca ekrana getirilir.. true ya çevrilir ardından