Threading.TimerのコールバックでDataTableを更新してもコントロールに反映されない

Question

Visual Studio 2012
.NET Framework4.5

以下のコードにて、Tickが走ってもListBoxの表示に"B"が反映されません。
別スレッドだからだという気はしますが、どうしたら良いかわかりません。

何か基本的な知識が不足しているのかもしれませんが、よろしくお願いいたします。

Public Class Form
Private test As New Class1

Public Sub New()
    InitializeComponent()

    ListBox.DataSource = test.data
End Sub

End Class

Public Class Class1
Public data As New DataTable

Public Sub New()
    data.Columns.Add("Display")

    push("A")

    Dim timer As New System.Threading.Timer(AddressOf Tick, Me, 1000, 0)
End Sub

Public Sub push(disp As String)
    Dim row As DataRow = data.NewRow

    row("Display") = disp

    data.Rows.InsertAt(row, 0)
End Sub

Public Sub Tick(stateInfo As Object)
    push("B")
End Sub

End Class

Answer 1

普通非同期処理ではform内のコントロールを操作する場合,UIスレッドにinvokeする必要があります。これはUIスレッドしかControlへの参照を保持していないからです。以下にコード例を挙げます。

 Public Sub Tick(stateInfo As Object) 
        Invoke (New Action(Of String)(AddressOf push) ,New Object(){"B"} ) 
End Sub 

私がC#ユーザーであるためC#で実行できるものをVBに直したため,このコードは動作しないかも知れませんが,必要なことは,Invokeの引数にDelegateと引数をObject型の配列で渡すことです。Action型は暗黙にDelegateにキャストできるので,例では,Action型を使用しています。

akabeiさんの言うようにSystem.Windows.Forms名前空間のTimerをつかうのであれば,勝手にinvokeを行ってくれます。

Answer 2

Timerコントロール(System.Windows.Forms.Timer)を使用してみてはいかがでしょうか？
別スレッドにならなかったと思います。

Answer 3

別スレッドだからだという気はしますが、どうしたら良いかわかりません。

↓

とりあえず原因は判明しました。

解決していると思っているなら別にいいですが..

System.Threading.Timerはスレッド・プールにキューイングされて実行されるため、System.Threading.TimerはTimerクラスのインスタンスを生成したスレッドとは別のスレッドで実行される

Answer 4

ビルド済みの実行ファイルを直接走らせたら正常に表示されました。

VSホスト上で走らせていたから表示されなかったということなのかわかりませんが、
とりあえず原因は判明しました。

何か設定でこの挙動の違いをなくすことはできるのでしょうか？