问高手几个关于动态改变控件大小的问题

Question

1）我想动态的使Form控件的大小无法改变，请问用什么方法？不能使用BorderStyel属性，是不是必须要用API实现呢？如果必须得用，要用哪个API呢？
2）我想让Form控件缩小到一定程度时候，就不能再缩小了，请问有什么方法？
3）我有一个控件不支持动态重画功能，请问有什么方法在所放窗体的时候改变它的大小吗？

Answer 1

Dim w As Long, h As Long
Private Sub Form_Load()
w = Me.Width
h = Me.Height
End Sub'Private Sub Form_Resize()'问题1
'Me.Width = w
'Me.Height = h
'End Sub
Private Sub Form_Resize()'问题2
If Me.Width < w / 2 Then Me.Width = w / 2
If Me.Height < h / 2 Then Me.Height = h / 2
End Sub