vb窗体边框固定不可变，但是有最大最小化按钮！

vb窗体边框固定不可变，但是有最大最小化按钮，怎么做啊？高手请指点啊？有没有什么办法啊……

---

BorderStyle 属性设置成1
MinButton 属性设置成True

---

最大最小化按钮还起作用吗?如果还起作用,又怎能叫vb窗体边框固定不可变?

---

可以，但不知道楼主要那两个按钮干什么？

---

BorderStyle 属性设置成1
MaxButton 和 MinButton 属性设置成True

---

引用

BorderStyle 属性设置成1
MaxButton 和 MinButton 属性设置成True

测试 正解.
2楼的少了个最大化的设置.

---

引用

vb窗体边框固定不可变，但是有最大最小化按钮，怎么做啊？高手请指点啊？有没有什么办法啊……

vb窗体边框固定不可变，但是有最大最小化按钮????既然固定不可变那你还需要最大最小化按钮干啥？摆好看的?


Option Explicit
Dim OldW&, OldH&
Private Sub Form_Load()
  OldW = Me.Width: OldH = Me.Height
End Sub

Private Sub Form_Resize()
  If Me.Width <> OldW Then Me.Width = OldW
  If Me.Height <> OldH Then Me.Height = OldH
End Sub

---

谢了各位……我市初学者，想边框不可变，但是可以最小化按钮的！

---

minbutton = true,
maxbutton = false
boardstyle = 1

---

再加一行即可

Option Explicit
Dim OldW&, OldH&
Private Sub Form_Load()
  OldW = Me.Width: OldH = Me.Height
End Sub