FarPoint.Win.Spread.SmartPrintRulesCollection rules = new FarPoint.Win.Spread.SmartPrintRulesCollection();
FarPoint.Win.Spread.SmartPrintRule spr;
FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
spr = new FarPoint.Win.Spread.LandscapeRule();
rules.Add(spr.ResetOption.All);
rules.Add(new FarPoint.Win.Spread.BestFitColumnRule(FarPoint.Win.Spread.ResetOption.None));
pi.SmartPrintRules = rules;
Dim rules As New FarPoint.Win.Spread.SmartPrintRulesCollection
Dim spr As FarPoint.Win.Spread.SmartPrintRule
Dim pi As New FarPoint.Win.Spread.PrintInfo
spr = New FarPoint.Win.Spread.LandscapeRule
rules.Add(spr.ResetOption.All)
rules.Add(New FarPoint.Win.Spread.BestFitColumnRule(FarPoint.Win.Spread.ResetOption.All))
pi.SmartPrintRules = rules