Di bawah ini merupakan fungsi VB6 untuk meng-capture (mengambil) gambar screen dalam format .bmp atau format .jpg dengan menggunakan ActiveX ezCapture.dll. Untuk keperluan ini tentu saja Anda harus memiliki dll ezCapture.dll kemudian mereferensikan project Anda terhadapnya. Mengenai ezCapture.dll bisa Anda download di sini.
Fungsi VB6 untuk meng-Capture screen dalam format .bmp
Option Explicit
Sub CaptureScreenBMP()
Dim ezCapture As New CaptureScreen
On Error Resume Next
With ezCapture
.CaptureFullScreen "C:\screen.bmp"
End With
End Sub
Fungsi VB6 untuk meng-Capture screen dalam format .jpg
Sub CaptureScreenJPG()
Dim ezCapture As New CaptureScreen
With ezCapture
.CaptureFullScreen "C:\screen.jpg"
End With
End Sub
Contoh penggunaan fungsi capture screen .bmp
Private Sub Command1_Click()
CaptureScreenBMP
End Sub
Contoh penggunaan fungsi capture screen .jpg.
Untuk keperluan ini Anda membutuhkan satu file lagi yakni "ijl11.dll"
Private Sub Command2_Click()
CaptureScreenJPG
End Sub