Skip to main content

AccessTr.neT


rnd kullanımı........

rnd kullanımı........

Çözüldü #1
Dim soru(9), cevap(9), i, j, sayaç As Integer
soru(0) = 5
soru(1) = 2
soru(2) = 3
soru(3) = 4
soru(4) = 6
soru(5) = 1
soru(6) = 0
soru(7) = 8
soru(8) = 9
soru(9) = 10
!!!ama surda bi hatam yok ama bilgisayarın kendi tutğu sayı olcakmış bana yardımcı olur musunuz!!!! rnd() kullanımını ile olacakmış ama yapamadım.
For i = 0 To 9
cevap(i) = InputBox(i + 1 & "inci sorunun cevabına giriniz " & "(" & soru(i) & ")")
Next
For j = 0 To 9
If 2 * soru(j) = cevap(j) Then
sayaç = sayaç + 1
End If
Next
MsgBox("doğru cevap degeriniz...." & sayaç)
MsgBox("yanlış cevap degeriniz..." & sayaç - 10)
End Sub
Cevapla
Çözüldü #2
Sayın AYTN
Doğrusu probleminizi anlayamadım ne yapmak istiyorsunuz? Rnd fonkiyonu aşağıdaki şekilde kullanılabilir. Sorunu Daha anlaşılır yazarsan yardımcı olmaya çalışayım. iyi çalışmalar
Bu örnek, 1'den 6'ya kadar bir rasgele tamsayı değeri üretmek için Rnd işlevini kullanır.

Dim Sayı
' 1 ve 6 arasında sayı üretmek için aşağıdaki fonksiyonu kullanabilirsiz.
Sayı= Int((6 * Rnd) + 1)
Cevapla
Çözüldü #3
yhaa bu sorunun cevablarının 2 katını aldığımızda bizim karsımıza doğru degerlerin veye yanlıs degerlernin yazıldığı bi proje yani söyle


inputbox yanında soru(0)=5 bizim girdiğimiz deger ise bunun iki katına gircez yani 10


bunun ekrana yanlış doğru sayısını yapan bi proje ama işte dediğim gibi bu soruları bilgisayar rnd komutu ile tutacak cevap diye tanımladığımız fonksiyonu biz giriyoz soru diye tanımlanan fonksiyonuda bilgisayar rnd komutu ile aklından tutacak...
şimdiden yardımcı olduğunuz için teşekkür ederim .....
Cevapla
Çözüldü #4
Sayın AYTN, sizi uyarmaktan bir hal olduk yönetim olarak. Yani bu sizi kaçıncı uyarışımız bilmiyorum. Allah rızası için şu forum kurallarını bir okuyun ve kurallara göre hareket edin. Ne açtığınız başlık kurala uygun ne de soruyu sorma şekliniz. Bu kadar zor mu bu kurallara uymak Allah aşkına yaa???

Bu size son uyarım Sayın AYTN!...

Tekrarı olmasın lütfen...
NZ Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DSum ve Sum Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DLookup Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
Cevapla
Çözüldü #5
yhaa bişey sorabilir miyim bnm anlamndığım rnd kullanımı öğrenmek istiyorum ondan bu soruyu sordum bunun yazılışında ne yanlışı var ha bu arada hattam olmuşsa bi daha olmaz özür dilerim...
Cevapla
Çözüldü #6
Son yazdığınız mesajın bile Türkçe Yazım Kuralları ile uzaktan yakından alakası yok. Siz Forum Kurallarını hiç okudunuz mu?

Bir daha olmayacağını belirttiğiniz mesaj bile kurallara aykırı. Nasıl olmayacak bir daha???
NZ Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DSum ve Sum Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DLookup Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da