[DefaultValue(null)]
public IBasePrintable Component { get; set; }

<DefaultValue(Nothing)>
Public Property Component As IBasePrintable

PrintableComponentLink pivotLink = new PrintableComponentLink();
pivotLink.Component = pivotGridControl1;
PrintableComponentLink chartLink = new PrintableComponentLink();

categoriesGridSettings.Columns.Add("Description");
link1.Component = GridViewExtension.CreatePrintableObject(categoriesGridSettings, MyModel.GetCategories());

PrintableComponentLinkBase link1 = new PrintableComponentLinkBase(ps);
link1.Component = ASPxPivotGridExporter1;

PrintableComponentLinkBase pcl = new PrintableComponentLinkBase(new PrintingSystemBase());
pcl.Component = ASPxGridView1;
pcl.Margins.Left = pcl.Margins.Right = 50;

ps.AfterChange += ps_AfterChange;
    componentLink.Component = this;
}

Dim pivotLink As PrintableComponentLink = New PrintableComponentLink()
pivotLink.Component = pivotGridControl1
Dim chartLink As PrintableComponentLink = New PrintableComponentLink()

categoriesGridSettings.Columns.Add("Description")
link1.Component = GridViewExtension.CreatePrintableObject(categoriesGridSettings, MyModel.GetCategories())

Dim link1 As PrintableComponentLinkBase = New PrintableComponentLinkBase(ps)
link1.Component = ASPxPivotGridExporter1
Dim link2 As PrintableComponentLinkBase = New PrintableComponentLinkBase(ps)

Dim pcl As PrintableComponentLinkBase = New PrintableComponentLinkBase(New PrintingSystemBase())
pcl.Component = ASPxGridView1
pcl.Margins.Right = 50

AddHandler ps.AfterChange, AddressOf ps_AfterChange
    componentLink.Component = Me
End Sub