PC-DMIS Help Center - 2020 R1
Click here to see this page in full context

Example:

  1. Sub Main()

    1. Dim FileLength

      Open "TESTFILE" For Input As #1

      FileLength = LOF(1)

      Print FileLength

      Close #1

    End Sub