Rnd İşlevi

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

Sözdizimi

Rnd[(sayı)]

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

Return Values

Sayı

Rnd üretir

Sıfırdan küçük

Her zaman, sayıyla aynı sayıçekirdek.

Sıfırdan büyük

Dizide sıradaki rastgele sayıdır.

Sıfıra eşit

En son oluşturulan sayıdır.

Sağlanmaz

Dizide sıradaki rastgele sayıdır.

Açıklamalar

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

Sayma değeri Rnd'in rastgele bir sdd'yi nasıl üreteceklerini belirler:

Herhangi bir ilk çekirdek için aynı numara sırası oluşturulur, çünkü Rnd işlevine yapılan her birbirinin sıralı çağrısı, sıradaki bir sonraki sayı için bir çekirdek olarak bir önceki numarayı kullanır.

Rnd'içağırmadanönce, sistem zamanlayıcıyı temel alan bir çekirdekle rastgele sayı oluşturucusunu başlatmak için bağımsız değişken olmadan Randomize deyimini kullanın.

Verilen bir aralıkta rastgele tamsayılar üretmek için şu formülü kullanın:

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

Burada, üstteki sayı aralıkta en yüksek, altta da aralıkta en düşük sayıdır.

Not:  Rastgele sayı dizilerini yinelemek için, sayısal bağımsız değişkenle Rastgele Sıralama'nın hemen önce negatif bir bağımsız değişkenleRnd'i arayın. Sayı için aynı değere sahip Rastgele Sıralama'nın kullanımı önceki sırayı yinelemez.

Sorgu örneği

İfade

Sonuçlar

SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales;

RastgeleSayılar sütunundaki rastgele sayılarla birlikte Ürün Kimliğini 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 örnekte, Rnd işlevi 1 ile 6 arasında rastgele bir tamsayı değeri oluşturmak için 1'i kullanır.

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

Daha fazla yardıma mı ihtiyacınız var?

Office yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Office Insider Programına Katılın

Bu bilgi yararlı oldu mu?

×