■19401 / inTopicNo.1) |
ラベルの透過について |
□投稿者/ スバル (1回)-(2008/05/22(Thu) 19:02:36)
|
分類:[VB.NET/VB2005]
VB 2005です。 よろしくお願いします。
ラベルの透過について困っています。
フォームをグラデーションで塗りつぶし、その上にラベルを置いています。 ラベルはBackColorがTransparent、FlatStyleがStandardとなっています。
フォームのPaintイベントは以下のような記述になっています。
Dim g As Graphics = Me.CreateGraphics()
Dim gp As New GraphicsPath gp.AddRectangle(g.VisibleClipBounds)
Dim gb As New PathGradientBrush(gp) gb.CenterColor = Color.White gb.SurroundColors = New Color() {Color.Yellow, Color.Green, Color.Blue, Color.Red} g.FillRectangle(gb, g.VisibleClipBounds) gb.Dispose() g.Dispose()
Me.Controls.Add(Label2) Label2.Top = Label2.Top - Me.Top Label2.Left = Label2.Left
参考: http://dobon.net/vb/dotnet/graphics/lineargradientbrush.html http://dobon.net/vb/dotnet/control/labelonpicturebox.html
以上、よろしくお願いします。
|
|