[VB.NET]改变窗口大小

<script type="text/javascript"><!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
改变窗口大小
在窗口没有窗体边框和标题栏的情况下 怎样改变窗口大小 能有拖动的功能吗？ 如果里面有个picturebox ，怎样可以让 picturebox 里面的图片也随之改变大小？
__________________________________________________________________________
设置 picturebox.anchor=Top,Bottom,left,right
__________________________________________________________________________
设置picturebox的Dock属性为fill.
__________________________________________________________________________
1、拖动：添加API函数 SendMessage和ReleaseCapture,可以拖动
Declare Function SendMessage Lib user32 Alias SendMessageA ( _
ByVal hwnd As IntPtr, _
ByVal wMsg As Integer, _
ByVal wParam As Integer, _
ByVal lParam As Integer) _
As Boolean
Declare Function ReleaseCapture Lib user32 Alias ReleaseCapture () As Boolean
Const WM_SYSCOMMAND = &H112
Const SC_MOVE = &HF010&
Const HTCAPTION = 2

Private Sub Form1_MouseDown(ByVal sender As Object, _
ByVal e As System.Windows.Forms.MouseEventArgs) _
Handles MyBase.MouseDown
ReleaseCapture()
SendMessage(Me.Handle, WM_SYSCOMMAND, SC_MOVE + HTCAPTION, 0)
End Sub

2、改变窗口大小让 picturebox 里面的图片也随之改变大小用楼上的方法应该可以。
__________________________________________________________________________