设置属性时执行代码
可以创建具有相同名称的 Property Let、 Property Set 和 Property Get 过程。 通过执行此操作,您可以创建一组相关共同协作的过程。 将名称用于 Property 过程后,该名称不能用于命名 Sub 或 Function 过程、 变量或 用户定义的类型。
“Property Let”语句可让您创建设置属性的值的过程。 某示例可能是在表单上为位图创建插入的属性的“属性”过程。
这是用于调用 Property Let 过程的语法。
Form1.Inverted = True
在窗体上反转位图的实际工作是在 Property Let 过程中完成的。
Private IsInverted As Boolean
Property Let Inverted(X As Boolean)
IsInverted = X
If IsInverted Then
…
(statements)
Else
(statements)
End If
End Property
The form-level variable stores the setting of your property. 通过将其声明 为 Private,用户只能使用 Property Let 过程对其进行更改。 Use a name that makes it easy to recognize that the variable is used for the property.
此属性获取过程用于返回属性的当前状态。
Property Get Inverted() As Boolean
Inverted = IsInverted
End Property
通过属性过程 ,可以轻松地在设置属性值的同时执行代码。 使用属性过程执行以下处理:
- 在设置属性值之前,可确定此属性值。
- 在设置属性值之后,基于新值。
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。