Чтение и Проверка содержимого документов Word

Question

Я новичок в vb.net и моя попытка проверить страницу layout в word document где Поля должны быть следующими,

a. Left/Right: 0.4 
b. Top/Bottom: 0.5 
c. Header/Footer: 0 

Если макет является правильным, то его хорошо или если он не является правильным, то в нем должен отображаться сообщение об ошибке.

То же самое для Font Name и Size с Bold, если шрифты отличны Verdana и Arial с Size 12 или 16pt, то он должен отображать строку в окне сообщения, которое не содержит следующие требования.

Я новичок в этом, следовательно, не знаю, как начать все, что поможет, будет очень признательна.

Answer 1

Попробуйте это:

Импорта следующей строке

Imports Microsoft.Office.Interop.Word 
Imports Microsoft.Office.Interop 


    Dim oDoc As New Word.Document() 
    Dim wapp As New Word.Application() 
    oDoc = wapp.Documents.Open(filepath) 

     if wapp.InchesToPoints(oDoc.PageSetup.LeftMargin) = 0.4 or 
wapp.InchesToPoints(oDoc.PageSetup.RightMargin) = 0.4 then 
       MsgBox("Margin Warning") 
      End if 

    For Each xpr As Word.Paragraph In oDoc.Paragraphs 


    if xpr.Range.Font.Name<>Verdana or xpr.Range.Font.Name<>Arial then 
      MsgBox(" Font Name Warning") 
    End if 

    if xpr.Range.Font.size<>12or xpr.Range.Font.size<>16 then 
      MsgBox(" Font Name Warning") 
    End if 

Next