FarPoint.Win.Spread.SmartPrintRulesCollection rules = new FarPoint.Win.Spread.SmartPrintRulesCollection();
FarPoint.Win.Spread.ScaleRule lr = new FarPoint.Win.Spread.LandscapeRule();
FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
lr.ResetOption = FarPoint.Win.Spread.ResetOption.None;
rules.Add(lr);
pi.SmartPrintRules = rules;
pi.UseSmartPrint = true;
fpSpread1.ActiveSheet.PrintInfo = pi;
Dim rules As New FarPoint.Win.Spread.SmartPrintRulesCollection
Dim lr As New FarPoint.Win.Spread.LandscapeRule
Dim pi As New FarPoint.Win.Spread.PrintInfo
lr.ResetOption = FarPoint.Win.Spread.ResetOption.None
rules.Add(lr)
pi.SmartPrintRules = rules
pi.UseSmartPrint = True
FpSpread1.ActiveSheet.PrintInfo = pi