VB6.0 如何通过代码实现 禁止窗口大小更改的功能?

2025-03-10 12:31:46
推荐回答(1个)
回答1:

Dim ow As Single, oh As Single

Private Sub Form_Load()
ow = Width
oh = Height
End Sub

Private Sub Form_Resize()
If WindowState = 0 Then
    Width = ow
    Height = oh
End If
End Sub