™[FIY]™◄|KhÄdîr|►
![™[FIY]™◄|KhÄdîr|►](https://2img.net/u/3211/60/09/22/avatars/39-7.jpg)
 Jumlah posting : 30
Reputasi : 76
Reputation : 3
Join date : 21.03.11
Age : 31
Lokasi : Solok
![[Tutor] Membuat Web Browser Sederhana Empty](https://2img.net/i/empty.gif) |  Subyek: [Tutor] Membuat Web Browser Sederhana ![[Tutor] Membuat Web Browser Sederhana I_icon_minitime](https://2img.net/s/t/12/98/13/i_icon_minitime.gif) Mon Mar 21, 2011 11:27 am | |
| Nih gan langsung aja tutornya...
1. Buat project ( apa aja namnya terserah )
2. Ke Components ( Ctrl+t ) terus cari components "Web Browser" klik OK
3. Terus Lakukan Seperti di gambar
Spoiler Gambar ![[Tutor] Membuat Web Browser Sederhana Form](https://2img.net/h/i1030.photobucket.com/albums/y369/iqbalps/form.jpg)
Kemudian isikan kode berikut Spoiler Code- Spoiler:
Private Sub Command1_Click()
WebBrowser1.Navigate Text1.Text
WebBrowser1.SetFocus
End Sub
Private Sub Command2_Click()
WebBrowser1.Stop
End Sub
Private Sub Command3_Click()
WebBrowser1.GoBack
End Sub
Private Sub Command4_Click()
WebBrowser1.GoForward
End Sub
Private Sub Command4_Click()
WebBrowser1.Refresh
End Sub
Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
If Progress > 0 Then
Text2.Text = Progress & "/" & ProgressMax
End If
End Sub
Terakhir tinggal agan build projectnya
Silahkan agan kembangkan dikembangkan....
Credits By : Me
| |
|
WELCOME TO FACEINYOU [DAFTARKAN DIRI ANDA SEGERA
![[Tutor] Membuat Web Browser Sederhana Smnewbie](https://2img.net/h/i750.photobucket.com/albums/xx142/Rikho123/smnewbie.png)
![[Tutor] Membuat Web Browser Sederhana I_vote_lcap](https://2img.net/s/t/12/98/13/i_vote_lcap.png){kind=small}
![[Tutor] Membuat Web Browser Sederhana I_voting_bar](https://2img.net/s/t/12/98/13/i_voting_bar.png){kind=small}
![[Tutor] Membuat Web Browser Sederhana I_vote_rcap](https://2img.net/s/t/12/98/13/i_vote_rcap.png){kind=small}
