yes
no
10/Promotion/slider
no

Random

Tidak ada komentar
Pada kesempatan ini penulis akan membawakan materi artikel tentang random. Teknik random merupakan salah satu materi yang dibahas dalam belajar programming. Random adalah menampilkan suatu objek secara acak. Objek tersebut bisa berupa angka, abjad, teks ataupun gambar. Teknik random dapat digunakan untuk membuat aplikasi register/login pada website untuk mencegah spam/injection masuk ke database website. Pada saat seseorang register/login ke suatu website, kita diharuskan untuk memasukkan angka acak yang tampil pada form register/login tersebut. Angka acak yang muncul akan berbeda-beda jika kita me refresh web browser atau gagal melakukan register/login karena angka acak yang kita konfirmasi tidak sama dengan angka acak yang sudah kita input sebelumnya. 

Selain untuk registrasi/login, teknik random dapat juga digunakan untuk membuat game tebak-tebakan angka atau abjad atau gambar atau game ilmu pengetahuan, yaitu menampilkan daftar pertanyaan yang harus dijawab (Who Want tobe a milioner). Teknik random dapat dibuat dengan bahasa pemrograman Visual Basic 6.0, Visual Basic.Net, PHP, Javascript, Java dan lain-lain. Bahasa pemrograman tersebut dapat dipelajari di tempat Kursus Komputer atau IT Training Center. Para pembaca bisa belajar bahasa-bahasa pemrogarman tersebut di Computer First. Pada artikel ini, penulis akan membuat random angka dengan Visual Basic 6.0.

Pada dasarnya random adalah mengacak angka dari 0 sampai dengan 1. Sebelumnya, kita membuat variabel untuk menyimpan hasil pengacakan, membuat variabel dan mengisinya dengan nilai awal/ nilai akhir dari angka yang akan kita acak, membangkitkan pengacakan/melakukan pembibitan pengacakan angka dengan skrip Randomize dan melakukan pengacakan nilai dari 0 sampai dengan 1. Setelah melakukan pengacakan angka, maka kita menyimpan hasil random tersebut ke dalam variabel acak. Ketika program di running atau di refresh maka aplikasi akan menampilkan angka secara acak. Adapun skripnya adalah :
 
Private Sub Form_Activate()
Dim Acak As Integer
Dim Awal, Akhir As Integer

Awal = 2
Akhir = 10

Randomize

Acak = Int((Akhir - Awal) * Rnd() + Awal)

Form1.Print Acak
End Sub

Keterangan :

  1. Dim Acak As Integer : mendeklarasikan variabel acak dengan tipe data integer
  2. Dim Awal, Akhir As Integer :  mendeklarasikan variabel Awal dan Akhir dengan tipe data integer
  3. Awal=2 : menginisialisasi variabel Awal dengan nilai 2 (angka terkecil yang akan muncul)
  4. Akhir=10 : menginisialisasi variabel Akhir dengan nilai 10 (angka terbesarl yang akan muncul)
  5. Randomize : membangkitkan pengacakan angka/membuat pembibitan pengacakan angka
  6. Acak=((Akhir – Awal)*Rnd()+Awal) : menyimpan hasil pengacakan angka ke variabel Acak
  7. Form1.Print Acak : Menampilkan hasil pengacakan pada Form1
Demikian artikel ini penulis buat, semoga bermanfaat bagi para pembaca blog Computer First. Jangan lupa beri komentarnya ya……..
author profile image
Abdelghafour

Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book.

Tidak ada komentar

Posting Komentar

no
Computer First - First Choice in IT Training Center - menyediakan jasa pelatihan Kursus Komputer di Jakarta sejak dari usia dini yaitu sejak anak-anak sampai dengan dewasa. Computer First berdiri pada tahun 2001, Visi Computer First ingin menjadi First Choice in IT Training Center melalui pendidikan dan pelatihan komputer yang berkualitas terbaik [Computer First Indonesia] (http://computerfirst.co.id/images/logo/logo1.png)