在VB.NET中，带框架窗体的大小是不能为0的，要想做到高、宽都为0，需要自己重绘一个无边框窗体，用外置图片来绘制，配合PS做一些图片，既可以换肤还能做的很漂亮。
站在用户的角度思考问题，与客户深入沟通，找到麒麟网站设计与麒麟网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都做网站、成都网站建设、成都外贸网站建设、企业官网、英文网站、手机端网站、网站推广、主机域名、网站空间、企业邮箱。业务覆盖麒麟地区。
按当前代码修改，你把下面的代码粘回去就可以了，窗体的高和宽达到最小时，循环会自己退出，避免无限循环；
Select Case 2
Case Is = 1
Dim w As Integer = Me.Width
Do
Me.Width -= 5 : w -= 5
Threading.Thread.Sleep(3)
Loop While Me.Width = w
Case Is = 2
Dim h As Integer = Me.Height
Do
Me.Height -= 5 : h -= 5
Threading.Thread.Sleep(3)
Loop While Me.Height = h
Case Is = 3
Do
Me.Opacity -= 0.05
Threading.Thread.Sleep(120)
Loop Until Me.Opacity = 0
End Select
它在System.Threading命名空间的Thread类中定义了
直接用 System.Threading.Thread.Sleep()方法
System.Threading.Thread.Sleep(time )‘time为整数，单位毫秒
sleep 是一个非常简单的api语句,作用是"延时"
声明语句如下:
Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
调用方法:
sleep 5000 '表示延时5秒,
