Webブラウザコントロール別スレッド - VB.Net

Question

私は現在、ユーザーコントロールの一部であるWebブラウザーコントロールを含むOutlookアドインを持っており、このアドインのWebページを読み込んでいます。したがって、これまでのところうまく動作しますが、ページの読み込みに時間がかかると、ユーザーが作業を続行できなくなります。 私の質問は実際には、ユーザーコントロールからそのWebブラウザコントロールを移動し、このWebブラウザコントロールを持つ別のスレッドを作成し、そのスレッドですべてのWebブラウザを読み込みます。このようにして、コントロールがロードする時間がかかる間、ユーザーは作業を続けることができます。私はこの記事では、このアプローチについて読んでてきた

：WebBrowser Control in a new thread

しかし、私は私の特定のユースケースのためにこれを再利用するために苦労しています。誰かが私にこのアプローチを手伝ってもらえますか？

Web browser control loading Outlook unusable VB.Net

Answer 1

私はそれがあまりないですけど、あなたはそのような何かを試すことができます： は、私もここに私のコードを掲載している

Private ThreadBrowse As Threading.Thread 

：

がスレッドを宣言します次に起動します：

Private Sub StartNavigate 
    ThreadBrowse = New System.Threading.Thread(AddressOf TheWork) 
    ThreadBrowse.SetApartmentState(Threading.ApartmentState.STA) 
    ThreadBrowse.Start() 
End Sub 

スレッドが行うということですサブ：

Private Sub TheWork() 
    Dim IsFinish As Boolean = False 
    WebBrowser1.Navigate(New Uri("http://stackoverflow.com")) 

Recheck: 
    WebBrowser1.InvokeCustom(Sub() IsFinish = (WebBrowser1.ReadyState = WebBrowserReadyState.Complete)) 
    If IsFinish = False Then 
     Threading.Thread.Sleep(100) 
     GoTo Recheck 
    End If 
End Sub 

はモジュールで彼を置くことを忘れないでください：

<Runtime.CompilerServices.Extension()> 
Public Sub InvokeCustom(ByVal Control As Control, ByVal Action As Action) 
    If Control.InvokeRequired Then Control.Invoke(New MethodInvoker(Sub() Action()), Nothing) Else Action.Invoke() 
End Sub 

たぶん、あなたは「スタートアップ」のような思いやり、この基本的なコード、とのより良い行うことができます：D

Answer 2

Webブラウザコードを別のクラスに配置してコードを呼び出そうとしましたか？