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 / 初始化控件自动大小调整与窗口的高度比例))
'更改控件的大小? 按第一次窗口的比例 进行调整
Private Sub 显示控件的位置坐标()
Label1.Text = "控件的上边距坐标: " 控件自动大小调整.Top
End Class
还有好多方法? 慢慢研究吧兄弟 希望能帮到你
控件是可以显示在里面的,你只要加个label,把label的属性设为visualble=fause就行.设置鼠标经过头像的mouseHover和mouseLeave事件,当mouseHover时label的属性visualble=true,当mouseLeave时label的属性visualble=fause即可.窗体的鼠标事件可以设置控件的cursor属性,里面可以选择许多种鼠标图形. 只要是正常的Form都可以改变窗体大小,但是无边框的窗体只能用函数改变或者设置属性,在debug后是不能改变的.拖动窗体需要在窗体的load时间里面写入当鼠标单击不放时的事件即可,不难.
修改VB中控件的尺寸方法:
①.)鼠标选中需要修改尺寸的控件-鼠标移到该控件的右下角,左键按住鼠标-鼠标图案由单箭头变为双线箭头,鼠标往右往下拉动控件到需要尺寸放开左键,控件尺寸就修改成新尺寸.
陈恩点在此为你解答如有错误请见谅:
思路是这样的:
先判断鼠标位置(MouseMove事件)
如果在边缘,同时鼠标左键是按下的
窗体增加 增加数为鼠标移动数
你设一下你控件的anchor和dock两个属性,可以达到你满意的组合效果.包括位置和大小比例变化.
MaximumSize 是代表这个窗体最大能放大到你设定的那个参数那么大,默认的(0,0)代表全屏.MinimumSize是代表窗体能放缩到你设定的这个这个参数那么小,默认的(0,0)代表最小.
size 即是窗体最初展现出来的大小. 你说的size不能直接改动,应该是textbox 文本框吧.将textbox文本框的Multiline属性改成True就可以通过改变size的值来改变框体大小.
若有不清楚的地方欢迎追问!
以上就是土嘎嘎小编为大家整理的vb.net控件大小相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!