Public Overloads Function Add( _
   ByVal value As Object _
) As Integer

Dim instance As SmartPrintRulesCollection
Dim value As Object
Dim value As Integer
 
value = instance.Add(value)

public int Add( 
   object value
)

FarPoint.Win.Spread.SmartPrintRulesCollection rules = new FarPoint.Win.Spread.SmartPrintRulesCollection();
FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
object obj = new object();
obj = new FarPoint.Win.Spread.LandscapeRule(FarPoint.Win.Spread.ResetOption.None);
if( obj is FarPoint.Win.Spread.SmartPrintRule ) 
rules.Add(obj);
else
throw new ArgumentException("Invalid object type specified: " + obj.GetType().ToString() + " (must be SmartPrintRule).");
pi.SmartPrintRules = rules;
fpSpread1.ActiveSheet.PrintInfo = pi;

Dim rules As New FarPoint.Win.Spread.SmartPrintRulesCollection
Dim pi As New FarPoint.Win.Spread.PrintInfo
Dim obj As New Object
obj = New FarPoint.Win.Spread.LandscapeRule(FarPoint.Win.Spread.ResetOption.None)
If TypeOf obj Is FarPoint.Win.Spread.SmartPrintRule Then
rules.Add(obj)
Else
Throw New ArgumentException("Invalid object type specified: " + obj.GetType().ToString() + " (must be SmartPrintRule).")
End If
pi.SmartPrintRules = rules
FpSpread1.ActiveSheet.PrintInfo = pi