窗口禁止调整

Private Sub Label1_Click()
  Form1.MaxButton = False
  Form1.MinButton = False
End Sub
编译出错 --------------------编程问答-------------------- 这样是会出错的，你直接在窗体的属性上设这个参数 --------------------编程问答-------------------- 编译前就要设置好这些选项的

否则,运行后只能通过API删除系统菜单中的相应项,以得到同样的效果

补充：VB ,  基础类