当前位置：文江博客话题详情

如何缩放表单上的控件以按比例适合表单？

发布于 2024-10-05 06:10:30 字数 123 浏览 11 评论 0原文

我有一个 Visual Basic 2010 表单，其中包含各种组框、按钮和标签。我希望能够使表单最大化，但是当我这样做时，控件保持在原来的位置，并且它们不会随表单调整大小。我希望它们能够与表单成比例地调整大小。任何帮助将不胜感激。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

鸩远一方 2024-10-12 06:10:31

设 form1 是表单，

gb_check 是表单内的一个组框，

Groupbox 的高度、位置和宽度可以相对于表单大小进行如下设置：

 Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
            gb_chek.Height = (Me.Height * 30) / 100 'what ever be the form height the group box's height is always 30% of the form size
            gb_chek.Width = (Me.Width * 40) / 100 'what ever be the form width the group box's width is always 40% of the form size
            gb_chek.Location = New Point((Me.Width) / 18, (Me.Height) / 12)' set the location of the form relative to form size;
 End Sub

如果您有组框内的控件其大小相对于组框设置

Let form1 is the form,

gb_check be a group box inside the form

the height, location and width of the Groupbox can be make relative to the form size as follows

 Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
            gb_chek.Height = (Me.Height * 30) / 100 'what ever be the form height the group box's height is always 30% of the form size
            gb_chek.Width = (Me.Width * 40) / 100 'what ever be the form width the group box's width is always 40% of the form size
            gb_chek.Location = New Point((Me.Width) / 18, (Me.Height) / 12)' set the location of the form relative to form size;
 End Sub

If you have controls inside the group box its size set relative to the group box

回复收藏 0 原文