Painting 屬性

全部顯示

使用 Painting 屬性可以指定是否要對(duì)窗體或報(bào)表進(jìn)行重畫。Boolean 型，可讀寫。

expression.Painting

expression     必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。

說明

Painting 屬性使用以下設(shè)置：

 

注釋  可以使用宏或 Visual Basic 對(duì)該屬性進(jìn)行設(shè)置。

只有在“窗體”視圖中才能設(shè)置和應(yīng)用該屬性，而在其他視圖中該屬性是不可用的。

Painting 屬性類似于 Echo 操作。然而 Painting 屬性可以防止重畫單個(gè)的窗體或報(bào)表，而 Echo 操作則能防止重畫應(yīng)用程序中所有打開的窗口。

將窗體或報(bào)表的 Painting 屬性設(shè)為 False 也可以防止重畫窗體或報(bào)表上的所有控件（子窗體和子報(bào)表控件除外）。若要防止重畫子窗體或子報(bào)表控件，必須將子窗體或子報(bào)表的 Painting 屬性設(shè)置成 False。（請(qǐng)注意，設(shè)置的是子窗體或子報(bào)表的 Painting 屬性，而不是子窗體或子報(bào)表控件的 Painting 屬性。）

每當(dāng)窗體或報(bào)表獲得或失去焦點(diǎn)時(shí)，Painting 屬性將自動(dòng)設(shè)為 True。如果在窗體或報(bào)表上工作時(shí)不希望看到對(duì)窗體或報(bào)表或其上控件的更改，可將該屬性設(shè)為 False。例如，假設(shè)某個(gè)窗體有一組控件，在調(diào)整窗體大小時(shí)這些控件也會(huì)自動(dòng)調(diào)整大小，而您不希望用戶看到單個(gè)控件的移動(dòng)，則可以關(guān)閉 Painting，然后移動(dòng)所有控件，再打開 Painting。

示例

下面的示例根據(jù) SetPainting 變量是設(shè)為 True 還是 False，使用 Painting 屬性來啟用或禁用窗體重畫。如果關(guān)閉了窗體重畫， Microsoft Access 將在關(guān)閉重畫期間顯示沙漏圖標(biāo)。

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