'Declaration Public Function New()
'Usage Dim instance As New SmartPaperRule()
public SmartPaperRule()
'Declaration Public Function New()
'Usage Dim instance As New SmartPaperRule()
public SmartPaperRule()
for (int i = 0; i <= 200; i++) fpSpread1.ActiveSheet.Cells[1, i].Text = "Test"; PrintInfo pt = new PrintInfo(); SmartPrintRulesCollection ptRules = new SmartPrintRulesCollection(); ptRules.Add(new SmartPaperRule()); pt.SmartPrintRules = ptRules; pt.UseSmartPrint = true; pt.PrintToPdf = true; pt.PdfFileName = "C:\\SmartPaperRule.pdf"; fpSpread1.ActiveSheet.PrintInfo = pt; fpSpread1.PrintSheet(0);
Dim i As Integer For i = 0 To 200 fpSpread1.ActiveSheet.Cells(1, i).Text = "Test" Next i Dim pt As New PrintInfo() Dim ptRules As New SmartPrintRulesCollection() ptRules.Add(New SmartPaperRule()) pt.SmartPrintRules = ptRules pt.UseSmartPrint = True pt.PrintToPdf = True pt.PdfFileName = "C:\SmartPaperRule.pdf" fpSpread1.ActiveSheet.PrintInfo = pt fpSpread1.PrintSheet(0)