怎样把窗口form的大小固定死呢?

Dim formx As Integer, formy As Integer
Private Sub Form_Load()
formx = Me.Width
formy = Me.Height
End Sub

Private Sub Form_Resize()
On Error Resume Next
Me.Width = formx
Me.Height = formy
End Sub

用这个代码就可以固定窗体大小了.
代码比楼上的代码好.
测试通过.

或者就用form1.borderstyle属性改变.

把窗体borderstyle属性设为0、1、3、4。
在设计时，窗体大小无论怎么样设置都能够改变。
你也可以在窗体resize事件中加入代码，让用户不能改变大小。
如：
Private Sub Form_Resize()
MsgBox ""
End Sub
这样在拖动鼠标想改变大小时，就会弹出对话框。

念尐忧的方法好，我支持。

如果不能拉伸要最小化,将窗体的maxbutton属性设为false
如果不能拉伸不要最小化, 用yangdejiu99说的

把二楼和三楼的结合一下，更好