Sunday, June 17, 2012

Mengkopi Gambar Ke Clipboard Melalui VB6

Private Sub CopyFromPictureBox(pic As PictureBox)
With Clipboard
.Clear
.SetData pic.Picture
End With
End Sub

Private Sub CopyFromFile(Path As String)
With Clipboard
.Clear
.SetData LoadPicture(Path)
End With
End Sub