Trả về một giá trị kiểu Đơn chứa một số ngẫu nhiên.
Cú pháp
Rnd[(number)]
Đối số dạng số tùychọn là Single hoặc bất kỳ biểu thức số hợp lệ nào.
Giá trị Trả về
| Nếu number là | Rnd tạo ra |
|---|---|
| Nhỏ hơn 0 | Lần mỗi lần lại cùng một số, dùng số làm hạt giống. |
| Lớn hơn 0 | Số ngẫu nhiên tiếp theo trong chuỗi. |
| Bằng không | Số được tạo gần đây nhất. |
| Không được cung cấp | Số ngẫu nhiên tiếp theo trong chuỗi. |
Chú thích
Hàm Rnd trả về một giá trị nhỏ hơn 1 nhưng lớn hơn hoặc bằng không.
Giá trị của số xác định cách Rnd tạo ra một số ngẫu nhiên:
Đối với bất kỳ hạt giống ban đầu nào, cùng một chuỗi số được tạo ra vì mỗi lần gọi liên tiếp hàm Rnd đều sử dụng số trước đó làm hạt giống cho số tiếp theo trong chuỗi.
Trước khi gọi Rnd, hãy sử dụng câu lệnh Randomize mà không có đối số để khởi tạo trình tạo số ngẫu nhiên với một hạt giống dựa trên bộ hẹn giờ của hệ thống.
Để tạo ra các số nguyên ngẫu nhiên trong một phạm vi đã cho, hãy dùng công thức này:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Ở đây, upperbound là số cao nhất trong phạm vi và lowerbound là số thấp nhất trong phạm vi.
Lưu ý
Để lặp lại các chuỗi số ngẫu nhiên, hãy gọi Rnd với đối số âm ngay trước khi sử dụng Randomize với đối số số. Việc sử dụng Ngẫu nhiên với cùng một giá trị cho số sẽ không lặp lại chuỗi trước đó.
Ví dụ về truy vấn
| Biểu thức | Kết quả |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Trả về ID Sản phẩm cùng với các số ngẫu nhiên trong cột RandomNumbers. |
Ví dụ về VBA
Lưu ý
Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.
Ví dụ này sử dụng hàm Rnd để tạo một giá trị số nguyên ngẫu nhiên từ 1 đến 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)