<SerializableAttribute()>
Public Class AnnPen 
   Implements ICloneable 

Dim instance As AnnPen

[SerializableAttribute()]
public class AnnPen : ICloneable  

[SerializableAttribute()]
public ref class AnnPen : public ICloneable  

Private Sub AnnPen_AnnPen(ByVal graphics As Graphics, ByVal converter As AnnUnitConverter, ByVal rc As AnnRectangle)
   Dim annPen As AnnPen = New AnnPen(Color.Blue, New AnnLength(2, AnnUnit.Pixel))
   annPen.Alignment = PenAlignment.Center
   annPen.DashStyle = DashStyle.Dot
   Dim gdiPen As Pen = annPen.Create(converter)
   Try
      Dim rect As RectangleF = rc.ConvertTo(converter, AnnUnit.Pixel).ToRectangleF()
      graphics.DrawRectangle(gdiPen, rect.Left, rect.Top, rect.Width, rect.Height)
   Finally
      CType(gdiPen, IDisposable).Dispose()
   End Try
End Sub

private void AnnPen_AnnPen(Graphics graphics, AnnUnitConverter converter, AnnRectangle rc)
{
   AnnPen annPen = new AnnPen(Color.Blue, new AnnLength(2, AnnUnit.Pixel));
   annPen.Alignment = PenAlignment.Center;
   annPen.DashStyle = DashStyle.Dot;
   using(Pen gdiPen = annPen.Create(converter))
   {
      RectangleF rect = rc.ConvertTo(converter, AnnUnit.Pixel).ToRectangleF();
      graphics.DrawRectangle(gdiPen, rect.Left, rect.Top, rect.Width, rect.Height);
   }
}