我只是做了一个触发的事例,具体的需要很好更改的呀,比如你的需要,那么这样用:
Set(ByVal Value As String)
if value<>UserNo then
MessageBox.Show(Value) '在这里写你要触发的事件调用
UserNo = Value
end if
End Set
不就行了吗?
Public UserNo As String
Property Change() As String
Get
Return UserNo
End Get
Set(ByVal Value As String)
UserNo = Value
MessageBox.Show(Value) '在这里写你要触发的事件调用
End Set
End Property