Fungsi RND

Penting: Artikel ini adalah terjemahan mesin, lihat penafian. Temukan versi bahasa Inggris artikel di sini sebagai rujukan Anda.

Mengembalikan tunggal berisi angka acak.

Sintaks

RND [(number)]

Opsional nomorargumen adalah tunggal atau apa pun yang valid ekpresi numerik.

Nilai yang dikembalikan

Jika angka

RND menghasilkan

Lebih kecil dari nol

Angka yang sama setiap kali menggunakan nomor sebagai nilai awal.

Lebih besar dari nol

Angka acak berikutnya di urutan.

Sama dengan nol

Paling baru menghasilkan angka.

Tidak disertakan

Angka acak berikutnya di urutan.


Keterangan

Fungsi Rnd akan mengembalikan nilai kurang dari 1 tapi lebih besar dari atau sama dengan nol.

Nilai angka menentukan bagaimana Rnd menghasilkan angka acak:

Untuk setiap benih awal yang ditetapkan, urutan angka yang sama yang dihasilkan karena panggilan setiap berturut-turut ke fungsi Rnd menggunakan angka sebelumnya sebagai benih untuk nomor berikutnya di urutan.

Sebelum memanggil Rnd, menggunakan pernyataan Randomize tanpa argumen untuk memulai generator angka acak dengan biji berdasarkan pengatur waktu sistem.

Untuk menghasilkan bilangan bulat acak dalam rentang tertentu, gunakan rumus ini:

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

Di sini, upperbound adalah jumlah tertinggi dalam rentang tersebut, dan lowerbound adalah jumlah terendah dalam rentang.

Catatan: Untuk mengulangi urutan angka acak, hubungi Rnd dengan argumen negatif segera sebelum menggunakan Randomize dengan argumen numerik. Menggunakan Randomize dengan nilai yang sama untuk angka tidak Ulangi urutan sebelumnya.

Contoh

Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.

Contoh ini menggunakan fungsi Rnd untuk menghasilkan nilai acak integer dari 1 sampai 6.

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

Catatan: Penafian Terjemahan Mesin: Artikel ini telah diterjemahan oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan terjemahan mesin ini untuk membantu pengguna yang bukan penutur bahasa Inggris agar dapat menikmati konten tentang produk, layanan, dan teknologi Microsoft. Karena artikel ini diterjemahkan oleh mesin, mungkin akan terdapat kesalahan kosa kata, sintaksis, atau tata bahasa.

Kembangkan keterampilan Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×