Fungsi Rnd

Penting: Artikel ini diterjemahkan oleh mesin, lihatlah notis penafian. Sila dapatkan versi Bahasa Inggeris artikel ini di sini sebagai rujukan anda

Mengembalikan satu tunggal mengandungi nombor rawak.

Sintaks

Rnd [(number)]

Pilihan nomborargumen ialah satu atau sebarang sah ungkapan bernombor.

Mengembalikan nilai

Jika nombor adalah

Rnd menjana

Kurang daripada sifar

Nombor yang sama setiap kali, menggunakan nombor sebagai benih.

Lebih besar daripada sifar

Nombor rawak berikutnya dalam jujukan yang.

Sama dengan sifar

Paling baru-baru ini dijanakan nombor.

Tidak dibekalkan

Nombor rawak berikutnya dalam jujukan yang.


Catatan

Fungsi Rnd mengembalikan nilai kurang daripada 1 tetapi lebih besar daripada atau sama dengan sifar.

Nilai nombor menentukan cara Rnd menjana nombor rawak:

Untuk sebarang benih awal yang diberikan, jujukan nombor sama dijanakan kerana setiap panggilan berturutan fungsi Rnd menggunakan nombor sebelumnya sebagai benih untuk nombor berikutnya dalam jujukan yang.

Sebelum memanggil Rnd, menggunakan kenyataan Randomize tanpa argumen untuk memulakan penjana nombor rawak dengan benih berdasarkan pemasa sistem.

Untuk menghasilkan integer rawak dalam julat yang ditentukan, gunakan formula ini:

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

Di sini, upperbound ialah nombor tertinggi dalam julat dan lowerbound nombor terendah dalam julat.

Nota: Untuk mengulangi urutan nombor rawak, hubungi Rnd dengan argumen negatif sejurus sebelum menggunakan Randomize dengan argumen berangka. Menggunakan Randomize dengan nilai yang sama untuk nombor ulangi jujukan sebelumnya.

Contoh

Nota: Contoh berikut menunjukkan penggunaan fungsi ini dalam Visual Basic for Applications (VBA) modul. Untuk maklumat lanjut tentang bekerja dengan VBA, pilih Rujukan pembangun dalam senarai juntai bawah di sebelah Cari dan memasukkan satu atau lebih istilah dalam kotak carian.

Contoh ini menggunakan fungsi Rnd untuk menjana nilai rawak integer dari 1 hingga 6.

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

Nota: Notis Penafian Penterjemahan Mesin: Artikel ini telah diterjemah oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan penterjemahan mesin ini untuk membantu pengguna-pengguna yang tidak bertutur dalam Bahasa Inggeris supaya dapat menikmati kandungan mengenai produk, perkhidmatan dan teknologi Microsoft. Artikel ini mungkin mengandungi ralat perbendaharaan kata, sintaks atau tatabahasa kerana ia diterjemahkan oleh mesin.

Kembangkan kemahiran anda
Jelajahi latihan
Dapatkan ciri baru terlebih dahulu
Sertai Office Insiders

Adakah maklumat ini membantu?

Terima kasih atas maklum balas anda!

Terima kasih atas maklum balas anda! Nampaknya ia mungkin akan membantu untuk menyambungkan anda kepada salah seorang daripada ejen sokongan Office kami.

×