ヘッダー

表紙 > VB.NET サンプル >

VB.NET 2002, VB.NET 2003, VB2005

フォームを変形させる

1.フォームを楕円形にする例

VB.NET2002対応 VB.NET2003対応 VB2005対応

Dim myGPath As New Drawing2D.GraphicsPath

myGPath.AddEllipse(New RectangleF(100, 100, 400, 200))

Me.Region = New Region(myGPath)

 

2.フォームを文字の形にする例

以下の例ではフォームを★の形にする

VB.NET2002対応 VB.NET2003対応 VB2005対応

Dim myGPath As New Drawing2D.GraphicsPath

myGPath.AddString("★", FontFamily.GenericSansSerif, CInt(FontStyle.Regular), 200, New PointF(100, 100), StringFormat.GenericDefault)

Me.Region = New Region(myGPath)

 

 


VB6対応 VB6ではAPIを使えば可能だったと思います。