Form.Painting 属性 (Access)

使用 Painting 属性可指定是否重新绘制窗体。 读/写 Boolean。

语法

表达式。绘画

expression：表示 Form 对象的变量。

备注

只有在“窗体”视图中才能设置和应用此属性，而在其他视图中此属性是不可用的。

该属性 等同于 Echo 操作。 但是，它可以防止重画单个的窗体，而 Echo 操作则只能防止重画应用程序中所有打开的窗口。

将 该窗体的属性 设置为 False 还会阻止所有的控件 (子窗体控件除外) 在窗体上被重画。 若要防止窗体控件被重画，必须 Painting 属性的子窗体的属性设置为 False 。 (请注意您将子窗体，不是子窗体控件的 绘制 属性设置)。

每当窗体获取或失去焦点时， 该属性 自动设置为 True 。 如果您不希望看到对窗体或其控件所做的更改在窗体上工作时，可以设置该属性为 False 。 例如，如果窗体具有一组在调整窗体大小时自动调整大小的控件，并且你不希望用户看到每个单独的控件移动，则可以关闭 “绘制” ，移动所有控件，然后重新打开 “绘制 ”。

示例

下面的示例根据 SetPainting 变量是设置为 True 还是 False，使用 Painting 属性来启用或禁用窗体重画。 如果关闭了窗体重画，Microsoft Access 就会在关闭重画期间显示沙漏图标。

Public Sub EnablePaint(ByRef frmName As Form, _ 
 ByVal SetPainting As Integer) 
 
 frmName.Painting = SetPainting 
 
 ' Form painting is turned off. 
 If SetPainting = False Then 
 DoCmd.Hourglass True 
 Else 
 DoCmd.Hourglass False 
 End If 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。