用中文注释下面的vba代码 procedure Word.Normalize; begin //MsWord.ActiveDocument.PageSetup.LineNumbering.Active := False; //MsWord.

// 定义 Word.Normalize 过程 procedure Word.Normalize; begin // 关闭文档行号 MsWord.ActiveDocument.PageSetup.LineNumbering.Active := False; // 设置页面方向为纵向 MsWord.ActiveDocument.PageSetup.Orientation :=0;// wdOrientPortrait; // 设置上边距为 0.75 厘米 MsWord.ActiveDocument.PageSetup.TopMargin := CentimetersToPoints(0.75); // 设置下边距为 0.2 厘米 MsWord.ActiveDocument.PageSetup.BottomMargin := CentimetersToPoints(0.2); // 设置左边距为 0.5 厘米 MsWord.ActiveDocument.PageSetup.LeftMargin := CentimetersToPoints(0.5); // 设置右边距为 0.5 厘米 MsWord.ActiveDocument.PageSetup.RightMargin := CentimetersToPoints(0.5); // 设置装订线为 0 厘米 MsWord.ActiveDocument.PageSetup.Gutter := CentimetersToPoints(0); // 设置页眉距离为 1.27 厘米 MsWord.ActiveDocument.PageSetup.HeaderDistance := CentimetersToPoints(1.27); // 设置页脚距离为 1.27 厘米 MsWord.ActiveDocument.PageSetup.FooterDistance := CentimetersToPoints(1.27); // 设置页面宽度为 21 厘米 MsWord.ActiveDocument.PageSetup.PageWidth := CentimetersToPoints(21); // 设置页面高度为 29.7 厘米 MsWord.ActiveDocument.PageSetup.PageHeight := CentimetersToPoints(29.7); // 设置首页打印纸盒为默认纸盒 MsWord.ActiveDocument.PageSetup.FirstPageTray :=0;// wdPrinterDefaultBin; // 设置其他页面打印纸盒为默认纸盒 MsWord.ActiveDocument.PageSetup.OtherPagesTray :=0;// wdPrinterDefaultBin; // 设置新节的起始位置为新页面 MsWord.ActiveDocument.PageSetup.SectionStart :=2;// wdSectionNewPage; // 关闭奇偶页不同的页眉页脚 MsWord.ActiveDocument.PageSetup.OddAndEvenPages