VB改变窗体大小

发布网友发布时间：2022-05-17 17:37

共4个回答

热心网友时间：2023-10-31 18:55

修改大小，可以设置对应的属性

width
:宽，

height:高

修改位置

top
:顶点，从屏幕上面开始为0，越往下，值越大，可以为负数，为负时会跑到屏幕上面去

left
:水平起点，从屏幕左边开始为0，同理与top

建议使用
move
方法
,具体看参数，

热心网友时间：2023-10-31 18:55

晕了，你的意思好像又二义。。。
如果这样的话：就是我设置了一个按钮，
一按，窗体的高度就减小300
Private
Sub
Command1_Click()
Me.Height
=
Me.Height
-
300
End
Sub
如果这样的话：就是我设置了一个按钮,一按窗体，的高度就减小300
Private
Sub
Form1_Click()
Command1.height
=
Command1.Height
-
300
End
Sub

热心网友时间：2023-10-31 18:56

前面做的是对的呵,不过我在加一行,免得点几次看不到按钮了..让按钮自己向上跑呵.
Private
Sub
Command1_Click()
Me.Height
=
Me.Height
-
300
If
Command1.Top
+
Command1.Height
>
Me.ScaleHeight
Then
Command1.Top
=
Me.ScaleHeight
-
Command1.Height
End
Sub

热心网友时间：2023-10-31 18:56

form1.height=1000'值
form1.width=1000'值