Determine if a number is odd or even

Hi,

How can I determine if a number is odd or even? I am using the following code to determine my page numbers in a word document, but I need to know if the number is odd or even.

 Dim lPageCnt As Long, lPgNr As Long

            lPageCnt = oWordApplication.ActiveDocument.ComputeStatistics(WdStatistic.wdStatisticPages)
            For lPgNr = 1 To lPageCnt
                Call oWordApplication.Selection.GoTo(WdGoToItem.wdGoToPage, , , CStr(lPgNr))
                With oWordApplication.ActiveDocument.Shapes.AddLine(307, 73, 307, 709).Line
                    .DashStyle = Microsoft.Office.Core.MsoLineDashStyle.msoLineSolid
                End With
            Next lPgNr

ThanksStart Free Trial