好手帮忙呀！自定义ACTIVEX 属性不能赋值

高手帮忙呀！！！自定义ACTIVEX 属性不能赋值
高手帮忙呀！！！自定义ACTIVEX 属性不能赋值

Public Property Get mFlag() As Integer
    mFlag = Mn
End Property

Public Property Let mFlag(ByVal vNewValue As Integer)
    Mn = vNewValue
    PropertyChanged "mFlag"
End Property

结果在程序中，无论怎么设置MFLAG属性，都是0，不存储设置值
[解决办法]
呵呵，受人鱼，不如授之以渔！
你的问题，一看就知道，是变量没有声明引起的
这是初学者常见的坏习惯

加上 Option Explicit

就是强制要求变量声明
你“被迫”声明后，问题自然也就解决了^_^
自已学会解决，比别人帮你解决，收获会更多。