VB改变窗口大小

Question

在VB6和VB.net的Form_Resize中限制窗口改变的最小尺寸，代码如下：
Private Sub Form_Resize()
    If Me.Width < 5000 Then Me.Width = 5000
    If Me.Height < 5000 Then Me.Height = 5000
End Sub
当缩小窗口尺寸到小于设定值（5000）时，窗口中会出现随鼠标移动的线，影响了窗口的美观，请问如何避免这种情况？？？

Answer 1

Private Sub Form_Resize() 
    If Me.Width < 5000 or Me.Height<5000 then exit sub 
End Sub

Answer 2

又是这个问题，你搜搜以前的贴子
subclass wm_sizing