Sign in to follow this  
Followers 0

Visual Basic [ Browser]

1 post in this topic

[code]Private Sub Command1_Click()
WebBrowser1.Navigate (Text1.Text)
End Sub

Private Sub Command1_Click()
WebBrowser1.GoBack
End Sub

Private Sub Command1_Click()
WebBrowser1.GoForward
End Sub

Private Sub Command1_Click()
WebBrowser1.Refresh
End Sub

Private Sub Command1_Click()
WebBrowser1.Navigate ("http://www.google.com")
End Sub

Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
Text1.Text = (WebBrowser1.LocationURL)
Form1.Caption = (WebBrowser1.LocationName)
End Sub[/code]

[img] http://image.geotorrents.com/images/ontdb6iz5mwkp9egg37w.jpg[/img]

ფორმაზე დავდოთ 5 button 1 text და 1 webbrowser როგორც სურათზეა :). შემდეგ დავაკოპიროთ კოდი და ჩავწერOტ სულ ესაა :)
2

Share this post


Link to post
Share on other sites
You are commenting as a guest. If you have an account, please sign in.
Reply to this topic...

×   You have pasted content with formatting.   Remove formatting

Sign in to follow this  
Followers 0