在窗体Form_Resize()中,用如下代码:控件名.move Left,Top[,Width][,Height]前两个是必选参数"left和top"例如,我想让文本控件,随窗体变化,让其边框为100缇(1像素=1缇15),代码如下,Text1.Move 100,100,Me.ScaleWidth-200,Me.ScaleHeight-200 即可.
pixelme像素生成器 pixelme像素生成器免费
pixelme像素生成器 pixelme像素生成器免费
先将整个布局用很多Panel布局好(Align), 然后将控件放在Panel中,一般Dock在Panel中,这样窗体大小变了,Panel就会跟着调整其变化,Panel变了,控件就会跟着调整其变化.
private subme.height=screen.height form_load()
dim ioldmode as integer
ioldmode=me.scalemode
me.width=screen.width
me.scalemode=ioldmode
这个是窗口化的代码,控件要写在form_resize()中,在窗口改变大小时调整自己的位置.原理和上面的代码是一样的.
在窗体Form_Resize()中,用如下代码:控件名.move Left,Top[,Width][,Height]前两个是必选参数"left和top"例如,我想让文本控件,随窗体变化,让其边框为100缇(1像素=1缇15),代码如下,Text1.Move 100,100,Me.ScaleWidth-200,Me.ScaleHeight-200 即可.
先将整个布局用很多Panel布局好(Align), 然后将控件放在Panel中,一般Dock在Panel中,这样窗体大小变了,Panel就会跟着调整其变化,Panel变了,控件就会跟着调整其变化.
private sub form_load()
dim ime.scalemode=vbpixeloldmode as integer
ioldmode=me.scalemode
me.width=screen.width
me.scalemode=ioldmode
这个是窗口化的代码,控件要写在form_resize()中,在窗口end sub改变大小时调整自己的位置.原理和上面的代码是一样的.
版权声明:本文内容由互联。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发 836084111@qq.com 邮箱删除。