如何防止MS-Word内存错误

Question

有没有一种释放内存并防止以下代码在MS-Word中崩溃的方法？ 我收到以下错误消息：

此方法或属性不可用，因为存在内存或磁盘问题。

Sub vbaTest()
Dim doc As Document
Dim sty As Style
Dim s As Style
Dim readingOrder As WdReadingOrder
Dim i As Integer
    Set doc = ActiveDocument
    Set sty = doc.Styles(wdStyleNormal)
    For i = 0 To 100
        readingOrder = sty.ParagraphFormat.readingOrder
        For Each s In doc.Styles
            s.Font.SizeBi = s.Font.Size + 3
        Next
        Set s = Nothing
    Next
    Set sty = Nothing
End Sub

- 要么 -

public void CsharpRibbon_Click(O.IRibbonControl c)
{
    var doc = app.ActiveDocument;
    var style = doc.Styles[Wd.WdBuiltinStyle.wdStyleNormal];
    for (int i = 0; i < 100; i++)
    {
        var readingOrder = style.ParagraphFormat.ReadingOrder;
        foreach (Wd.Style s in doc.Styles)
            s.Font.SizeBi = s.Font.Size + 3;
    }
}

上面的代码并没有真正的帮助。 我有一个功能区按钮，我注意到重复按下按钮会导致崩溃（在Word会话中大约5或6次）。 我剥离了代码，并添加了for循环来模拟按钮的多次按下。

Answer 1

我不确定这是否是您的错误，因为100次迭代似乎不足以引起内存错误，但是VSTO使用COM对象，使用后必须将其释放。 执行此操作的简单方法是：

Paragraph para = Paragraphs[1];
// etc.
Marshal.ReleaseComObject(yourObject);

还有VSTO Contrib ，这使此操作变得容易一些。 无需调用ReleaseComObject ，您可以执行以下操作：

using (var doc = Document.WithComCleanup())
using (var paragraphs = doc.Resource.Paragraphs.WithComCleanup())
{
    int count = paragraphs.Resource.Count;
    // etc.
}

或者，对于收藏：

foreach (Paragraph para in Paragraphs.ComLinq<Paragraph>())
{
    int pageBreakBefore = para.PageBreakBefore;
    // etc.
}