有没有办法在转换后的访问97表单上应用主题？

Question

我升级了访问97应用程序以访问2010

当我创建一个新表单时，就像一个主设计，我只需点击一下即可在每个表单上应用。此功能不适用于我的旧表单（没有任何更改）。

我尝试从空白数据库开始并导入所有内容。现在表格看起来更好一点，因为按钮是圆形的，字体更好，但我仍然无法使用主设计更改标签背景。

颜色就像每个标签的属性中的硬编码一样。我可以选择所有并改变它但我必须为每种形式做到这一点。有没有办法可以在我的旧表格中使用主设计？

谢谢。

Answer 1

主题前颜色使用以下属性应用于标签：

ForeThemeColorIndex
ForeTint
ForeShade

尽管我已经知道，当您从未应用主题的其他数据库导入表单时，对于某些控件，ForeThemeColorIndex值将设置为-1。这基本上告诉Access这些控件的颜色是“硬编码的”＃34; （虽然不在VBA中）。

我认为解决此问题的唯一方法是使用VBA在设计视图中打开每个表单，循环遍历所有表单的控件，如果控件是标签控件（或者任何其他您遇到问题的控件，使用正确的主题相关属性应用主题颜色。一旦您将控件设置为使用主题颜色，更改或应用主题应该顺利工作。

这是这些属性的列表。这不一定是全面的。我只是使用基本循环来查看标签控件的属性。文本框控件的这些属性相同。此列表的主题颜色已成功应用于名为lblLastName的标签控件：

lblLastName: BackThemeColorIndex=1
lblLastName: BackTint=100
lblLastName: BackShade=100
lblLastName: BorderThemeColorIndex=0
lblLastName: BorderTint=50
lblLastName: BorderShade=100
lblLastName: ThemeFontIndex=1
lblLastName: ForeThemeColorIndex=0
lblLastName: ForeTint=75
lblLastName: ForeShade=100
lblLastName: GridlineThemeColorIndex=1
lblLastName: GridlineTint=100
lblLastName: GridlineShade=65

以下是微软某些文档的链接： http://msdn.microsoft.com/en-us/library/office/ff195247.aspx

Answer 2

尝试在设计模式下打开表单，然后按ctrl-a选择所有对象。然后从设计选项卡上的功能区中单击主题并选择一个主题，如图所示。

请记住，如果您使用的是mdb，则会禁用该选项，因此您必须使用较新的accDB格式才能使用此选项。

Answer 3

一种解决方法是将（旧的）“自动套用格式”命令添加到“快速访问”工具栏中。尽管它没有在表单中添加主题功能，但却是一种以相当快速且一致的方式重新格式化表单的快速方法。