![]() |
Использование компонента ProgressBar у Visual Studio 2005
Доброе время суток. Помогите решить проблему. Пишу свой 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: |
Alex.sys, все слишком сложно у вас. Progress bar работает примерно так:
ProgrBass.Maximum = количество делений в баре. ProgrBar.Step = шаг делений ProgrBar.Value=0 Выставили эти свойства, затем когда у вас начинается процесс, пишете тупо ProgrBar.Value = ProgrBar.Value +1 В свойствах бара можно выставить как он себя будет вести, достигнув конца - остановиться или заново начать. Если будет тормозить, значит надо отображение прогресса запустить асинхронным потоком, если надо будет, дам код, там немного. и данный вопрос надо было постить в подраздел .NET |
Delirium, спасибо большое за совет. И скиньте пожалуйста код - "Если будет тормозить, значит надо отображение прогресса запустить асинхронным потоком, если надо будет, дам код, там немного." Ещё ра спасибо. Респект
|
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 |
Admiral, спасибо большое
|
Время: 12:35. |
Время: 12:35.
© OSzone.net 2001-