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 herhangi bir sayısal ifadedir.
Sonuç değerleri
| Sayı | Rnd üretir |
|---|---|
| Sıfırdan küçük | Tohum olarak sayı kullanılarak her seferinde aynı sayı. |
| Sıfırdan büyük | Dizideki bir sonraki rastgele sayı. |
| Sıfıra eşittir | En son oluşturulan sayı. |
| Sağlanmaz | Dizideki bir sonraki rastgele sayı. |
Açıklamalar
Rnd işlevi 1'den küçük, ancak sıfırdan büyük veya buna eşit bir değer döndürür.
Sayı değeri, Rnd'nin nasıl rastgele bir sayı oluşturduğunu belirler:
Herhangi bir ilk tohum için, aynı sayı dizisi oluşturulur çünkü Rnd işlevine yapılan her ardışık çağrı, dizideki bir sonraki numara için bir önceki sayıyı tohum olarak kullanır.
Rnd'yi çağırmadan önce, rastgele sayı üretecini sistem zamanlayıcısına dayalı bir tohumla başlatmak için bağımsız değişken olmadan Randomize deyimini kullanın.
Belirli bir aralıkta rastgele tamsayılar üretmek için bu formülü kullanın:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Burada, üst sınır aralıktaki en yüksek sayı, alt sınır ise aralıktaki en düşük sayıdır.
Not
Rasgele sayı dizilerini yinelemek için, Randomize'ı sayısal bir bağımsız değişkenle kullanmadan hemen önce negatif bir bağımsız değişkenle Rnd'yi çağırın. Sayı için aynı değerle Rastgele Seç seçeneğinin kullanılması, önceki diziyi yinelemez.
Sorgu örneği
| İfade | Sonuçlar |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | RastgeleSayılar sütununda, rastgele sayılarla birlikte Ürün Kimliği'ni verir. |
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 üretmek için Rnd işlevini kullanır.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)