如何在不會閃爍的前提下,讓表單無法改變大小 ?(編號:5651)

請問如何在表單縮至一定大小後,即無法再縮小,只能放大.
而且不會閃爍.
我試過的方法有:
MyMenu& = GetSystemMenu(Me.hWnd, 0)
RemoveMenu MyMenu, &HF000, R
----------------------------------------
MoveWindow Me.hwnd, 0, 0, (Line1.X1 + 1) / _
screen.TwipsPerPixelX, Me.Height / Screen.TwipsPerPixelY, 1
SetWindowLong Me.hwnd, 65520, &H17CF0000