Question

我已完成在办公室周围使用的表单，但是，当在不同的计算机上打开时，表单不会调整大小。相反，滚动条会出现。如何让表单和控件自动调整大小？

Answer 1

以下是您可以添加到表单中的一些VBA代码，无论用户在监视器上显示窗口的大小，或者监视器的分辨率是多少，都可以使表单看起来保持相同。

此外，您可以通过按住 Ctrl 键并上下滚动鼠标滚轮（或者，按住 Shift 键并点击来使文字变大或变小 + 键或 - 键。）

要使用此功能，只需打开Access并在设计视图中打开表单即可。首先，右键单击表单图像并添加Form Header/Footer。

如果您没有在表单中添加页眉和页脚，则下面的代码会出错。但是，如果您不希望它们出现在表单上，您可以将页眉和页脚的高度缩小为空。

单击表单左上方的小框，在选项卡下方选择表单本身：

这将确保在查看Property Sheet时我们正在查看表单的属性。

要查看表单的Property Sheet（如果已经不可见），请按住 Alt 键，然后按 Enter 键。

选择Event标签。

然后，您需要将文字文本[Event Procedure]添加到表单背后的以下五个事件中：

加载

On Key Up

按键

调整大小

鼠标滚轮

您可以在这些事件旁边的文本框中键入文字文本[Event Procedure]，也可以点击每个事件旁边的省略号（...）按钮，然后从弹出菜单中选择Code Builder 。

看起来像这样：

...

此外，在事件列表的底部，您还需要将Key Preview属性更改为Yes：

最后，您可能希望在表单上关闭Scroll Bars，以便它们不会重叠任何内容。为此，请转到设计视图中表单Format的{{1}}标签，并将Property Sheet属性更改为Scroll Bars。

现在，要添加VBA代码，请按住 Alt 并按 F11 以查看VBA编辑器。

进入VBA编辑器后，双击Neither文件夹下的Form_YourFormName选项：

如果您没有看到Microsoft Access Class Objects文件夹，请返回设计视图中的表单，然后在任何事件上点击文字文本Microsoft Access Class Objects旁边的省略号（...）刚刚修改过。

这会将您带回VBA编辑器，您现在应该位于[Event Procedure]代码区域内。那里已经有一些代码了，但你可以在继续下一步之前删除所有代码。

然后在右侧屏幕的主要部分，只需复制并粘贴下面的代码，即可完成。

Form_YourFormName

以下是缩小时表单形状的截图。

在：

后：

此外，您可以通过按住 Ctrl 键并向上滚动鼠标滚轮来增大文本（或者，通过按住 Shift 键并按 + 键。）

并且，您可以通过按住 Ctrl 键并向下滚动鼠标滚轮（或者通过按住 Shift 键并按 - 键。）

Answer 2

一些注意事项：

查看how to anchor controls to the form，以便他们可以使用表单调整大小。
设计表单，使其在用户拥有的最小屏幕尺寸上正确显示考虑用户如何与您的应用程序进行交互非常重要。您不能指望Access可以神奇地重新流动并调整所有内容的大小，这是您作为应用程序设计者需要考虑的问题。
因此，限制表单上的控件数量，并保持足够小，以便在办公室中最小的合理屏幕分辨率上正确显示。
如果您不想显示小节，请查看表单的scrollbars属性。
查看可以使用的各种表单样式：在Access 2007及更高版本中，您可以在选项卡中使用表单。您也可以弹出它们，并防止它们被调整大小查看以下表单属性并围绕各种组合进行操作以获得所需的效果：