<SerializableAttribute()>
Public Class AnnPointObject 
   Inherits AnnObject
   Implements IAnnPictureObject, ICloneable, IDisposable, ISerializable 

Dim instance As AnnPointObject

[SerializableAttribute()]
public class AnnPointObject : AnnObject, IAnnPictureObject, ICloneable, IDisposable, ISerializable  

[SerializableAttribute()]
public ref class AnnPointObject : public AnnObject, IAnnPictureObject, ICloneable, IDisposable, ISerializable  

Private Sub AnnPointObject_AnnPointObject(ByVal viewer As RasterImageViewer, ByVal container As AnnContainer)
   Dim point As AnnPointObject = New AnnPointObject()
   point.CenterPoint = New AnnPoint(100, 100, AnnUnit.Pixel)
   point.ShowPicture = True
   ' default picture, no need to change anything
   container.Objects.Add(point)
   viewer.Invalidate(point.InvalidRectangle)
   MessageBox.Show("Picture")

   ' show with a radius
   point.Radius = New AnnLength(16, AnnUnit.Pixel)
   point.Pen = New AnnPen(Color.Red, New AnnLength(1, AnnUnit.Pixel))
   point.ShowPicture = False
   viewer.Invalidate(point.InvalidRectangle)
   MessageBox.Show("No picture")
End Sub

private void AnnPointObject_AnnPointObject(RasterImageViewer viewer, AnnContainer container)
{
   AnnPointObject point = new AnnPointObject();
   point.CenterPoint = new AnnPoint(100, 100, AnnUnit.Pixel);
   point.ShowPicture = true;
   // default picture, no need to change anything
   container.Objects.Add(point);
   viewer.Invalidate(point.InvalidRectangle);
   MessageBox.Show("Picture");

   // show with a radius
   point.Radius = new AnnLength(16, AnnUnit.Pixel);
   point.Pen = new AnnPen(Color.Red, new AnnLength(1, AnnUnit.Pixel));
   point.ShowPicture = false;
   viewer.Invalidate(point.InvalidRectangle);
   MessageBox.Show("No picture");
}