Membuat Aplikasi Membuka File Pdf Dari Visual Basic 6.0

Om Rois - Membuat Aplikasi Membuka File Pdf Dari Visual Basic 6.0 - Selamat Siang, bertemu lagi dengan saya Om Rois, Kali ini saya akan memberi Tutorial tentang Bagaimana cara membuka File Pdf di Visual Basic 6.0, caranya sangat Simple dan mudah untuk di Fahami Langsung Saja Ke TKP,

Yang di Butuhkan Component Tambahannya ada 2 :

• Web Browser
• Commond Dialog

Bagaimanakah Cara Mengambil Component Tersebut.
Begini caranya :

• Click Project pada Menu Bar
• Click Component
• Untuk Web Browser cari kata "Microsoft Internet Controls" Biasanya ada di tengah
• Untuk Commond Dialog cari kata "Microsoft Common Dialog Controls 6.0" ada di atasnya Web Browser
• Selanjutnya Tinggal Tekan Ok.

Buat 2 Form Yang satu Namenya di ganti dari Form1  Menjadi FormLoad Dan Form yang Kedua Di ganti juga Namenya menjadi FrmMain 

Pada FormLoad Pasang Component berikut :

• 1 Label ganti Caption Menjadi Lokasi
• 1 Text Box dan Ganti Name Menjadi txtLokasi
• 3 Buah Command dan ganti Name Command1 Menjadi CmdBrowse - Command2 Menjadi CmdOk - Command3 Menjadi CmdCancel
• 1 Buah Commond Dialog Dan Ganti Name Menjadi cd1

Dan Isikan Code Berikut ke Dalam FormLoad

Private Sub cmdBrowse_Click()
cd1.Filter = "Pdf File(*.Pdf)|*.Pdf" ''Format yang hanya bisa di baca
cd1.ShowOpen
txtLokasi.Text = cd1.FileName ''Memasukan Alamat File nya
frmMain.Caption = cd1.FileTitle ''Akan merubah Caption Form Mainnya
End Sub

Private Sub cmdCancel_Click()
End
End Sub

Private Sub cmdOk_Click()
frmMain.Show
frmMain.WebBrowser1.Navigate (txtLokasi.Text)
End Sub

pada FrmMain Pasang Component 1 WebBrowser Saja Dan Pasang Code Berikut ke Dalam FrmMain

Private Sub Form_Resize()
    Me.WebBrowser1.Width = Me.ScaleWidth - 100 ''agar Resize nya sempurna
    Me.WebBrowser1.Height = Me.ScaleHeight - 100
    End Sub

Atau download Project yang sudah saya Rancang Juga Gpp
►Download Project 

Sekian Tutorial Dari Om Rois

Semoga Bermanfaat
Nantikan Artikel Selanjutnya