Rnd İşlevi

Uygulandığı Öğe
Microsoft 365 için Access Access 2024 Access 2021 Access 2019 Access 2016

Rastgele bir sayı içeren Single türünde bir değer döndürür.

Sözdizimi

Rnd[(sayı)]

İsteğe bağlı sayıbağımsız değişkeni Tek veya geçerli bir sayısal ifadedir.

Dönüş Değerleri

Sayı ise Rnd oluşturur
Sıfırdan küçük Her seferinde aynı sayı, tohumla aynı sayı kullanılır.
Sıfırdan büyük Sıradaki bir sonraki rastgele sayı.
Sıfıra eşit En son oluşturulan sayı.
Sağlanmadı Sıradaki bir sonraki rastgele sayı.

Açıklamalar

Rnd işlevi 1'den küçük ama sıfırdan büyük veya sıfıra eşit bir değer döndürür.

Sayı değeri, Rnd'in rastgele bir sayı oluşturma şeklini belirler:

Belirli bir ilk tohum için, Rnd işlevine yapılan her ardışık çağrı, dizideki bir sonraki numara için bir önceki sayıyı bir tohum olarak kullandığından, aynı numara dizisi oluşturulur.

Rnd'yi çağırmadan önce randomize deyimini bağımsız değişken olmadan kullanarak rastgele sayı oluşturucuyu sistem zamanlayıcısını temel alan bir tohumla başlatın.

Belirli bir aralıkta rastgele tamsayılar oluşturmak için şu formülü kullanın:

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

Burada , üsttekiler aralıktaki en yüksek sayıdır ve alttakiler de aralıktaki en düşük sayıdır.

Not

Rastgele sayı dizilerini yinelemek için, sayısal bir bağımsız değişkenle Randomize kullanmadan hemen önce negatif bir bağımsız değişkenle Rnd'i çağırın. Sayı için aynı değerle Randomize kullanıldığında önceki sıra yinelenmez.

Sorgu örneği

Ifa -de Sonuçlar
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; RandomNumbers sütunundaki rastgele sayılarla birlikte Ürün Kimliğini döndürür.

VBA Örneği

Not

Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.

Bu örnek, 1 ile 6 arasında rastgele bir tamsayı değeri oluşturmak için Rnd işlevini kullanır.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)