DÖNGÜLER | FOR - NEXT
#13
sn dsezgin ilginiz için çok teşekkür ederim. yeni konu açmamamın sebebi işlevin for next döngüsü içinde olacagını düşünmemden ve burda açılmış bi konu oldugundan dolayı. kusura bakmayın.

konu açılmışken bi soru daha sorabilirmiyim. peki bu işaretleme sırayla degil de rastgele olabilirmi?
rnd fonksiyonunu nasıl monte edebiliriz.



  Alıntı
Bu mesajı beğenenler:
#14
Sn deniz_tunc;

Egitim dokumani gibi acilan konularin devamina proje ihtiyaclarinizi eklemeniz, daha fazla yardimi engelleyebilir.
Koda montesi icin sorular veya tablolari bilmek ve sizin biraz daha bilgi vermeniz gerekir.
Surekli form da onay kutusu kayit dizinine ait oldugu icin kaydin referansi ile yapilmasi daha isabetli olur.
Rastgele kayitlari VBA da uretilmesi
Visual Basic
  1. Sub df()
  2. Dim EnbuyukSayi, EnKucukkSayi
  3. EnbuyukSayi = 121
  4. EnKucukkSayi = 99
  5. MsgBox Int((EnbuyukSayi - EnKucukkSayi + 1) * Rnd + EnKucukkSayi)
  6. End Sub


99 ile 121 arasi rastgele sayi uretir.



  Alıntı
Bu mesajı beğenenler:
#15
For Sayaç = Başlangıç Değeri To Bitiş Değeri
Komutlar
Next Sayaç
********************
for next döngüsünde başlangıç değeri ve bitiş değeri; tablodaki ID değerleri alınabilir mi?

örnek: tabloda 1 den 1000 e kadar veri var. döngüyü 100. (başlangıç değeri) ile 250. (bitiş değeri) ID ler arasında çalıştırabilirmiyiz?



  Alıntı
Bu mesajı beğenenler:
#16
Sn deniz_tunc;
Tabloda ki 100 ile 200 arasi veri guncellemesi ise between komutunu denemelisiniz. Rastgele ID numarasi ile ne yapilmasini anlayamadim. 100 ile 200 arasinda rastgele secilen islem ayni ID lere islem yapabilir. Amac daha acik olmali.



  Alıntı
Bu mesajı beğenenler:
#17
döngüyü daha iyi anlamak için soruyorum. döngünün çalışma prensibinde başlangıç ve bitiş degerini tablodan seçtigimiz 2 ID degeri olabilir mi?



  Alıntı
Bu mesajı beğenenler:
#18
Sn deniz_tunc;
dim sw
for sw=dmin("Id","TabloAdi","[MusterID]=" & me.MusId & " And [UrunNo]=" & me.UrNo) to dmax("Id","TabloAdi","[MusterID]=" & me.MusId & " And [UrunNo]=" & me.UrNo)
currentdb.execute "Update TabloAdi Set Analiz=true Where ((ID)=" & sw & ")"
Next sw
Acilan kutuda ki musteri(MusId) ile urun(UrNo) ait kayitlarin en kucugunden, en buyuk ID kayitlarin analiz onay kutusunu isaretlenir.



  Alıntı
Bu mesajı beğenenler:


Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar):