Hi, PRA

Will get back to you tomorrow

PRA says:

Here all question duplicate but program can’t define because have difference sign. I want delete all sign (,/-!:;?). only for me need one sign in end sentence. In end sentence may put . or : or ! or ?.  In end sentence can’t put -. Or .? or :!.

 Please explain the above line of statement in details.

In below I write wrong sentence. When write this sentence, it’s must delete sign besides one sign end sentence.

Input:

@1. -The capital of Tajikistan:.

@2. The, capital of India?.

@3. The capital of, Afghanistan!.

Output sentence:

@1. The capital of Tajikistan.

@2. The capital of India.

@3. The capital of Afghanistan.

Hi PRA,

Refer the below code.

C#

private void btnUpload_Click(object sender, EventArgs e)
{
    DialogResult result = openFileDialog1.ShowDialog();
    if (result == DialogResult.OK)
    {
        Microsoft.Office.Interop.Word.Application word = new Microsoft.Office.Interop.Word.Application();
        Document doc = new Document();
        string filePath = openFileDialog1.FileName;
        //string filePath = Environment.CurrentDirectory.Substring(0, Environment.CurrentDirectory.IndexOf("bin")) + "Files\\Test1.doc";
        object missing = System.Type.Missing;
        object fileName = filePath;
        doc = word.Documents.Open(ref fileName, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing,
                ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);
        List<string> data = new List<string>();
        for (int i = 0; i < doc.Paragraphs.Count; i++)
        {
            string temp = doc.Paragraphs[i + 1].Range.Text.Trim();
            if (temp != string.Empty)
            {
                temp = temp.Replace(":", "").Replace("?", "").Replace("!", "").Replace(",", "").Replace("-", "").Trim();
                data.Add(temp);
            }
        }
        var duplicateQuestions = data.Where(x => x.Contains("@")).Select(y => y.Split('.')[1].Trim()).GroupBy(x => x).Where(z => z.Count() > 1).Select(k => k.Key);
        foreach (string item in duplicateQuestions)
        {
            int count = 0;
            for (int i = 0; i < doc.Paragraphs.Count; i++)
            {
                string temp = doc.Paragraphs[i + 1].Range.Text.Replace(":", "").Replace("?", "").Replace("!", "").Replace(",", "").Replace("-", "").Trim();
                if (temp.Split('.').Length > 1)
                {
                    if (item == temp.Split('.')[1].Trim())
                    {
                        count++;
                    }
                    if (item == temp.Split('.')[1].Trim() && count > 1)
                    {
                        doc.Paragraphs[i + 1].Range.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdRed;
                    }
                }
            }
        }
        doc.Save();
        doc.Close(ref missing, ref missing, ref missing);
        ((_Application)word).Quit();
    }
}

Input

@1. -The capital of Tajikistan:.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@2. The, capital of India?.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@3. The capital of, Afghanistan!.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@4. -The capital of Tajikistan:.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@5. The, capital of India?.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

Output

@1. -The capital of Tajikistan:.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@2. The, capital of India?.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@3. The capital of, Afghanistan!.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@4. -The capital of Tajikistan:.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.

@5. The, capital of India?.

$A) Kabul; $B) Delhi; $C)Dushanbe; $D)Tokyo.