Pencarian
Latest topics
Grafika Komputer dengan Visual Basic 6
2 posters
segala macam turitorial , pengetahuan dan artikel menarik yang sedang marak diperbincangkan :: Artikel :: pendidikan
Halaman 1 dari 1
Grafika Komputer dengan Visual Basic 6
Author: Danu Wira · Published: October 28, 2010 · Category: Grafik, Disain dan Publishing, Pemrograman VB, Rekayasa Perangkat Lunak
Dalam Visual Basic kita dapat membuat program untuk menghasilkan tampilan grafis dalam form. Selain itu kita juga dapat menentukan koordinat dari tampilan grafis yang akan kita tampilkan.
Dalam kesempatan kali ini kita akan coba menggunakan fungsi-fungsi tersebut dalam mengolah grafika komputer dalam Visual Basic 6.
Beberapa fungsi yang akan kita gunakan adalah:
1. Line Method
2. Circle Method
3. Pset Method
4. Scale Method
Mari kita pelajari 1 persatu penggunaan fungsi tersebut.
1. Line Method
Line Method adalah metode yang digunakan untuk membuat garis horizontal, vetikal, atau diagonal.
Sintaks: ObjectName.Line(x1,y1)-(x2,y2),Color,[B][F]
Cara membuat (contoh):
Private Sub Form_Click()
Scale (0, 70)-(70, 0)
Line (10, 0)-(20, 45), vbBlue
Line (20, 0)-(30, 55), vbRed, B
Line (30, 0)-(40, 40), , BF
End Sub
2. Circle Method
Circle Method adalah metode yang digunakan untuk menggambar lingkaran.
Sintaks: ObjectName.Circle(x,y),Radius,Color
Cara membuat(contoh):
Private Sub Form_Click()
Circle (2000, 1000), 800
End Sub
3. Pset Method
Pset Method digunakan untuk menggambar satu titik.
Sintaks: ObjectName.Pset(x,y),Color
Cara membuat(contoh):
Private Sub Form_Click()
PSet (1000, 2000)
End Sub
4. Scale Method
Scale Method digunakan untuk mendefinisikan sistem koordinat pada form berdasarkan basis ujung kiri atas
Sintaks: ObjectName.Scale(x1,y1) – (x2,y2)
Sebagai contoh, lihat pada contoh Line Method:
Scale (0, 70)-(70, 0)
Untuk hasil yang lebih komplit, silahkan ketikkan listing berikut pada form anda:.
Program Grafika Komputer:
Private Sub Form_Click()
‘Deklarasi Garis’
Line (200, 300)-(500, 600)
Print “Garis”
‘Deklarasi Kotak Berwarna’
Line (3000, 100)-(3900, 450), vbBlue, BF
CurrentX = 3100
CurrentY = 200
Print “Kotak Berwarna”
‘Deklarasi Kotak’
Line (1000, 500)-(3000, 1500), , B
CurrentX = 1200
CurrentY = 600
Print “Kotak”
‘Deklarasi Lingkaran’
Circle (2000, 1000), 600
CurrentX = 1600
CurrentY = 800
Print “Lingkaran”
‘Deklarasi Titik’
PSet (2000, 1000)
Print “(2000,1000)”
CurrentX = 1000
CurrentY = 500
Print “(1000,500)”
CurrentX = 3000
CurrentY = 1500
Print “(3000,1500)”
End Sub
Listing diatas akan menghasilkan gambar berikut ini :
Selamat mencoba dan selamat belajar ya.
Untuk artikel pemrograman lainnya dapat anda baca di blog saya : http://bangdanu.wordpress.com
Semoga berguna.
Salam,
Danu Wira Pangestu, S.Kom.
Webmedia Training Center
http://www.webmediacenter.com
Related Articles
1. Form Cantik dengan Delphi
2. Membuat Dialog Killer dengan Delphi 7.0
3. Java Web Services dengan Apache Axis
4. Tutorial Pemanfaatan Layanan ZoneEdit.Com untuk Membuat Private Nameserver
5. Fax Melalui Komputer Menggunakan WinFax
6. Membuat Laporan Master-Detail di Visual Basic 6
7. Membuat File DLL dengan Borland Delphi
8. Tutorial Pembuatan LSI
9. Box Bola Billyard
10. Mengukur Waktu Tayang Form Dengan Delphi
11. Multi-Tabed User Interface
12. Wx dan Perancangan User Interface
13. Membuat Database Karyawan Beserta Foto dengan Delphi 7.0 – Access
14. Dasar Pemograman PHP dan MYSQL
15. Aplikasi Voip Pada Cisco2621XM
16. Cara Mudah Menciptakan Menu dan Toolbar pada Visual Basic.
17. Cara Membuat Cover Ebook 3D dengan PhotoShop
18. Parsing Sederhana dengan Regular Expression
19. Penggunaan Command Line OpenSolaris
20. Tips dan Trik Pencarian Efektif dengan Google
fartoel_unknown- Jumlah posting : 9
Join date : 23.06.09
Re: Grafika Komputer dengan Visual Basic 6
waaah , copas dari mana neeh ?
ridwan- Jumlah posting : 12
Join date : 23.11.10
segala macam turitorial , pengetahuan dan artikel menarik yang sedang marak diperbincangkan :: Artikel :: pendidikan
Halaman 1 dari 1
Permissions in this forum:
Anda tidak dapat menjawab topik
Sun Oct 09, 2011 8:30 pm by kavie
» IP Config yuk !!!
Sun Oct 09, 2011 3:22 am by kavie
» Untuk Penjualan: Blackberry 9800 Slider Obor dan iPhone Apple 4 32GB dan Nokia N8
Tue Dec 21, 2010 3:34 pm by maxismobilesdnbhd
» Untuk Penjualan: Blackberry 9800 Slider Obor dan iPhone Apple 4 32GB dan Nokia N8
Tue Dec 21, 2010 3:31 pm by maxismobilesdnbhd
» follow my blog
Fri Dec 10, 2010 6:32 pm by kavie
» apakah itu pendidikan Online?
Wed Nov 24, 2010 2:27 pm by master_of_forex
» VISI DAN MISI DUNIA BELAJAR
Wed Nov 24, 2010 1:24 pm by sonny
» Apple iPhone 4G 32GB
Wed Nov 24, 2010 1:13 pm by sonny
» Grafika Komputer dengan Visual Basic 6
Tue Nov 23, 2010 12:19 am by ridwan