Cara Copy Paste Gambar di Picture Box–VB6

Saturday, October 11, 2014

Selamat datang di blog belajar VB, seperti biasa kita akan bahas mengenai picture box tepatnya cara copy paste gambar. untuk langkah-langkahnya:

- Buka VB6 nya dan buat form.

- Masukan 2 Picture box dan 2 Command Button, seperti pada gambar dibawah ini:

image

- Simpan terlebih dahulu projectnya, kemudian siapkan 1 buah gambar dan letakkan dalam 1 folder bersama project tadi.

- Masukan Sintak berikut di Form Load:

Private Sub Form_Load()
Me.Picture1.Picture = LoadPicture(App.Path & "\image3.jpg")
End Sub

- dan masukan pula sintak berikut di command1 dan command2:

Private Sub Command1_Click()
Clipboard.SetData Me.Picture1.Picture
End Sub

Private Sub Command2_Click()
Me.Picture2.Picture = Clipboard.GetData()
End Sub

- Setelah itu jalankan dengan klik setData untuk copy dan klik GetData untuk mempastekan.

image

Sekian tutorialnya semoga bermanfaat.

0 comments:

Post a Comment