VB 窗体大小

来源：百度知道 编辑：UC知道 时间：2024/05/20 20:18:27
Form1.Height = 1530
错误：当窗体最大化时不能调整窗体
咋办？

Private Sub Command1_Click()
Form1.WindowState = 0
Form1.Height = 1530
End Sub

既然最大化时不能调整，那就先变成普通窗口呗。方法如下：
Form1.WindowState =vbNormal

加个出错处理。

在此事件中加入:On Error Resume Next即可

参考一下：

Private Sub Command1_Click()

On Error Resume Next

Form1.Height = 1530
End Sub