Pengloahan Citra

PENGOLAHAN CITRA MENGGUNAKAN VISUAL BASIC 6

Tampilan form utama

coding program tersebut..... dari File - Open

Private Sub mn_open_Click()
With CommonDialog1
.Filter = "Picture Files (*.BMP; *.GIF; *.JPG)|*.BMP;*.GIF;*.JPG|Bitmap Files (*.BMP)|*.BMP|GIF Files (*.GIF)|*.GIF|JPEG Files (*.JPG)|*.JPG|All FIles (*.*)|*.*"
.DialogTitle = "Open File Gambar"
.ShowOpen
End With
Picture1.Picture = LoadPicture(CommonDialog1.FileName)
End Sub


Eksekusi Program diatas seperti berikut.....

Untuk menampilkan Picture pilih file - open
Catatan : yang bisa dibuka BMP, GIF, JPG

CATATAN : Program ini Masih dalam Tahap Pengembangan Coy....