*Apa manfaat dan bagaimana penggunaan Randomize ?*
Di Dalam Kitab Betaljemur AdamExcel tertulis: To repeat sequences of
random numbers, call *Rnd* with a negative argument immediately before
using *Randomize* with a numeric argument. Using *Randomize* with the
same value for /number/ does not repeat the previous sequence.
Jadi, penggunaan pungsi randomizer diperlukan untuk mengantisipasi
jikalau fungsi Rnd sebelumnya itu dialokasikanuntuk merandom value
negatif, jadi si Randomizer akan mengambil sebuah nilai baru dari timer,
kalau nilainya jelas2 selalu positif ya ndak dipakai Randomizernya juga
ndak apa
/Sub tes_rnd3()
Dim i As Integer
[B1] = Rnd(-1)
'Randomize
For i = 1 To 100
Cells(i, 1) = Rnd
Next
End Sub
/
Paste baris diatas pada Kamar Sheet2
Pada sub routine diatas di hidup dan matikan fungsi Randomize nya
kemudian coba juga untuk mematikan 1 baris diatasnya, lalu coba jalankan
beberapa kali serta dilihat hasilnya
*Mengapa X harus selalu = 1 + .......*
Ini dikarenakan fungsi pada .... (titik-titik nya) yang bunyinya
*Int(Rnd * Matrix.Cells.Count)*, dimana fungsi dari INT adalah memangkas
angka dibelakang koma, maka pada saat si Cell Matrix.Cells.Count
bernilai 1, maka hasil perkalian bisa dipastikan lebih kecil dari 1
(0,xxxxxxx) jadi fungsi INT akan mengubah angka 0,xxxx menjadi 0 saja,
dan jika ini dibiarkan maka akan mengakibatkan error, dikarenakan matrix
hitunganya dimulai dari 1
Kira2 begitu :D
On 05-09-2013 16:41, hendrik karnadi wrote:
Yang ingin saya tanyakan:
- Apa manfaat dan bagaimana penggunaan Randomize ?
Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
- Mengapa X harus selalu = 1 + .......