[решено] Использование компонента ProgressBar у Visual Studio 2005

[Alex.sys]

Доброе время суток. Помогите решить проблему. Пишу свой Webbrowser типа Оперы на Visual Studio 2005 . Не могу написать листинг программы тот который будет отвечать за загрузку страницы с помощью компонента ProgressBar. Вот нашол похожий листинг в инете но он не пашет вобще, только куча ерроров и все:
Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
On Error Resume Next
PBar.Max = ProgressMax
If Progress = -1 Then
Exit Sub
Else
If Progress <> ProgressMax Then
PBar.Value = Progress
progresslbl.Caption = Str(Round((Progress / ProgressMax) * 100)) & pert
Else
PBar.Value = ProgressMax
progresslbl.Caption = Str(Round((Progress / ProgressMax) * 100)) & pert
Exit Sub
End If
End If
End Sub
Помогите решить вопрос возможно кто-нибудь сталкивался с такой же проблемой... :help:

[Delirium]

Alex.sys, все слишком сложно у вас. Progress bar работает примерно так:
ProgrBass.Maximum = количество делений в баре.
ProgrBar.Step = шаг делений
ProgrBar.Value=0


Выставили эти свойства, затем когда у вас начинается процесс, пишете тупо
ProgrBar.Value = ProgrBar.Value +1
В свойствах бара можно выставить как он себя будет вести, достигнув конца - остановиться или заново начать. Если будет тормозить, значит надо отображение прогресса запустить асинхронным потоком, если надо будет, дам код, там немного.

и данный вопрос надо было постить в подраздел .NET

[Alex.sys]

Delirium, спасибо большое за совет. И скиньте пожалуйста код - "Если будет тормозить, значит надо отображение прогресса запустить асинхронным потоком, если надо будет, дам код, там немного." Ещё ра спасибо. Респект

[Admiral]

Alex.sys, если использован компонент WebBrowser то в таком браузере только интерфейс можно сделать типа Опера, а движок он будут использовать типа IE. Недавно было про отличие студии и языка входящие в неё. Нет такого языка Visual Studio. Cудя по приведённому коду правильнее сказать "Visual Basic .NET входящий в Visual Studio 2005" или VB.NET

Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
Me.ProgressBar1.Maximum = Convert.ToInt32(e.MaximumProgress)
Me.ProgressBar1.Value = Convert.ToInt32(e.CurrentProgress)
End Sub

Delirium, можно и тему тогда обозначить как ".NET - Использование компонента ProgressBar в VB.NET 2005"

[Alex.sys]

Admiral, спасибо большое