异型窗体/控件

 

设置控件背景透明色：

        SetStyle(ControlStyles.SupportsTransparentBackColor, True)

        Me.BackColor = Color.Transparent

       

设置椭圆形窗体/控件

Dim oPath As New GraphicsPath

        oPath.AddEllipse(50, 50, 100, 130)

        Me.Region = New Region(oPath)