[VB] vb如何锁定窗体的大小

2）编程控制

如果将Form的BorderStyle设置为 2 - Sizeable，通过编程也可以实现窗体固定大小

Option ExplicitDim frmWidthDim frmHeightPrivate Sub Form_Load()    '窗体启动时，记录下窗体的宽度和高度    frmWidth = Me.Width    frmHeight = Me.HeightEnd SubPrivate Sub Form_Resize()    '用户改变窗体大小时，强制窗体大小固定为原始尺寸    '从而达到窗体大小固定目的！    On Error Resume Next    Me.Width = frmWidth    Me.Height = frmHeightEnd Sub