Question

我可以使用我的代码搜索/突出显示单词文档中的特定单词。但下面是我面临的问题。

如果搜索词是“it”，则它搜索“it”但不搜索“It”（区分大小写）。我想搜索“它”和“它”忽略案例。我该如何解决这个问题？

以下是代码

  private int FindLoop(Word._Application wordApp, object text,
                    Word._Document aDoc,
                    object aComment, out List<string> OccuranceList,
                    bool insertComment)
 {

int intFound = 0;
//object start = 0;
//object end = 1;
object missing = System.Reflection.Missing.Value;

object myfile = saveFileDialog.FileName;

Word.Range rng = wordApp.ActiveDocument.Range(ref missing, ref missing);




object readOnly = true;
//object isVisible = true;
object isVisible = false;
object oMissing = System.Reflection.Missing.Value;
string fname = textBox1.Text;


object matchWholeWord = true;

    object[] Parameters;
    OccuranceList = new List<string>();
    Parameters = new object[15];
    Parameters[0] = String.Format("<{0}>", text);
    Parameters[1] = true;
    Parameters[2] = missing;
    Parameters[3] = true;
    Parameters[4] = missing;
    Parameters[5] = missing;
    Parameters[6] = missing;
    Parameters[7] = missing;
    Parameters[8] = missing;
    Parameters[9] = text;
    Parameters[10] = missing;
    Parameters[11] = missing;
    Parameters[12] = missing;
    Parameters[13] = missing;
    Parameters[14] = missing;
    bool found = false;        {
    try
    {

        found = (bool)rng.Find.GetType().InvokeMember("Execute", BindingFlags.InvokeMethod, null, rng.Find, Parameters);





    }

    catch (Exception ex)
    {
        MessageBox.Show("Find Loop", ex.Message);
    }





    //while (rng.Find.Found)
    while (found)
    {



        intFound++;
        if (checkBox1.Checked == true)
        {
            if (fname.ToString().EndsWith("doc") || fname.ToString().EndsWith("docx"))
            {
                try
                {
                    if (rng.Text.Trim() == text.ToString())
                    {



                        // Add a new document 
                        aDoc = wordApp.Documents.Open(fname, ref oMissing,
                                                       ref readOnly, ref oMissing, ref oMissing, ref oMissing,
                                                       ref oMissing, ref oMissing, ref oMissing, ref oMissing,
                                                       ref oMissing, ref isVisible, ref oMissing, ref oMissing,
                                                       ref oMissing, ref oMissing);



                        rng.Font.Bold = 1;
                        rng.HighlightColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdDarkRed;
                    }

                }

                catch (Exception ex)
                {

                    MessageBox.Show(ex.Message);
                }

            }


        }
    }
}

Answer 1

查看MSDN description of the find method，看起来'MatchCase'是第二个参数。所以试试：

Parameters[1] = false;

而不是

Parameters[1] = true;

顺便提一下，你在rng.Find对象上调用Execute的方法有点奇怪 - 为什么不直接调用Execute方法呢？我认为事情会变得容易一些。

我不是MS Word程序员（更多Excel），但希望这会有用。尝试类似：

rng.Find.Execute(FindText: String.Format("<{0}>", text), MatchCase: false);

根据需要添加任意数量的参数。

编辑：以下代码打开文档，找到“它”（大写或小写）并突出显示它。测试并“在我的机器上工作”： - ）

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

using Microsoft.Office.Interop.Word;

namespace Word
{
    class Program
    {
        static void Main(string[] args)
        {
            var fileName = @"C:\Scratch\test.docx";

            var app = new Application();
            app.Visible = true;

            var doc = app.Documents.Open(fileName);

            var rng = doc.Range();

            // This is the bit relevant to the question
            rng.Find.Text = "it";
            rng.Find.MatchCase = false;

            while (rng.Find.Execute(Forward: true))
            {
                rng.Font.Bold = 1;
                rng.HighlightColorIndex = WdColorIndex.wdDarkRed;
            }
        }
    }
}

在c＃忽略的情况下突出显示word文档中的文本

1 个答案: