Изменение размеров формы - VB

Формулировка задачи:

поставило свойство формы borderstyle=none, как теперь мне изменять ее размеры? стрелочка при наведении на границу формы не появляется.
событие resize никак не работает. помогите!!!

Решение задачи: «Изменение размеров формы»

textual
                            Листинг программы 
                        

                            <font size="2"><font color="blue">Private</font> <font color="blue">Sub</font> Form_MouseMove(Button <font color="blue">As</font> <font color="blue">Integer</font>, Shift <font color="blue">As</font> <font color="blue">Integer</font>, X <font color="blue">As</font> <font color="blue">Single</font>, Y <font color="blue">As</font> <font color="blue">Single</font>)
    <font color="blue">Static</font> fHeight <font color="blue">As</font> <font color="blue">Boolean</font>
    <font color="blue">On</font> <font color="blue">Error</font> <font color="blue">Resume</font> <font color="blue">Next</font>
    <font color="blue">If</font> Button = 0 <font color="blue">Then</font>
        <font color="blue">If</font> Y > Me.Height - 100 <font color="blue">And</font> Y < Me.Height + 100 <font color="blue">Then</font>
            <font color="blue">If</font> <font color="blue">Not</font> fHeight <font color="blue">Then</font>
                Screen.MousePointer = 7
                fHeight = <font color="blue">True</font>
            <font color="blue">End</font> <font color="blue">If</font>
        <font color="blue">Else</font>
            <font color="blue">If</font> fHeight <font color="blue">Then</font>
                Screen.MousePointer = 0
                fHeight = <font color="blue">False</font>
            <font color="blue">End</font> <font color="blue">If</font>
        <font color="blue">End</font> <font color="blue">If</font>
    <font color="blue">ElseIf</font> Button = 1 <font color="blue">And</font> fHeight <font color="blue">Then</font>
        Me.Height = Y
    <font color="blue">End</font> <font color="blue">If</font>
<font color="blue">End</font> <font color="blue">Sub</font><br>
</font>
                        