等离子净化装置:vb中怎样禁止把窗体拖大拖小?

来源：百度文库编辑：神马品牌网时间：2024/05/06 00:03:02

这样也可:
在窗体模块里定义两个公共变量:
dim meh as integer
dim mew as integer
在form_load()中添加:
meh=me.height
mew = me.width
然后窗体的resize事件如下：
Private Sub Form_Resize()
On Error GoTo minnnn
Me.Height = meh
Me.Width = mew
Exit Sub
minnnn:

End Sub

一种方法是窗体borderstyle属性设为3
另一种在窗替的RESIZE事件里加入以下代码

on error resume next
If Me.WindowState = vbMinimized Then Exit Sub
If Me.Width <>12000 Then Me.Width = 12000
If Me.Height <> 9000 Then Me.Height = 9000

12000和9000根据自己的需要改即可

borderstyle属性设为3

vb中怎样禁止把窗体拖大拖小? VB编程中如何禁止一个窗体的最小化求助：vb中怎样把窗体的内容以.mdi格式存放？高分悬赏：vb中怎样把窗体的内容以.mdi格式存放？ vb中，把Treeview放入MDI窗体中(在线等) VB中拖动窗体 vb里在窗体中嵌入窗体请问在VB中怎样能使窗体置顶？ vb中怎样让某一个窗体获得焦点,关闭它,其它窗体才能获得焦点? vb中窗体移动问题