Question

VB中做的弹出窗口，怎么让它跳出来后，不能改变之前的大小？就是拖动不了窗体？

Answer 1

步骤(这些设置应当在程序设计阶段进行，即：这些属性无法在程序中简单用代码来设置)
1.BorderStyle设置为1-Fixed Single
2.把MaxButton设置为True
3.根据自己需要设置是否可以移动窗口
1) 若Moveable=True 可以移动窗口
2) 若Moveable=False 不可以移动窗口

追问

把MaxButton设置为True
这个是？

恩 我知道了哈 呵呵 ~

Answer 2

弹窗的属性改下就好

Answer 3

在窗体属性中把 BorderStyle设置为3-Fixde Dialog(固定对话框）然后再在代码写上想要的大小
Form1.BorderStyle = 1
BorderStyle 属性
vbFixedSingle 1 固定单边框。可以包含控制菜单框，标题栏，“最大化”按钮，和“最小化”按钮。只有使用最大化和最小化按钮才能改变大小。
2为sizeable
vbFixedDouble 3 固定对话框。可以包含控制菜单框和标题栏，不能包含最大化和最小化按钮，不能改变尺寸

Answer 4

这句控制窗体是否可以被移动frmObject.moveable=false
这句控制窗体边框模式：frmObject.BoderStyle=1 ，3也可以