vb.net 如何使得控件随着窗体大小 的改变而改变呢,大家帮忙给想想,最好有代码的哦

 我来答
爱好编程的人
2013-06-27 · 超过36用户采纳过TA的回答
知道答主
回答量:89
采纳率:100%
帮助的人:91.7万
展开全部

Public Class Form1

    Dim 初始化控件自动大小调整与窗口的宽度比例 As Integer
    Dim 初始化控件自动大小调整与窗口的高度比例 As Integer

 


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        初始化控件自动大小调整与窗口的宽度比例 = Me.Width / 控件自动大小调整.Width
        初始化控件自动大小调整与窗口的高度比例 = Me.Height / 控件自动大小调整.Height
        显示控件的位置坐标()

    End Sub


    Private Sub Form1_ResizeEnd(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ResizeEnd
        ' Form1_ResizeEnd  这个事件是 窗口大小变化完成后 再进行操作的
        控件自动大小调整.Location = New Point(控件自动大小调整.Left, 控件自动大小调整.Top)
        '设置控件的初始左位置坐标  与  上位置坐标
        控件自动大小调整.Size = New Point(Int(Me.Width / 初始化控件自动大小调整与窗口的宽度比例), Int(Me.Height / 初始化控件自动大小调整与窗口的高度比例))
        '更改控件的大小  按第一次窗口的比例 进行调整

        显示控件的位置坐标()
    End Sub

    Private Sub 显示控件的位置坐标()
        Label1.Text = "控件的上边距坐标: " & 控件自动大小调整.Top
        Label2.Text = "控件的左边距坐标: " & 控件自动大小调整.Left
        Label3.Text = "控件的宽度大小: " & 控件自动大小调整.Width
        Label4.Text = "控件的高度大小: " & 控件自动大小调整.Height
    End Sub
End Class

 

还有好多方法  慢慢研究吧兄弟 希望能帮到你

FMUD1
2013-06-27 · TA获得超过1008个赞
知道大有可为答主
回答量:1289
采纳率:71%
帮助的人:904万
展开全部
anchor属性可以控制
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
tao_wuzheng
2013-06-27 · 超过13用户采纳过TA的回答
知道答主
回答量:45
采纳率:0%
帮助的人:15.9万
展开全部
有一个属性可以控制。。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式