.NET下设计各种形状的窗体界面

最新推荐文章于 2013-06-17 16:34:00 发布

人王

最新推荐文章于 2013-06-17 16:34:00 发布

阅读量781

点赞数

文章标签： .net integer

本文链接：https://blog.csdn.net/zhyawe/article/details/3148475

版权

下列代码功能是改变当前窗体形状为椭圆形：
　Dim P As System.Drawing.Drawing2D.GraphicsPath = New　System.Drawing.Drawing2D.GraphicsPath ( )
　P.AddEllipse ( 0 , 0 , Me.ClientSize.Width, Me.ClientSize.Height)
　Me.Region = New Region ( P )

下列代码功能是改变当前窗体形状为扇形：
Dim P As System.Drawing.Drawing2D.GraphicsPath = New System.Drawing.Drawing2D.GraphicsPath ( )
P.AddPie ( 10 , 10 , 200 , 200 , 5 , 150 )
Me.Region = New Region ( P )

下列代码功能是改变当前窗体形状为环形：
Dim P As System.Drawing.Drawing2D.GraphicsPath = New System.Drawing.Drawing2D.GraphicsPath ( )
　Dim Height As Integer = Me.ClientSize.Height
　Dim width As Integer = 80
　P.AddEllipse ( 0 , 0 , Height , Height )
　P.AddEllipse ( width , width , Height - ( width * 2 ) , Height - ( width * 2 ) )
　Me.Region = New Region ( P )

其实只要把Me.Region重定义个New Region（GraphicsPath）即可改变窗体形状，大家也可以试试改成别的形状的窗体！