我想要做的是在表单上的标签中显示当前所选字段的描述。我觉得它当前显示的位置(左下状态栏)几乎不明显。
如何访问状态栏中的该值?例如,在我的表单上,当我选择“员工姓名”字段时,在左下角以小字显示“您正在注册的员工的姓名”。
我知道在我的表单上的某些事件中,我需要执行以下操作的代码
me.lblControlDescription.Caption = me.statusbar.caption
如何在 VBA 中访问状态栏中的文本(字段描述)?
状态栏中的文本是当前字段的文本Description
财产。
从 VBA 中,您可以访问Description
表单记录集中的字段。
Debug.Print Me.Recordset.fields("id").Properties("Description")
因此,如果您有一个名为的标签控件lblDescription
,你可以设置它的.Caption
对领域的价值Description
.
Me.lblDescription.Caption = Me.Recordset.fields("id").Properties("Description")
然而,这可能会更复杂。Description
是用户创建的属性,这意味着在您为其赋值之前它不存在。而且,如果您有一组,但稍后删除其值,则该属性本身将不再存在。
如果您尝试检索Description
当不存在时,VBA 将抛出错误#3270,“未找到属性”。您可以捕获该错误,然后设置Me.lblDescription.Caption
to vbNullString
当它发生时。
您还需要一个策略when改变Me.lblDescription.Caption
。您可以创建一个过程来根据当前活动控件进行设置。然后从每个窗体控件的焦点事件中调用该过程。可能有更好的方法,但我现在还没有看到。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)