Dim FColor As Color = Color.DarkGreen
Dim TColor As Color = Color.Yellow
Dim b As Brush = New LinearGradientBrush(Me.ClientRectangle, FColor, TColor, LinearGradientMode.Vertical)
Using g As Graphics = e.Graphics
g.FillRectangle(b, Me.ClientRectangle)
'g.DrawIcon(Me.Icon.Clone, 2, 2)
g.DrawString("NeMo", New Font("Arial", 8), Brushes.White, 5, 0)
g.DrawString("通讯", New Font("Arial", 8), Brushes.Black, 7, 12)
g.DrawString("服务端", New Font("Arial", 8), Brushes.Black, 0, 24)
End Using
gdi在图画上写字
最新推荐文章于 2017-04-22 15:11:00 发布