0

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

实现这一点的“适当”方式是什么?

我想到的是:

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

但它看起来很傻。

4

2 回答 2

2

将其包装在一个属性中,每当 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

于 2013-02-18T03:23:49.923 回答
1

创建一个子或属性,使用它更改您的变量,这样您就可以检查值。

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
于 2013-02-18T03:23:53.120 回答