vb.net - VB.netを使用してイベントとメソッドを呼び出す方法は?

Question

私は 1 つの Vb.net アプリケーションを持っています。リストボックスを含むもの。

そして、イベントを使用して別のクラスからこのリストボックスにメッセージを追加したいと思います。

基本的に、ステータスロガーを作成しようとしているので、ステップをログに記録してリストボックスに表示できます。

Answer 1

イベントが定義された新しいクラスを作成します

Public Class EventTest
    Public Event StatusChanged(ByVal status As String)

    Private _status As String = ""

    Public Property Status As String
        Get
            Return _status
        End Get
        Set(value As String)
            _status = value
            'raise the status changed event when the status property is changed
            RaiseEvent StatusChanged(value)
        End Set
    End Property
End Class

次に、フォームにこのクラスのインスタンスを作成します（witheventsキーワードに注意してください）。

Dim WithEvents Foo As New EventTest

'Handle the status change event
Private Sub Foo_StatusChanged(status As String) Handles Foo.StatusChanged
    lstStatus.items.add(status)
End Sub

次に、ステータスを変更して、リストボックスに表示されることを確認します。

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Foo.Status = "Initialised"
End Sub