rnd kullanımı........
Tarih
25/04/2009 17:08
Konu Sahibi
AYTN
Yorumlar
11
Okunma
3212
Konuyu Oyla:
  • Derecelendirme: 1/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 1/5 - 1 oy



AYTN
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
51
6
17/04/2009
İzmir
Ofis XP
09/10/2009,13:21
Çözüldü 
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


adnanyurdakul
Aktif Üye
Kullanici Avatari
Aktif Üye
88
2
05/02/2009
19
Manisa
Ofis 2003
03/06/2016,23:55
Çözüldü 
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


AYTN
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
51
6
17/04/2009
İzmir
Ofis XP
09/10/2009,13:21
Çözüldü 
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


tdsharun
>>> O Şimdi Sivil<<<
Kullanici Avatari
Aktif Üye
778
06/11/2008
225
Kütahya
Ofis 2003
31/12/2011,02:16
Çözüldü 
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...
Cevapla


AYTN
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
51
6
17/04/2009
İzmir
Ofis XP
09/10/2009,13:21
Çözüldü 
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


tdsharun
>>> O Şimdi Sivil<<<
Kullanici Avatari
Aktif Üye
778
06/11/2008
225
Kütahya
Ofis 2003
31/12/2011,02:16
Çözüldü 
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???
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü vb de dlookup kullanımı kokotuna 6 2.129 06/10/2014, 23:03 Scarlett
Çözüldü Visual Basic 6.0 Grid Nesnesi Kullanımı ceforce 5 1.943 24/11/2013, 09:19 alpeki99
Çözüldü DataReportta rownumber kullanımı ynlmz 4 1.297 02/10/2013, 11:33 ogulcan92
Çözüldü Treeview kullanımı ynlmz 6 2.462 21/02/2013, 23:58 ynlmz
Çözüldü Adodc kontrol SQL kullanımı ynlmz 3 1.441 18/12/2012, 23:25 ynlmz


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya