vb6.0的UserControl 属性变化是什么事件

额，如题

2024-11-29 04:30:09

推荐回答（2个）

回答1：

就是当控件的任何一个属性的值发生了改变就会触发这个事件

回答2：

Public Event csChange() '添加事件
Public Property Get cs() As String
cs = Text1.text
End Property
Public Property Let cs(aa As String)
Text1.text = aa
PropertyChanged "cs"
End Property
Private Sub Text1_Change()
RaiseEvent csChange '触发事件
End Sub

exe代码

Private Sub Command1_Click()
UserControl11.cs = 123
End Sub
Private Sub UserControl11_csChange()
MsgBox UserControl11.cs
End Sub