Cara Membuat Form Upload Gambar dengan Drag dan Drop di VB6 - Pernahkah Anda menyimpan file gambar dengan cara online?, kalau pernah mungkin tidak asing lagi yang namanya meng-upload file, baik berupa gambar maupun file lainnya.Kita ambil contoh saja adalah penyimpanan gambar secara online Ziddu dimana pada saat kita ingin menyimpan gambar maka kita di perintahkan untuk menguploadnya, dalam mengupload gambar tersebut ada 2 cara yaitu dengan cara Browse file dan dengan cara DragDrop File.
Dan taukah Anda di visual basic kitapun juga bisa membuat form untuk meng-upload gambar dengan cara Drop dan Drug, sehingga si pengguna nantinya tidak perlu menekan tombol browse, cukup hanya dengan mendrag-nya langsung ke form yang sudah di sediakan dengan perantara kotak image ataupun kotak PictureBox.
Untuk membuat tip ini sangatlah mudah hanya perlu menananmkan sebuah PictureBox yang fungsinya untuk meletakan gambar/image.Tetapi memang dalam mengupload gambar disini tidak semua file gambar/image bisa diterima, hanya file tertentu saja misal .jpg, .bmp dan untuk .ico tidak bisa di upload.
Nah pada pertemuan kali Saya ingin mebagikan trik bagaimana Cara Membuat Form Upload Gambar dengan Drag dan Drop di VB6 yaitu dengan cara yang kedua yang saya sudah sebutkan diatas. Bagi Anda yang penasaran ingin tau bagaimana cara membuatnya ikuti langkah-langkah berikut dibawah ini :
Cara Membuat Form Upload Gambar dengan Drag dan Drop di VB6
1. Buka Form VB6 Anda
2. Tanamkan dalam Form 1 buah PictureBox. Atur Picturebox di properties:
AutoSize = True
OLEDropMode = 1-Manual
3. Ketik kode berikut ini:
Private Sub Picture1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
On Error GoTo ErrHandler
Picture1.Picture = LoadPicture(Data.Files(1))
Exit Sub
ErrHandler:
MsgBox "Error gambar tidak bisa diload"
End Sub
4. Simpan dan jalankan Program
Proses kerjanya :
Setelah Anda berhasil menjalankan Program,sekarang buka drive tempat penyimpanan gambar Anda, Lalu susunlah form visual basic yang Anda sudah jalankan dengan drive folder Gambar. Kemudian Drag-lah gambar Anda ke arah PictureBox Form VB yang Anda sudah dijalankan, kemudian lepas.
Setelah Anda melepas Drag maka gambar anda akan muncul di Picturebox.
Demikian tip Cara Membuat Form Upload Gambar dengan Drag dan Drop di VB6. Selamat mencoba, semoga bermanfaat.
No comments:
Post a Comment