Question

我有一个大程序可以改变变量的值，比如Var，递增或递减。在Var = 5我想要执行子例程的任何时候，请说Flag()。

实施此方法的“适当”方式是什么？

我想到的是：

While True
    If Var = 5 then
        Flag()
    End If
End While

但看起来很傻。

Answer 1

将其包装在属性中，每当setter更改时调用一个函数：

Public Class MyVarWrapper
    Private _i As Integer

    Public Property Var() As Integer
        Get
            Return _i
        End Get
        Set
            _i = value
            FunctionToCall()
        End Set
    End Property
End Class

或实施INotifyPropertyChanged

Answer 2

创建Sub或Property，使用它更改变量，这样就可以检查值。

Public Class Form1
    Dim Var As Integer

    Private Sub updateVar(value As Integer)
        Var = value
        If Var = 5 Then
            MsgBox("Var = 5")
        End If
    End Sub

End Class

当VB.NET中的变量值发生变化时生成中断

2 个答案: