Cara membuat Circle Berwarna Menggunakan Visual Basic 6.0

Bismillahirrahmanirrahim..

Baik, Pada postingan kali ini saya mau berbagi cara membuat circle berwarna menggunakan vb, disini saya menggunakan visual basic 6.0.

Mungkin ada di antara teman-teman semua mendapatkan tugas membuat circle berwarna dari dosen sama seperti saya, jujur waktu itu saya tidak tahu bagaimana cara membuatnya dan akhirnya saya bertemu dengan kakak kelas saya di mushola kampus dan mulai bertanya-tanya mengenai tugas membuat circle berwarna menggunakan visual basic 6.0 dan akhirnya berhasil hehe..

Oke langsung saja ke pokok pembahasannya, berikut langkah-langkahnya:


1. Buat project baru di vb

Buat Project Baru di VB

2. Buat form baru dengan klik project di toolbar lalu pilih add form.

Buat Form Baru Di VB

Setelah itu akan muncul jendela seperti gambar dibawah.

Buat Form Baru di VB

Pilih form lalu klik open atau bisa juga dengan double klik di Form nya.

Untuk membuat circle berwarna ini buatlah 2 form.

3. Pada form1 buatlah design seperti gambar di bawah.

Design VB

Sebenarnya untuk desing bebas gimana selera masing-masing yang penting ada tempat untuk mengeksekusi, disini saya menggunakan CommondButton.

masukkan listing nya di CommondButton 

Private Sub commond1_Click()

Form2.Show

End Sub

4. Pada form2 buatlah seperti gambar dibawah.

Buat Timer di VB

Buatlah timer di form2 dan masukkan listingnya

Private Sub Timer1_Timer()

Form2.BackColor = black

Dim cx, cy, radius, limit

limit = limit + 2

ScaleMode = 3

cx = ScaleWidth / 2

cy = ScaleHeight / 2

If cx > cy Then limit = cy Else limit = cx

For radius = 0 To limit

Circle (cx, cy), radius, RGB(Rnd * 255, Rnd * 255, Rnd * 255)

Next radius

End Sub

Listing di form click

Private Sub Form_Click()

Unload Me

End Sub

Jangan lupa mengubah intervalnya di timer menjadi 100

5. Simpan project ini di komputer/laptop. Selesai.

Hasilnya seperti gambar dibawah ini.

Hasil Circle Berwarna di VB

Bagaimana? cukup mudah kan membuat circle berwarna mengguanakan visual basic ini?

Selamat mencoba.. Baca juga Pengenalan IDE Visual Basic 6

Salam hangat dan sampai jumpa di postingan berikutnya..