Access VBA教程:PaintPalette属性

使用 PaintPalette属性可以指定窗体或报表所用的调色板。Variant 型,可读写。

expression.PaintPalette

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

可以通过使用Visual Basic对 PaintPalette属性进行设置。该属性设置必须是一个包含调色板信息的String 数据类型的值。

要设置 PaintPalette属性,可在宏或 Visual Basic 中将 PaintPalette属性设置为ObjectPalette属性的值;或对PaletteSource属性进行设置(这种情况下,Microsoft Access 自动将 PaintPalette属性设为 PaletteSource);还可以将一个窗体或报表的 PaintPalette属性设置为另一个窗体或报表的 PaintPalette属性。

窗体的 PaintPalette属性可在窗体“设计”视图和“窗体”视图中设置。

报表的 PaintPalette属性只能在报表“设计”视图中进行设置。

在设置 PaintPalette属性时,Microsoft Access 会复制所指定的调色板,并将其保存在对应的窗体或报表中。这样,以后在修改窗体或报表时该调色板就是可用的了。

在设置 PaintPalette属性时对所指定的调色板的修改不会影响存储在窗体或报表中的调色板副本。如果要更新存储在窗体或报表中的调色板副本,必须在打开窗体或报表时重新运行代码或宏以设置 PaintPalette属性或重新设置 PaletteSource属性。

在设置窗体或报表的 PaintPalette属性时,Microsoft Access 将自动更新其 PaletteSource属性。相反,在设置窗体或报表的 PaletteSource属性时,PaintPalette属性也会自动更新。例如,假设用 PaintPalette属性指定了一个自定义调色板,则 PaletteSource属性设置将改为“(自定义)”。PaintPalette属性(仅在宏或 Visual Basic 中才可用)可用于设置窗体或报表的调色板。PaletteSource属性则提供了一种在属性表中设置窗体或报表的调色板的方法,该方法使用的是一个已有的图形文件。

注意   Windows 在同一时刻只允许有一个活动的调色板。而 Microsoft Access 则允许在窗体上有多个图形,每个图形都使用不同的调色板。通过 PaintPalette 和 PaletteSource属性可以指定在显示图形时窗体应该使用哪个调色板。

可以使用 ObjectPalette属性使应用程序的与OLE对象、位图或其他包含在窗体或报表控件中的图形相关的调色板能够用于 PaintPalette属性。例如,要在设计 Microsoft Access 窗体时使得用于 Microsoft Graph 的调色板可用,可将窗体的 PaintPalette属性设置为一个已有的图表控件的 ObjectPalette 值。

VBA示例

使用 ObjectPalette 和 PaintPalette属性,可通过编程方法在运行时改变打开的窗体所使用的调色板。通常是将当前窗体的 PaintPalette属性设为具有焦点的控件中显示的图形的调色板。

例如,可以设置窗体使其带有一张海洋图片,上面有许多蓝色底纹,还有一张夕阳图片,上面有许多红色底纹。由于 Windows 在同一时刻只允许有一个活动的调色板,因此其中一张图片会显得比另一张好看。下面的示例使用控件的 Enter事件将窗体的 PaintPalette属性设为该控件的 ObjectPalette属性,这样焦点所在的那张图就会处于最佳显示状态。


Sub OceanPicture_Enter()
    Me.PaintPalette = Me!OceanPicture.ObjectPalette
End Sub
Sub SunsetPicture_Enter()
    Me.PaintPalette = Me!SunsetPicture.ObjectPalette
End Sub

上页:Access VBA教程:Painting属性 下页:Access VBA教程:PaletteSource属性

Access VBA教程:PaintPalette属性

Access VBA教程:PaletteSource属性 Access VBA教程:PaperBin属性
Access VBA教程:PaperSize属性 Access VBA教程:Parent属性
Access VBA教程:Path属性 Access VBA教程:Picture属性
Access VBA教程:PictureAlignment属性 Access VBA教程:PictureData属性
Access VBA教程:PicturePages属性 Access VBA教程:PictureSizeMode属性
Access VBA教程:PictureTiling属性 Access VBA教程:PictureType属性
Access VBA教程:PivotTable属性 Access VBA教程:PivotTableChange属性
Access VBA教程:PopUp属性 Access VBA教程:Port属性
Access VBA教程:PostalAddress属性 Access VBA教程:PreviousControl属性
Access VBA教程:PrintCount属性 Access VBA教程:Printer属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号