Forgot Password / Register
Site Statistics
Total Members: 508
Total Tutorials: 242
Newsest User: TEMP
Todays Unique Hits: 12
0 Users 2 Guests Online

Add a progresbar to your web browser

Ok, first add a progressbar. you may have to go to components and select "Microsoft windows common controls 6.0" Make a label also. also add a picturebox.

now add this code:
Code
Private Sub webbrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
On Error Resume Next
If Progress = -1 Then ProgressBar1.Value = 100
Label1.Caption = "Done"
ProgressBar1.Visible = False
Image1.Visible = True
If Progress > 0 And ProgressMax > 0 Then
ProgressBar1.Visible = True
Image1.Visible = False
ProgressBar1.Value = Progress * 100 / ProgressMax
Label2.Caption = Int(Progress * 100 / ProgressMax) & "%"
End If
Exit Sub
End Sub


Now you have a progressbar!

now if you want it to scroll with the browser at the bottum, i added this code (mine were at the bottum left):
Code
Private Sub Timer2_Timer()
ProgressBar1.Top = Form1.ScaleHeight - 255
Label1.Top = Form1.ScaleHeight - 255
End Sub

1st you must make a timer called timer2, enable it, and give it a low interval from about 1-100.

Note: you may have to replace "255" according to your program.
zar
Author:
Views:
1214
Rating:
Posted on Saturday 29th December 2007 at 01:40 PM
Dalez
Dalez
It doesn't work :(
Posted on Tuesday 4th December 2007 at 05:28 PM
Dean
Dean
yeh this is stolen ive seenon another website also
Posted on Monday 3rd December 2007 at 09:58 PM
zar
zar
LIES! :)

actually i looked at like 3 tutorials on this and fixed it up better.
Posted on Monday 3rd December 2007 at 04:16 PM
darklight19
darklight19
This code was stolen, I've seen it somewhere...