实在没办法

实在没办法，求助
我现在想重绘窗口，搞了一天一夜了，都搞不好，请帮帮忙
1，为窗口四周的边缘加蓝色的线
2，在标题栏画要个矩形。
请各位兄弟给个代码我。谢谢了
------解决方案--------------------
何不换个思路，例如，把窗体FormBoderStyle设置成none，然后用一个图片当背景。想要啥样的都行。包括最大化最小化关闭按钮等这些都可以画。
------解决方案--------------------
2楼主意不错。

------解决方案--------------------

Protected Overrides Sub OnPaint(e As PaintEventArgs)
        MyBase.OnPaint(e)
        Dim g As Graphics = e.Graphics
        g.DrawRectangle(New Pen(Color.Blue, 1), 100, 100, 250, 250)
    End Sub 
范围再调整

------解决方案--------------------
你搞个背景图不就行了