作者:VB.NET开发
项目:System.Drawin
Private Sub UsePensClass(ByVal e As PaintEventArgs)
e.Graphics.DrawEllipse(Pens.SlateBlue, _
New Rectangle(40, 40, 140, 140))
End Sub
下面列出了vb System.Drawing.Pens 类(方法)源码代码实例,从而了解它的用法。
Private Sub UsePensClass(ByVal e As PaintEventArgs)
e.Graphics.DrawEllipse(Pens.SlateBlue, _
New Rectangle(40, 40, 140, 140))
End Sub