Fungsi VBScript Rnd

Fungsi Rnd mengembalikan angka acak. Angka selalu kurang dari 1 tetapi lebih besar atau sama dengan 0.

Rnd[(number)]

Parameter	Description
number	Optional. A valid numeric expression If number is: <0 - Rnd returns the same number every time >0 - Rnd returns the next random number in the sequence =0 - Rnd returns the most recently generated number Not supplied - Rnd returns the next random number in the sequence

Parameter

Description

number

Optional. A valid numeric expression

If number is:

Contoh

Nomor acak:

<%

response.write(Rnd)

%>

Perhatikan bahwa Anda akan mendapatkan nomor yang sama setiap saat. Untuk menghindari hal ini, gunakan pernyataan Randomize seperti pada Contoh 2

Output dari kode di atas akan menjadi:

0.7055475

Untuk menghindari mendapatkan nomor yang sama setiap saat, seperti pada Contoh 1, gunakan pernyataan Randomize:

<%

Randomize
response.write(Rnd)

%>

Output dari kode di atas akan menjadi:

0.4758112

Berikut adalah cara menghasilkan bilangan bulat acak dalam rentang tertentu:

<%

Dim max,min
max=100
min=1
Randomize
response.write(Int((max-min+1)*Rnd+min))

%>

Output dari kode di atas akan menjadi: