Cara Menggambar Lingkaran di Picture Box–VB6

Friday, October 10, 2014

Selamat datang di blog belajar VB, masih mengenai Picture Box dan kali ini akan membahas tentang cara menggambar lingkaran di Picture Box. Sebelum ke contoh pengerjaannya kita lihat dulu aturan sintaknya:

object.Circle [Step] (x, y), radius, [color, [start, end, [aspect]]]

Untuk langkah-langkahnya ialah sebagai berikut:

- Buka VB6nya dan buat form.

- Masukan 1 Picture Box & 1 CommandButton.

image

- Masukan sintak berikut di Command1:

Private Sub Command1_Click()
Me.Picture1.Circle (1000, 1000), 1000, 200
End Sub

- Kemudian jalankan programnya, dan klik pada command1. Maka otomatis lingkaran akan tercetak di picture box.

image

Sekian tutorialnya, selanjutnya anda bisa mengembangkan  program tersebut. Selamat mencoba.

0 comments:

Post a Comment