Question

早上好！

我开始读这篇文章：

http://www.andypope.info/vba/resizeform.htm

虽然这是非常有用的信息，但我想知道是否有人可以指出我正确的方向来帮助我解决问题。我想动态设置高度和高度用户表单的宽度值取决于所选的多页（可能是通过单击事件）。它会是这样的吗？

 Sub pageX_click

 height.value = 23
 width.value = 50

 End Sub

我认为它可能比这更复杂，但如果有人愿意指出我正确的方向，我可以修补，直到我找到正确的解决方案。

其他问题 - 由于尺寸不同，我是否需要静态设置每次打开哪些页面？这样我就不会出现随机大小问题/错误？

Answer 1

这是解决方案 - 它实际上就像我想的那样简单

 Private Sub MultiPage1_Change()

 If MultiPage1.Value = 0 Then
     ToolBoxForm.Height = 560.25
     ToolBoxForm.Width = 652.5
 End If

 'lather, rinse, repeat for each page

 End Sub

具有多页面的VBA用户窗体动态调整大小事件

1 个答案: